PureBoard

Verfasst: **17.03.2009 17:32**

EiegenThreadWerbung:
http://www.purebasic.fr/german/viewtopi ... highlight=

Verfasst: **31.03.2009 11:59**

So, ich bin jetzt soweit mit der Umstellung dass das Script ausgeführt werden kann. Allerdings konnte ich dann meine Events über Tastertureingabe nicht mehr abfangen.
Was mache ich bei folgendem Beispiel falsch, dass die "Enter"-Taste nicht als Event auftaucht???

Code: Alles auswählen

;- Window Constants
;
Enumeration
  #Window_0
  #Panel_0
  #ListIcon_0
  #ListIcon_1
EndEnumeration

If OpenWindow(0, #PB_Ignore, 0, 600, 500, "Test")

      PanelGadget(#Panel_0, 20, 10, 560, 280)
      AddGadgetItem(#Panel_0, -1, "Tab 1")

      ListIconGadget(#ListIcon_0, 18, 18, 220, 190, "Column1", 100)
        AddGadgetItem(#ListIcon_0, 1,"bla")
        AddGadgetItem(#ListIcon_0, 1,"bla")

      ListIconGadget(#ListIcon_1, 248, 18, 220, 190, "Column2", 100)
        AddGadgetItem(#ListIcon_1, 1,"bla")
        AddGadgetItem(#ListIcon_1, 1,"bla")
      CloseGadgetList()
      
  Repeat 

  Ereignis = WaitWindowEvent() 

  If EventType() = #PB_EventType_ReturnKey
    Debug "Enter gedrückt"
  EndIf
  
  If Ereignis = #PB_Event_Gadget
  EndIf

  Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

Verfasst: **31.03.2009 16:15**

PB_EventType_ReturnKey?
Entweder stehts nicht in der Hilfe oder du willst uns eine falsche Konstante
aufbrummen.

Verfasst: **31.03.2009 16:27**

Benutze AddKeyBoardShortCut()
Deine Konstante ist zwar deklariert wird aber wohl von keinem Gadget
unterstützt.

PureBoard

Quelltext AUS Webgadget lesen [gelöst]