OpenWindowedScreen

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
bombseb
Messages : 445
Inscription : jeu. 25/août/2005 22:59
Localisation : 974
Contact :

OpenWindowedScreen

Message par bombseb »

Bonjour, j'essaye d'ouvrir un écran fenétré mais apparement il n'y arrive pas... je ne comprends pas pourquoi...

Code : Tout sélectionner

If InitSprite () = 0
   MessageRequester ("Erreur", "Impossible d'initialiser directx", #PB_MessageRequester_Ok)
   End
EndIf


If OpenWindowedScreen(0, 100, 100, 64, 48, 1, 0, 0) = 0
   MessageRequester ("Erreur", "Impossible d'ouvrir l'écran", #PB_MessageRequester_Ok)
   End
EndIf

Repeat
  ExamineKeyboard()
Until KeyboardPushed(#PB_Key_Escape)

End
lionel_om
Messages : 1500
Inscription : jeu. 25/mars/2004 11:23
Localisation : Sophia Antipolis (Nice)
Contact :

Message par lionel_om »

Faut passer par un OpenWindow()

Code : Tout sélectionner

#WindowWidth    = 400
#WindowHeight   = 300

hWnd = OpenWindow(0, 0, 0, #WindowWidth, #WindowHeight, #PB_Window_BorderLess | #PB_Window_Invisible | #PB_Window_ScreenCentered, "Test") 
If hWnd = 0
  OpenWindowedScreen(hWnd, 0, 0, #WindowWidth, #WindowHeight, 1, 0, 0)
  MessageRequester ("Erreur", "Impossible d'ouvrir l'écran", #PB_MessageRequester_Ok)
  End
EndIf
Webmestre de Basic-univers
Participez à son extension: ajouter vos programmes et partagez vos codes !
bombseb
Messages : 445
Inscription : jeu. 25/août/2005 22:59
Localisation : 974
Contact :

Message par bombseb »

ok merci ca marche...
Répondre