I modified some sample code from this forum to show this. Click double on a line of the gadget and watch the debugger output:
Code: Select all
OpenWindow(0, 0, 0, 250, 300, #PB_Window_SystemMenu|#PB_Window_ScreenCentered, "EventType()")
CreateGadgetList(WindowID(0))
ListViewGadget(0, 5, 5, 240, 250)
For i=0 To 20
AddGadgetItem(0, -1, "line......"+Str(i))
Next
Repeat
Select WaitWindowEvent()
Case #PB_Event_CloseWindow
Break
Case #PB_Event_Gadget
Select EventGadgetID()
Case 0
Select EventType()
Case #PB_EventType_LeftClick : Debug "LeftClick"
Case #PB_EventType_LeftDoubleClick : Debug "LeftDoubleClick"
EndSelect
EndSelect
EndSelect
ForEver
Btw VB6 has the same problem.
Any idea, please?
Thanks,
Stefan