Doppelklick auf EditorGadget
Verfasst: 11.04.2018 12:16
Hallo,
der code für EditorGadget funktionniert nicht
http://www.purebasic.fr/german/viewtopic.php?t=23668
Wie kann ich dass für ein EditorGadget realisieren.
Ich will mit ein Doppelklick auf eine Zeile dass, ein Programm aufgerufen wird 9mit der Inhalt der geklickt Zeile
Danke und Gruß
MarcelX
__________________________________________________
Domain angepasst
11.04.2018
RSBasic
der code für EditorGadget funktionniert nicht
http://www.purebasic.fr/german/viewtopic.php?t=23668
Wie kann ich dass für ein EditorGadget realisieren.
Ich will mit ein Doppelklick auf eine Zeile dass, ein Programm aufgerufen wird 9mit der Inhalt der geklickt Zeile
Code: Alles auswählen
If OpenWindow(0, 0, 0, 330, 300, "Eventtypes Beispiel...", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
EditorGadget(1, 8, 58, 300, 200)
For a = 0 To 5
AddGadgetItem(1, a, "Datei_"+Str(a))
Next
Repeat
Event = WaitWindowEvent()
Select Event
Case #PB_Event_Gadget
Select EventGadget()
Case 1
Select EventType()
Case #PB_EventType_LeftClick : Debug "Klick mit der linken Maustaste"
Case #PB_EventType_RightClick : Debug "Klick mit der rechten Maustaste"
Case #PB_EventType_LeftDoubleClick : Debug "Doppelklick mit der linken Maustaste"
Case #PB_EventType_RightDoubleClick : Debug "Doppelklick mit der rechten Maustaste"
EndSelect
EndSelect
EndSelect
Until Event = #PB_Event_CloseWindow
EndIfMarcelX
__________________________________________________
Domain angepasst
11.04.2018
RSBasic