EventType()
Syntax
EreignisTyp = EventType()Beschreibung
Nach einem WindowEvent() oder WaitWindowEvent() Befehl benutzen Sie diese Funktion, um den Typ des letzten Ereignisses (englisch: "Event") festzustellen.
Die folgenden Gadgets unterstützen EventType():
- CanvasGadget() - Das CanvasGadget hat ein spezielles Set von Ereignis-Typen.
- ComboBoxGadget()
- DateGadget()
- EditorGadget()
- ExplorerListGadget()
- ExplorerTreeGadget()
- ImageGadget()
- ListViewGadget()
- ListIconGadget()
- MDIGadget()
- OpenGLGadget()
- SpinGadget()
- StringGadget()
- WebGadget() - Das WebGadget hat ein spezielles Set von Ereignis-Typen.
(Siehe die jeweilige Gadget-Beschreibung, welche Ereignisse unterstützt werden.)
Parameter
Diese Funktion hat keine Parameter.
Rückgabewert
Die folgenden Werte sind möglich, wenn ein Ereignis des Typs #PB_Event_Gadget (Bibliothek Gadget) oder #PB_Event_SysTray (Bibliothek SysTray) auftritt:#PB_EventType_LeftClick : Klick mit der linken Maustaste #PB_EventType_RightClick : Klick mit der rechten Maustaste #PB_EventType_LeftDoubleClick : Doppelklick mit der linken Maustaste #PB_EventType_RightDoubleClick : Doppelklick mit der rechten Maustaste #PB_EventType_Focus : Fokus erhalten #PB_EventType_LostFocus : Fokus verloren #PB_EventType_Change : Inhalt hat sich geändert. #PB_EventType_DragStart : Der Anwender versucht, eine Drag & Drop Operation zu starten.
Beispiel
  If OpenWindow(0, 0, 0, 230, 120, "Eventtypes Beispiel...", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
     ListIconGadget(1, 10, 10, 150, 100, "ListIcon", 140, #PB_ListIcon_GridLines) 
     For a= 1 To 4
       AddGadgetItem(1, -1, "Line "+Str(a))
     Next a
  
     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
Siehe auch
WaitWindowEvent(), WindowEvent()
Unterstützte OS
Alle