hat schon jemand OpenScreen mit Win 7 probiert?
Ich hab' da ein kleines Tool mit OpenScreen, das auf Xp einwandfrei funktioniert.
Auf Win7 funktioniert es zwar, aber es kommt folgende Information:
Hat jemand schon ähnliche Erfahrungen gemacht?
thx
yo, das bedeutet auch, nicht siebenunddreißigtausend Ausrufezeichen zu machen.dllfreak2001 hat geschrieben:Bleibt´s doch ruhig!
Code: Alles auswählen
If InitSprite() = 0 Or InitKeyboard() = 0 Or InitMouse() = 0
MessageRequester("Error", "Can't open the sprite system", 0)
End
EndIf
If OpenWindow(0, 0, 0, 340, 285, "Gadget and sprites!", #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_ScreenCentered)
If OpenWindowedScreen(WindowID(0), 10, 70, 320, 200, 0, 0, 0)
If StartDrawing(ScreenOutput())
DrawingMode(#PB_2DDrawing_Outlined)
Box(18,18,404,404,RGB(0,0,255))
StopDrawing()
EndIf
EndIf
EndIf
MessageRequester("", "")
If OpenWindow(0, 0, 0, 340, 285, "Gadget and sprites!", #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_ScreenCentered)
If OpenWindowedScreen(WindowID(0), 10, 70, 320, 200, 0, 0, 0)
If StartDrawing(ScreenOutput())
DrawingMode(#PB_2DDrawing_Outlined)
Box(18,18,404,404,RGB(0,0,255))
StopDrawing()
EndIf
EndIf
EndIf
Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow