Page 1 sur 1

gros problemes!

Publié : lun. 24/oct./2005 13:37
par 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    

Publié : lun. 24/oct./2005 13:45
par 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    

Publié : lun. 24/oct./2005 13:50
par gadjet35
oui merci tu me sauve la vie!!!

Publié : lun. 24/oct./2005 13:51
par Chris
J'ai oublié:
Sous le ResizeGadget(), il faut mettre

Code : Tout sélectionner

SetGadgetState(4, Image)

pouquoi?

Publié : lun. 24/oct./2005 14:01
par gadjet35
pourquoi faut-il insérer setgadgetstate car ca marche sans et je ne comprend pas pourquoi changer son etat.

Publié : lun. 24/oct./2005 14:02
par gadjet35
pardon je me suis tromper a setgadgetstate car j'ai ecrit trop vite

Publié : lun. 24/oct./2005 14:03
par 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

Publié : lun. 24/oct./2005 14:10
par 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().

Image