petite question sur les procedures
-
- Messages : 1501
- Inscription : dim. 18/avr./2004 15:04
- Localisation : sud de la france
petite question sur les procedures
bonjour
je voudrais juste savoir
a quoi sert par exemple
Procedure.b
a quoi sert le .b ?
merci
je voudrais juste savoir
a quoi sert par exemple
Procedure.b
a quoi sert le .b ?
merci
Jbernard13
-
- Messages : 4312
- Inscription : mer. 28/janv./2004 20:58
- Localisation : Clermont ferrand OU Olsztyn
- Contact :
cela dépend du frmat de la valeur que doit renvoyer la procedure avec la fonction procedurereturn
pour renvoyer un texte par exemple, on va faire comme ça :
pour renvoyer un texte par exemple, on va faire comme ça :
Code : Tout sélectionner
Procedure.s Truc()
Texte.s = "Machin bidule"
ProcedureReturn Texte
EndProcedure
Debug Truc()
Je ne suis pas à moitié Polonais mais ma moitié est polonaise ... Vous avez suivi ?
[Intel quad core Q9400 2.66mhz, ATI 4870, 4Go Ram, XP (x86) / 7 (x64)]
[Intel quad core Q9400 2.66mhz, ATI 4870, 4Go Ram, XP (x86) / 7 (x64)]
-
- Messages : 1092
- Inscription : mer. 28/janv./2004 16:22
- Localisation : 76
- Contact :
Je completerais l'exemple en disant : Si tu fais cela par exempleLe Soldat Inconnu a écrit :cela dépend du frmat de la valeur que doit renvoyer la procedure avec la fonction procedurereturn
pour renvoyer un texte par exemple, on va faire comme ça :
Code : Tout sélectionner
Procedure.s Truc() Texte.s = "Machin bidule" ProcedureReturn Texte EndProcedure Debug Truc()
Code : Tout sélectionner
Procedure Truc()
Texte.s = "Machin bidule"
ProcedureReturn Texte
EndProcedure
Debug Truc()
Comme tu m'a l'air bien débutant, je précise que
Code : Tout sélectionner
Procedure.s Truc()
Texte$ = "Machin bidule"
ProcedureReturn Texte$
EndProcedure
Debug Truc()

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éveloppeur principal et administrateur du projet Bird Chat
Parti courir au bonheur du dév. public et GPL

-
- Messages : 1501
- Inscription : dim. 18/avr./2004 15:04
- Localisation : sud de la france
Oui et surtout la première des choses à savoir, c'est apprendre à lire l'aide.
Car prit dans la doc à Procedure :
Une procédure peut avoir une valeur de retour si nécessaire. Il faut en définir le type après 'Procedure' et utiliser le mot clef ProcedureReturn à tout moment opportun dans la procédure.
Exemple :
Voila un copié collé tel quel, je trouve que la doc est tout de même très bien faite et tu pourrais faire un effort de lecture et réserver pour le forum des question hors doc au moins, surtout vu la fréquence des questions.
JL
Car prit dans la doc à Procedure :
Une procédure peut avoir une valeur de retour si nécessaire. Il faut en définir le type après 'Procedure' et utiliser le mot clef ProcedureReturn à tout moment opportun dans la procédure.
Exemple :
Code : Tout sélectionner
Procedure.l Maximum(nb1.l, nb2.l)
If nb1>nb2
Resultat.l = nb1
Else
Resultat = nb2
Endif
ProcedureReturn Resultat
EndProcedure
Resultat.l = Maximum(15,30)
PrintNumberN(Resultat)
End
JL
Quand on me gonfle trop j'éclate, sinon ça va !
J'avais oublié !
Pour les types, facile, doc pure basic :
Onglet sommaire - Manuel, à droite Variables et types, résultat :
Byte .b 1 octet en mémoire -128 à +127
Word .w 2 octets en mémoire -32768 à +32767
Long .l 4 octets en mémoire -2147483648 à +2147483647
Float .f 4 octets en mémoire illimité (voir informations plus bas)
String .s longueur de la chaine + 1 illimité
Alors un petit effort.
JL
Pour les types, facile, doc pure basic :
Onglet sommaire - Manuel, à droite Variables et types, résultat :
Byte .b 1 octet en mémoire -128 à +127
Word .w 2 octets en mémoire -32768 à +32767
Long .l 4 octets en mémoire -2147483648 à +2147483647
Float .f 4 octets en mémoire illimité (voir informations plus bas)
String .s longueur de la chaine + 1 illimité
Alors un petit effort.
JL
Quand on me gonfle trop j'éclate, sinon ça va !