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
EndIf
MarcelX
__________________________________________________
Domain angepasst
11.04.2018
RSBasic