20-02-2009, 02:20 AM
Ive had a code for a right click menu for awhile now. its pretty easy to make and all just i wanted to give to you since idt ill be programming for awhile now. So here it is lol
In frmMirage make a picturebox called "picRightClick". Set its visible to false.
In ModGlobals add this line anywhere:
.
In frmMirage's code replace the code "picScreen_MouseDown" with this:
There it is. I hope it works for all of you
In frmMirage make a picturebox called "picRightClick". Set its visible to false.
In ModGlobals add this line anywhere:
Code:
Public RclickIndex as Long
In frmMirage's code replace the code "picScreen_MouseDown" with this:
Code:
Dim i As Long
If Button = 2 Then
For i = 1 To MAX_PLAYERS
If GetPlayerMap(i) = GetPlayerMap(MyIndex) Then
If GetPlayerX(i) * 32 = x Or x + 32 Then
If GetPlayerY(i) * 32 = y Or y + 32 Then
frmMirage.picRightClick.Visible = True
End If
End If
End If
Next i
End If
If Button = 1 Then
Call EditorMouseDown(Button, Shift, x, y)
Call PlayerSearch(Button, Shift, x, y)
End If
There it is. I hope it works for all of you