au secour. svp. svp. variable dans nom$ !!!!

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
david
Messages : 208
Inscription : jeu. 03/févr./2005 21:10

au secour. svp. svp. variable dans nom$ !!!!

Message par david »

dans le prog, j'ai mis:
StringGadget ( #String_0 , 10, 60, 40, 40, textb$)

en fait, textb$ est l'affichage du resultat de :
a=a+1 text$='valeur de a' a afficher en tant que texte

le probleme c'est que je ne peut pas melanger un numerique (a) et une variable (text$) alors que dans ma ligne de prog je n'arrive pas a mettre autre chose qu'un xxxx$.


svp aidez un hyper débutant!!!! svp merci
Heis Spiter
Messages : 1092
Inscription : mer. 28/janv./2004 16:22
Localisation : 76
Contact :

Message par Heis Spiter »

Tu peux te calmer tu sais ! 8O

Il te suffira de lire la doc et (Ô miracle), tu y trouveras ta réponse inscrite.
Heis Spiter, webmaster du site http://www.heisspiter.net
Développeur principal et administrateur du projet Bird Chat
Parti courir au bonheur du dév. public et GPL :D
comtois
Messages : 5186
Inscription : mer. 21/janv./2004 17:48
Contact :

Message par comtois »

Code : Tout sélectionner

a=a+1 
text$=Str(a)
http://purebasic.developpez.com/
Je ne réponds à aucune question technique en PV, utilisez le forum, il est fait pour ça, et la réponse peut profiter à tous.
brossden
Messages : 833
Inscription : lun. 26/janv./2004 14:37

Message par brossden »

Attention, si tu as des decimales de bien utlisé, StrF pour gérer ces mêmes décimales !

Code : Tout sélectionner

If OpenWindow(0, 349, 88, 216, 57,  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar , "Chaine Numérique")
  If CreateGadgetList(WindowID())
    StringGadget(1, 2, 10, 120, 20, "0.00")
    ButtonGadget(2, 130, 10, 80, 20, "+ 0.55")
  EndIf
EndIf
Repeat 
  Event = WaitWindowEvent()
  WindowID = EventWindowID()
  GadgetID = EventGadgetID()
  If Event = #PB_EventGadget
    If GadgetID = 2
      A.f + 0.55
      SetGadgetText(1,"Nouvelle Valeur = " + StrF(A,2))
    EndIf
  EndIf
Until Event = #PB_Event_CloseWindow 
End
Denis

Bonne Jounée à tous
Répondre