Seite 3 von 3
Re: Unterscheidung LeftClick und LeftDoubleClick bei EventTy
Verfasst: 25.03.2015 21:23
von RSBasic
+1
Allgemeine Windows-Einstellungen wie die Doppelklickzeit der Maus sollen von Anwendungen nicht verändert werden. Das macht nur der Benutzer selbst in der Systemsteuerung.
Re: Unterscheidung LeftClick und LeftDoubleClick bei EventTy
Verfasst: 25.03.2015 21:29
von ts-soft
Gerade die Doppelclickzeit sollte man nicht verändern. Ist meist eine der ersten Tätigkeiten von Einsteigern/Ungeübten usw. in der
Systemsteuerung um ein Doppelclick zu ermöglichen. Wenn das jetzt jemand anders verstellt, wäre das schon sehr übel.
Re: Unterscheidung LeftClick und LeftDoubleClick bei EventTy
Verfasst: 25.03.2015 22:13
von Danilo
Man kann das auch selbst machen, ohne es im System zu verstellen.
Code: Alles auswählen
#DblClickTime = 250
Global clickStart = ElapsedMilliseconds()
Procedure OnClickTimer()
RemoveWindowTimer(0,1)
Debug "Single Click"
EndProcedure
Procedure OnClick()
If (clickStart + #DblClickTime) >= ElapsedMilliseconds()
RemoveWindowTimer(0,1)
Debug "Double Click"
ProcedureReturn
EndIf
clickStart = ElapsedMilliseconds()
AddWindowTimer(0,1,#DblClickTime+20)
EndProcedure
If OpenWindow(0, 0, 0, 300, 200, "ListIcon Example", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ListIconGadget(0, 5, 5, 290, 190, "Name", 100, #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)
AddGadgetColumn(0, 1, "Address", 250)
AddGadgetItem(0, -1, "Harry Rannit"+Chr(10)+"12 Parliament Way, Battle Street, By the Bay")
AddGadgetItem(0, -1, "Ginger Brokeit"+Chr(10)+"130 PureBasic Road, BigTown, CodeCity")
BindGadgetEvent(0, @OnClick(), #PB_EventType_LeftClick)
BindEvent(#PB_Event_Timer,@OnClickTimer(),0,1)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
Ich finde das aber nicht empfehlenswert, da es die gewünschte Doppelklickzeit des Benutzers ignoriert.
Es ist besser sich Grundsätzlich etwas einfallen zu lassen, so dass Einzel- und Doppelklick sich ergänzen
und nicht einander ausschließen.