Bug von OpenWindowedScreen?

[Sebastian]

Hallo, liebe Forengemeinde!
Ich habe folgenden Quelltext geschrieben. Wenn ich den starte, dann läuft das Programm ganz normal. dann sehe ich unten in der Taskleiste, dass ein neues Fenster mit dem Namen "Main Window" erscheint. Wenn ich nun auf den Screen klicke, dann stürzt das Programm ab. Das Fenster bleibt, ich muss es schließen und erhalte die Meldung, dass die Anwendug keine Rückmeldung mehr gebe. Was läuft hier falsch?

Code: Alles auswählen

InitSprite()
InitKeyboard()
InitMouse()

OpenWindow(0,20,20,800,600,"Main Window")
OpenWindowedScreen(WindowID(0),0,0,800,600,0,0,0)

TransparentSpriteColor(#PB_Default,$ff00ff)
LoadSprite(1,"./pointer.bmp")

Repeat
  ClearScreen($ff00ff)

  
  DisplayTransparentSprite(1,MouseX(),MouseY())

  ExamineMouse()
  ExamineKeyboard()
  FlipBuffers()
Until KeyboardPushed(#PB_Key_Escape)

[Macros]

Das Windowevent() reinpacken,
sonst denkt Win, dein Fenster wäre abgestürtzt.

[Kiffi]

> Was läuft hier falsch?

läuft hier (W2K) ohne Probleme.

Was gibt denn LoadSprite als Ergebnis zurück?

Code: Alles auswählen

ReturnValue = LoadSprite(1,"./pointer.bmp") 
Debug ReturnValue

Grüße ... Kiffi

[Sebastian]

@ kiffi: eine 7stellige Zahl, ich sehe ja auch den pointer und auch den pinken hintergrund, aber leider geschieht, sobald ich links klicke der Absturz. Warum bloß. Solange ich die linke Maustaste nicht abfrage, sollte doch eigenltich nichts passieren und das Programm läuft wunderbar weiter, solange ich nicht klicke.

[#NULL]

Das Windowevent() reinpacken,
sonst denkt Win, dein Fenster wäre abgestürtzt.

[Sebastian]

Tatsächlich. Mit Windowevent() hat es funktioniert. Vielen Dank!