Seite 1 von 1

Buttonabfrage

Verfasst: 07.04.2006 18:09
von Wespe23
Hallo zusammen.
Ich habe noch wirklich nicht viel mit Window-GUI gearbeitet, also möchte ich Fragen, wie man abfragen kann, ob ein Button gedrückt ist. So sieht's momentan bei mir aus:

Code: Alles auswählen

If OpenWindow(0,0,0,600,600,  #PB_Window_SystemMenu | #PB_Window_TitleBar,"Test") And CreateGadgetList(WindowID())
  ButtonGadget(0,100,100,200,50,"Test-Button 1")
  ButtonGadget(1,100,300,200,50,"Test-Button 2")
    Select EventGadgetID()
     Case 0
      MessageRequester("Info","Button 1 wurde gedrückt",0)
      End
     Case 1
      MessageRequester("Info","Button 2 wurde gedrückt",0)
      End
    EndSelect
EndIf
End
Nu ja :roll: funktionieren tut's nich

Verfasst: 07.04.2006 18:22
von ts-soft
Du fragst ja das WindowsEreignis garnicht ab !

Code: Alles auswählen

If OpenWindow(0,0,0,600,600,  #PB_Window_SystemMenu | #PB_Window_TitleBar,"Test") And CreateGadgetList(WindowID())
  ButtonGadget(0,100,100,200,50,"Test-Button 1")
  ButtonGadget(1,100,300,200,50,"Test-Button 2")
  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_CloseWindow
        Break
      Case #PB_Event_Gadget
        Select EventGadgetID()
         Case 0
          MessageRequester("Info","Button 1 wurde gedrückt",0)
          End
         Case 1
          MessageRequester("Info","Button 2 wurde gedrückt",0)
          End
        EndSelect
    EndSelect
  ForEver
EndIf
End