home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 2000 February / PCW_2_2000.ISO / software / sw / notfall / xsetpsdk.exe / examples / testplug Messages.xpl < prev    next >
Encoding:
Text File  |  1998-09-18  |  939 b   |  48 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 3.1"
  2. "TYPE"="5"
  3. "COUNT"="4"
  4. "TEXT 1"="Debug"
  5. "TEXT 2"="Information"
  6. "TEXT 3"="Warning"
  7. "TEXT 4"="Error"
  8. "UIPATH"="Test Plug-ins"
  9. "NAME"="Message Test"
  10. "LANGUAGE"="VBScript"
  11. "DESCRIPTION 1"="TEST!"
  12. "AUTHOR"="Xteq Systems"
  13. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  14.  
  15.  
  16.  
  17. 'Called when the Plugin is started
  18. Sub Plugin_Initialize 
  19. End Sub
  20.  
  21.  
  22. 'Called when the Plugin should validate the Data the user has entered
  23. Sub Plugin_CheckData(ElementIndex)
  24. End Sub
  25.  
  26.  
  27. 'Called when the Plugin should apply the changes
  28. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  29.  Select Case ElementIndex
  30.  Case 1
  31.   Call DebugMsg("Debug!!!")
  32.  Case 2
  33.   Call MsgInformation("Information")
  34.  Case 3
  35.   Call MsgWarning("Warning")
  36.  Case 4
  37.   Call MsgError("Error")
  38.  end select 
  39. End Sub
  40.  
  41.  
  42. 'Called when the Plugin is about to be removed from memory
  43. Sub Plugin_Terminate 
  44. End Sub
  45.  
  46.  
  47.  
  48.