Valhalla Legends Forums Archive | Visual Basic Programming | No carry through... ewwy

AuthorMessageTime
CrAz3D
[code]If KeyAscii = 13 Then
If Left(txtSend.text, 1) = "\" Then
CS.DoCommands intAccess, CurrentUser, txtSend.text, False
txtSend.text = ""
KeyAscii = 0
Else
If PL.PlugEvent("metalk", CurrentUser, txtSend.text) = False Then
Queue.AddQueue txtSend.text
End If
txtSend.text = ""
KeyAscii = 0
End If
End If[/code]

In my Plugin I set Run = True, that way it doesn't send text to BNET.

[code]Case "metalk" '//This is the event called when YOU say something
If LCase(Left(Message, 9)) = "/showseen" Then
Form1.Show
Run = True
End If[/code]

For some reason it isn't carrying over, any ideas?
September 21, 2004, 1:37 AM
UserLoser.
Are you moving the value of Run to PlugEvent at the end of that function?

This may not be related to your problem, but usually don't you check for Left(txtSend.Text, 1) = "/" for running local commands?
September 22, 2004, 7:08 PM
Grok
I saw the same thing, but there is not enough code to either figure out his intentions. I have only a vague idea what "carrying over" means without better context.
September 22, 2004, 7:36 PM
CrAz3D
I figured out my problem. I was checking multiple objects, all of which return a value for their own specific Run function. Not all were returning true so it canceled out...I just did a little check to see if any of the Runs = true then if only 1 was true, the PlugEvent became true also.
September 22, 2004, 10:44 PM

Search