VB.NET

[art]

... The download above appears to be corrupt. ...

I don't know why those zip files get corrupted (that's not the first time) ..
Anyway, here is the code:

Code: Select all

Imports XPluginSDK

Public Class xlobbyTestPlugin
    Implements XPlugin

#Region "xlobby members"

    Private xhelper As XPluginHelper

    Public Function GetDescription() As String Implements XPluginSDK.XPlugin.GetDescription
        Return "xlobbyTestPlugin-Description"
    End Function

    Public Function GetName() As String Implements XPluginSDK.XPlugin.GetName
        Return "xlobbyTestPlugin-Name"
    End Function

    Public Function GetPluginType() As String Implements XPluginSDK.XPlugin.GetPluginType
        Return "xlobbyTestPlugin-Type"
    End Function

    Public Function GetStatus() As String Implements XPluginSDK.XPlugin.GetStatus
        Return ""
    End Function

    Public Function GetVariable(ByVal name As String) As Object Implements XPluginSDK.XPlugin.GetVariable
        Return ""
    End Function

    Public Sub SetHelper(ByVal xhelper As XPluginHelper) Implements XPluginSDK.XPlugin.SetHelper
        Me.xhelper = xhelper
    End Sub

    Public Sub ShowDialog() Implements XPluginSDK.XPlugin.ShowDialog
        '\\ show setup form here
    End Sub

    Public Function GetCommands() As System.Collections.ArrayList Implements XPluginSDK.XPlugin.GetCommands
        Dim commands As ArrayList = New ArrayList
        commands.Add("Test_Command")
        Return commands
    End Function

    Public Sub Execute(ByVal command As String) Implements XPluginSDK.XPlugin.Execute
        Dim comm As String() = command.Split(" ")
        If comm(0) = "Test_Command" Then
            xtest(comm(1))
        End If
    End Sub

#End Region

#Region "plug-in members"

    Private Sub xtest(ByVal myArg As String)
        MsgBox(myArg)
    End Sub

#End Region

End Class


[fletch]

Thanks, that works great. Now it is time to learn the differences between VB6 and VB.Net.

[dalanik]

Speaking of VB.NET and plugins, is it possible to get actual screen/overlay name from a plugin? I just coulfn't find anything in the docs...

D.

[m_ski]

Use xhelper.Sendcommand("screen").

See http://www.xlobby.com/forum/viewtopic.php?t=3844&highlight=SendCommand

[dalanik]

Cool, thanx, this solves half the problem for me And the other half are overalys - and if I'm not mistaken XScriptNG also has the ability to add event handler to check for overlay open/close???

D.