> damit es nicht dann innerhalb von 3 frames durch 3 menüs springt
yo, genau den fall meinte ich auch, und ich benutze dort ein pressed mit flag...

Code: Alles auswählen
OpenWindow(0, 500,50, 400,400, "")
Repeat
event=WaitWindowEvent(50)
Select 5
Case 1
Debug GetAsyncKeyState_(#VK_CONTROL) & (1<<15)
Case 2
Debug GetAsyncKeyState_(#VK_RMENU) & (1<<15)
Case 3
Debug GetAsyncKeyState_(#VK_SHIFT) & (1<<15)
Case 4
Debug GetAsyncKeyState_(#VK_LMENU) & (1<<15)
Case 5
Debug GetAsyncKeyState_(#VK_MENU) & (1<<15)
EndSelect
Select event
Case #PB_Event_CloseWindow
quit=1
EndSelect
Until quit