Hallo liebe Brotfische,
ich versuche akutell mit Visual Basic 2010 einen Keybinder zu erstellen komme aber aktuell an meine grenzen. Mir wird folgender Fehler aktuell angezeigt
Code
Ein Aufruf an die PInvoke-Funktion "ProjektName!ProjektName.Form1::AddChatMessage" hat das Gleichgewicht des Stapels gestört. Wahrscheinlich stimmt die verwaltete PInvoke-Signatur nicht mit der nicht verwalteten Zielsignatur überein. Überprüfen Sie, ob die Aufrufkonvention und die Parameter der PInvoke-Signatur mit der nicht verwalteten Zielsignatur übereinstimmen.Weiß einer wo sich mein Fehler befindet ? Hier einmal der gesamte Code
Code
Public Class Form1
Dim Shadows activated = 0
Dim Version = "0.01"
Private Declare Function AddChatMessage Lib "API.dll" Alias "AddChatMessage" (ByVal Text As String) As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label2.Text = Version
If Not activated Then
activebutton.Text = "Keybinder aktivieren"
Else
activebutton.Text = "Keybinder deaktivieren"
End If
End Sub
Private Sub activebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles activebutton.Click
If activated Then
activebutton.Text = "Keybinder aktivieren"
AddChatMessage("Keybinder deaktiviert")
activated = 0
Else
activebutton.Text = "Keybinder deaktivieren"
activated = 1
AddChatMessage("Keybinder aktiviert")
End If
End Sub
End Class
