PB4.10/4.20 EventType() mangelhaft
Verfasst: 05.01.2008 17:54
Wenn ich ein ExplorerListgadget oder ein ListIconGadget habe, dann kann ich
nicht zwischen einen Doppelklick und einem einfach Klick unterscheiden.
Habe hier mal einen Code zum probieren.
Gruß Jens
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