OpenWindowedScreen(WindowID(), 0, 0, 640, 480, 1, 0, 0)

[Heis Spiter]

Bon, tout est dans le titre ou prseque : Je n'arrive pas a faire fonctionner ceci : Le compilateur n'en veut pas ! Je vais finir par le .
Voila ! Ma vie est entre vos mains

[Chris]

Salut

Tu as ouvert une fenêtre, avant ???

Code : Tout sélectionner

#Window = 0
#Width = 600
#Height = 600
#Timer = 0

;- Initialisation de DirectX
If InitSprite() = 0 Or InitKeyboard() = 0 Or InitMouse() = 0
  MessageRequester("Erreur", "Impossible d'initialiser DirectX", 0)
  CloseWindow(#Window) : End
EndIf


;- Ouverture de la fenêtre et de l'écran
hWnd = OpenWindow(#Window, 0, 0, #Width, #Height, #PB_Window_TitleBar | #PB_Window_ScreenCentered, "")
OpenWindowedScreen(hWnd, 0, 0, 600, 600, 0, 0, 0)


;- Lancement du Timer, et début de la boucle
Timer = SetTimer_(hWnd, #Timer, 1, 0)
Repeat
  ClearScreen(0, 0, 0) : ExamineKeyboard()
  
  Select WindowEvent()
    Case #WM_TIMER

  EndSelect
  
  FlipBuffers()
  If KeyboardPushed(#PB_Key_Escape) : quit = 1 : EndIf
Until quit = 1

Chris

[Heis Spiter]

ah d'accord Bon, tu n'as pas épargné ma vie