Screen im Window

[man-in-black]

Moin,

man kann ja im Fenster(Window) einen Screen öffnen.
Aber bei mir muss ich die Maus immer bewegen, wenn, wie in diesem Fall, eine Box zu bewegen ist. Kann mir da einer helfen?

Code: Alles auswählen

InitSprite()
InitKeyboard()
OpenWindow(1,200,200,400,400,#PB_Window_MinimizeGadget,"gfg")
OpenWindowedScreen(WindowID(),0,0,400,400,1,0,-50)
Repeat 
FlipBuffers()
ClearScreen(0,0,200)  
StartDrawing(ScreenOutput())
Box(X,Y,20,20,255)
StopDrawing()
ExamineKeyboard()
    If KeyboardPushed(#PB_Key_Left)
      X-6
    EndIf
    If KeyboardPushed(#PB_Key_Right)
      X+6
    EndIf
    If KeyboardPushed(#PB_Key_Up)
      Y-6
    EndIf  
    If KeyboardPushed(#PB_Key_Down)
      Y+6
    EndIf
Until WaitWindowEvent() = #PB_Event_CloseWindow

man-in-black

[Kaeru Gaman]

weil du WaitWindowEvent() ohne argument verwendest, also wartet er immer solange, bis ein event stattfindet.

wenn du PB4.0 hast, (schreibs mal in deine signatur), kannst du bei WaitWindowEvent() eine maximale wartezeit angeben.