WindowedScreen() dans un ScrollAreraGadget() ?

[Oliv]

Est-ce possible ? Si oui comment ?

[comtois]

Apparemment oui avec un container .
J'ai repris le code de chris que j'ai modifié rapidement pour vérifier si ça pouvait fonctionner :

http://purebasic.hmt-forum.com/viewtopic.php?t=1177

Code : Tout sélectionner

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

Enumeration 
  #Panel 
  #Cont 
  #Button 
EndEnumeration 

;- 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, "") 
If CreateGadgetList(hwnd) 
  ScrollAreaGadget(#Panel,10, 10,300,300, 1024, 768, 30)
  hCont = ContainerGadget(#Cont,10,10,1024,768,#PB_Container_Double) 
  OpenWindowedScreen(hCont, 0, 0, 1024, 768, 0, 0, 0) 
  

EndIf 

If CreateSprite(1000,24,24) 
  StartDrawing(SpriteOutput(1000)) 
  Box(0,0,24,24,RGB($0,$0,$FF)) 
  StopDrawing() 
EndIf 

Dep = 8 

;- début de la boucle 

Repeat 
  Select WindowEvent() 
    
  EndSelect 
  
  FlipBuffers() : ClearScreen(0,0,0) 
  DisplaySprite(1000, x, 100) 
  
  x + Dep 
  If x >=536 Or x <=0 : Dep = -Dep : EndIf 
  
  ExamineKeyboard() 
Until KeyboardPushed(#PB_Key_Escape) 

[Oliv]

Merci
Je suis désolé je n'avais pas vu le post de Chris dans ma recherche

[comtois]

c'est un peu normal que ta recherche ne soit pas tombée sur ce post , il ne parle pas de scrollareagadget

[Oliv]

voui mais bon, j'ai aussi cherché juste avec OpenWindowedScreen() et j'ai passé ton post, enfin merci