Visual Basic .NET Code
Public Class clsAddStartInfoDemo Implements CD2000Plugin.Interfaces.IPlugin Public varHost As CD2000Plugin.Interfaces.CD2000 Public Sub Initialize(ByVal Host As CD2000Plugin.Interfaces.CD2000) Implements CD2000Plugin.Interfaces.IPlugin.Initialize varHost = Host End Sub Public Function Events(ByVal Message As CD2000Plugin.Interfaces.IPlugin.EnumMessages, ByVal Data As Object) As Boolean Implements CD2000Plugin.Interfaces.IPlugin.Events Select Case Message Case CD2000Plugin.Interfaces.IPlugin.EnumMessages.MainForm_OnCopyDiscovery2000Start varHost.CD2000.AddStartInfo("Demo Plugin :: Information", "Interessante Informationen über das Plugin. Und noch mehr hilfreiche Infos über die Verwendung von Demo Plugin. Und so weiter.") End Select End Function End Class