Specifically, a left click produces a #PB_EventType_LeftClick as expected, but a
left double-click produces a #PB_EventType_RightClick event, which doesn't make sense.
A right click doesn't produce a "Click" event at all.
Try this simple code to see what happens:
Code: Select all
OpenWindow(0, 0, 0, 200, 200, #PB_Window_SystemMenu|#PB_Window_ScreenCentered, "ImageGadget Event Test")
CreateGadgetList(WindowID())
ImageGadget(0, 10, 10, 100, 100, 0, #PB_Image_Border)
Repeat
Event.l = WaitWindowEvent()
If Event = #PB_Event_Gadget
If EventGadgetID() = 0
Select EventType()
Case #PB_EventType_LeftClick
Debug "Left Click"
Case #PB_EventType_RightClick
Debug "Right Click"
Case #PB_EventType_LeftDoubleClick
Debug "Left Double Click"
EndSelect
EndIf
EndIf
Until Event = #PB_Event_CloseWindow
Thanks,
Eric


