gros problemes!

[gadjet35]

j'ai un probleme je voulai representer deux boites de text
et un bouton "ok" et un carre bleu. Dans les boites de text on inscrit
deux chiffres puis quand on appuie sur ok ils deviennent les
emplacements x, y et que le carre s'y trouve.
voici le code que j'utilise et il ne marche pas comment faire pour qu'il marche?

Code : Tout sélectionner

OpenWindow(0,0,0,500,500,#PB_Window_SystemMenu,"test")
  
  CreateGadgetList(WindowID(0))
   StringGadget(1,100,100,100,50,"")
   StringGadget(2,225,100,100,50,"")
   ButtonGadget(3,350,100,100,50,"OK")
    
 
    Repeat
    
      Select EventGadgetID()
       Case 3
        Val(x) = Val(GetGadgetText(1))
        Val(y) = Val(GetGadgetText(2))
      EndSelect
      
     If StartDrawing(WindowOutput())
         Box(x,y,50,50,RGB(0,0,250))  
        StopDrawing()
     EndIf  
      
     Until WaitWindowEvent()=#PB_Event_CloseWindow    

[Chris]

Pourquoi tu n'utilises pas un ImageGadget()?

Code : Tout sélectionner

;**** Ajouté
Image = CreateImage(0, 50, 50)
If StartDrawing(ImageOutput()) 
  Box(x,y,50,50,RGB(0,0,250))  
  StopDrawing() 
EndIf 
;***********

OpenWindow(0,0,0,500,500,#PB_Window_SystemMenu,"test") 

CreateGadgetList(WindowID(0)) 
StringGadget(1,100,100,100,50,"") 
StringGadget(2,225,100,100,50,"") 
ButtonGadget(3,350,100,100,50,"OK")

;*****Ajouté
ImageGadget(4, 0, 0, 0, 0, Image)
;*********

Repeat 
  
  Select EventGadgetID() 
    Case 3 
      x = Val(GetGadgetText(1)) 
      y = Val(GetGadgetText(2))
      
      ResizeGadget(4, x, y, -1, -1)
  EndSelect 
  
  ; If StartDrawing(WindowOutput()) 
  ; Box(x,y,50,50,RGB(0,0,250))  
  ; StopDrawing() 
  ; EndIf  
  
Until WaitWindowEvent()=#PB_Event_CloseWindow    

[gadjet35]

oui merci tu me sauve la vie!!!

[Chris]

J'ai oublié:
Sous le ResizeGadget(), il faut mettre

Code : Tout sélectionner

SetGadgetState(4, Image)

[gadjet35]

pourquoi faut-il insérer setgadgetstate car ca marche sans et je ne comprend pas pourquoi changer son etat.

[gadjet35]

pardon je me suis tromper a setgadgetstate car j'ai ecrit trop vite

[Dr. Dri]

quand t'as un problème, ne met pas comme titre "gros probleme" ou "j'y arrive pas" ou un truc dans le même genre...
essaye plutot de résumer ton problème

Dri

[Chris]

Si tu ne mets pas le SetGadgetState(), et que tu donnes 100 comme paramètres x et y, tu tombes en plein dans le StringGadget() et si tu tapes une nouvelle coordonnée, le ImageGagdet() va se déplacer, mais l'image affichera toujours ce qu'il y avait dans le StringGagdet().