Stringadget qui ne s'affiche pas convenablement.

[wolfjeremy]

Salut,

J'ai un stringadget qui me fait les 400 coups lol
Je m'explique, la fenêtre s'ouvre, les textgadget s'affiche bien, mais si je ne bouge pas la fenêtre et bien le stringgadget n'est pas visible (ou alors cliquer sur l'endroit où il se trouve).

voici une partie du code :

Les procedures d'ouvertures des fenêtres :

Procedure fenetre_principale()

If OpenWindow ( #fenetre_principale , 0, 0, 355, 90, #PB_Window_WindowCentered | #PB_Window_BorderLess | #WS_THICKFRAME , "RapidSend" )

AddSysTrayIcon (0, WindowID (), LoadImage ( #image_systray , "systray.ico" ))

SetWindowCallback (@WindowCallback())

CreateGadgetList ( WindowID ())

TextGadget ( #gadget_text_recepteur , 10, 10, 90, 17, "IP récepteur : " )
StringGadget ( #gadget_string_recepteur , 115, 10, 100, 17, "" )
;ButtonGadget(#gadget_bouton_listerecepteur, 225, 10, 60, 17, "Liste")
TextGadget ( #gadget_text_fichier , 10, 40, 90, 17, "Chemin du fichier :" )
StringGadget ( #gadget_string_fichier , 115, 40, 160, 17, "" )
ButtonImageGadget ( #gadget_bouton_parcourir , 285, 40, 70, 20, UseImage (bouton_parcourir))
ButtonImageGadget ( #gadget_bouton_envoyer , 147, 65, 75, 25, UseImage ( #image_b_envoyer ))
ButtonImageGadget ( #gadget_bouton_close , 332, 0, 23, 23, UseImage ( #image_b_close ))
ButtonImageGadget ( #gadget_bouton_help , 310, 0, 23, 23, UseImage ( #image_b_help ))

EndIf

EndProcedure

Procedure fenetre_preferences()

If OpenWindow ( #fenetre_preferences , 0, 0, 355, 90, #PB_Window_SystemMenu | #PB_Window_WindowCentered , "Préférences" )

CreateGadgetList ( WindowID ())
TextGadget ( #gadget_text_client , 127, 10, 100, 20, "Informations client" , #PB_Text_Center )
TextGadget ( #gadget_text_utilisateur , 10, 30, 95, 20, "Nom d'utilisateur :" )
StringGadget ( #gadget_string_utilisateur , 100, 30, 80, 20, "Utilisateur" )

EndIf

EndProcedure

L'ouverture de la fenêtre préférences :

If Event = #PB_Event_SysTray

If EventType () = #PB_EventType_RightClick

DisplayPopupMenu (0, WindowID ())

EndIf

EndIf

If event = #PB_Event_Menu

Select EventMenuID ()

Case 1
fenetre_preferences()

Case 2
End

EndSelect

EndIf

Pouvez vous me dire d'où vien le problème ?

Merci d'avance pour votre aide.

[wolfjeremy]

Personne ne sait repondre ?

Je voudrais savoir aussi, comment je peut savoir combien d'octets on déjà été envoyer avec la commande sendnetworkfile ? pour faire une barre de progression.

Merci d'avance pour votre aide.

P.S.: je repasserai peut etre demain soir mais rien de sur.

[nico]

Il y a plusieurs raisons pour qu'un gadget ne s'affiche pas correctement:

-il est mal positionné (par ex en dehors partiel ou total des limites de la fenêtre)

-un autre gadget est positionné par dessus lui

-l'id du gadget n'est pas unique , plusieurs gadgets se le partage

[wolfjeremy]

Ok merci bien (je vais reverifier ces point encore... c'est bizar car je suis sur de ne pas avoir fait de faute.. enfin bon c'est pas grave je vais encore regarder)