+- Mirage Source (https://mirage-engine.uk/forums)
+-- Forum: Mirage Source (Nostalgia) (https://mirage-engine.uk/forums/forumdisplay.php?fid=61)
+--- Forum: Archive (2006-2011) (https://mirage-engine.uk/forums/forumdisplay.php?fid=18)
+---- Forum: General (https://mirage-engine.uk/forums/forumdisplay.php?fid=17)
+---- Thread: Check Input (/showthread.php?tid=548)
Check Input - halla - 28-12-2006
Ok im making it so when you hit F5 it shows or hides the chat menu. I got it semi working. I went to check input and at the end added...
Code:
If KeyCode = vbKeyF5 Then
If frmMirage.picChat.Visible = True Then
frmMirage.picChat.Visible = False
ElseIf frmMirage.picChat.Visible = False Then
frmMirage.picChat.Visible = True
End If
End IfThe problem with this if you cant tell is when you hide it ... it sees visible is false so then it shows it again and so on...
how else should I do this... I tried making a whole new thing... like if F5 then .... but that didnt work...
- Robin - 28-12-2006
Add exit sub.
- Tony - 29-12-2006
Code:
If KeyCode = vbKeyF5 And frmMirage.picChat.Visible = True Then
frmMirage.picChat.Visible = False
Else
If frmMirage.picChat.Visible = False Then
frmMirage.picChat.Visible = True
End IfRevised.
:: Pando
- funkynut - 29-12-2006
Code:
If KeyCode = vbKeyF5 And frmMirage.picChat.Visible = True Then
frmMirage.picChat.Visible = False
ElseIf KeyCode = vbKeyF5 And frmMirage.picChat.Visible = False Then
frmMirage.picChat.Visible = True
End IfYou forgot to check if F5 was being pressed when visibility = false, therefore, whenever it checked input, it would check if visibilty was false and set it to true
- halla - 29-12-2006
Ok I got it ... it wasnt any of those methods and I kept putting it in keyup instead of keydown I beleive that was a problem too.
- funkynut - 29-12-2006
hmm bugger, I copied the code form wrong person :|