If EventID=#PB_Key_Escape:Quit=1:EndIf

[Gamer]

Code: Alles auswählen

Repeat 

EventID = WaitWindowEvent()

If EventID=#PB_Key_Escape:Quit=1:EndIf

Until Quit=1

Wie muss ich das umbauen, damit das Programm durch Druck
der Escapetaste beendet wird in einem normalen Window,
egal ob die Esc nun über einem StringGadget oder sonstwo
gedrückt wurde?

[zigapeda]

Code: Alles auswählen

Repeat

EventID = WaitWindowEvent()

If EventID=#Wm_keyfirst
  If EventwParam() = #vk_escape : Quit=1 : EndIf
EndIf

Until Quit=1

[Gamer]

Supi!

[zigapeda]

Kein Problem musste auch erst fragen: http://forums.purebasic.com/german/viewtopic.php?t=2364