Verfasst: 12.07.2006 00:49
1. WaitWindowEvent() vor EventGadget(), und ohne timeout von 0
2. Abfragen, ob dies ein Gadget oder sonstwas Ereignis ist, dann erst vergleichen
usw. ...
Hat aber alles nichts mit PB4 zu tun, war in PB3.... auch schon so
2. Abfragen, ob dies ein Gadget oder sonstwas Ereignis ist, dann erst vergleichen
usw. ...
Hat aber alles nichts mit PB4 zu tun, war in PB3.... auch schon so

Code: Alles auswählen
OpenWindow(0,0,0,800,700,"Bla",#PB_Window_SystemMenu|#PB_Window_MinimizeGadget|#PB_Window_ScreenCentered)
CreateGadgetList(WindowID(0))
ButtonGadget(1,20,20,100,20,"Test1")
ButtonGadget(2,20,40,100,20,"Test2")
Repeat
WaitWindowEvent = WaitWindowEvent()
EventGadget = EventGadget()
If WaitWindowEvent = #PB_Event_Gadget
If EventGadget = 1
MessageRequester("Ze Fix Scheiss Ding", "funz endlich richtig",#PB_MessageRequester_Ok)
EndIf
If EventGadget = 2
MessageRequester("Verdammt", "funz endlich richtig",#PB_MessageRequester_Ok)
EndIf
EndIf
Until WaitWindowEvent = #PB_Event_CloseWindow
End