nicht zwischen einen Doppelklick und einem einfach Klick unterscheiden.
Habe hier mal einen Code zum probieren.
Code: Alles auswählen
If OpenWindow(0,0,0,420,300,"xxx")
If CreateGadgetList(WindowID(0))
ExplorerListGadget(0, 2, 2,416,296,"", #PB_Explorer_NoDriveRequester|#PB_Explorer_GridLines|#PB_Explorer_AutoSort)
EndIf
EndIf
Repeat
EventID.l=WaitWindowEvent()
EventTP.l=EventType()
Select EventID
Case #PB_Event_CloseWindow
Select GetActiveWindow()
Case 0
Quit=#True
EndSelect
Case #PB_Event_Gadget
Select EventGadget()
Case 0
Select EventTP
Case #PB_EventType_LeftClick
MessageRequester("","links")
Case #PB_EventType_LeftDoubleClick
MessageRequester("","links doppel")
Case #PB_EventType_RightClick
MessageRequester("","rechts")
Case #PB_EventType_RightDoubleClick
MessageRequester("","rechts doppel")
EndSelect
EndSelect
EndSelect
Until Quit
End