[LG]Convertir le type double en string

Version imprimable

17/01/2004, 19h00
@tom@

[LG]Convertir le type double en string

Mor probleme peut se résumer de la manière suivante :

Je souhaite afficher en mode graphique des données calculées dont le type est double.

Cependant, outtext n'affiche que des "string".

Existe t il une fonction permet de convertir un double en string ?

Sinon quelle est la fonction qui permet l'affichage de données en mode graphique ?

Merci par avance ;=

[titre modifié par Sub0]
[ancien titre="Affichage de données en mode graphiques..."]
17/01/2004, 19h18
Giovanny Temgoua

Cherche l'aide sur la fonction val.

Tu convertis ton nombre en string et ensuite à l'aide de OutextXY l'afficher à l'écran...
17/01/2004, 21h01
olymat

facile :-)
mon petit doigt me dit que ce genre de petit problème a déjà été résolu dans le forum, mais bon

kaiser, désolé mais val ne résoud pas le problème, val converti les chaînes de "caractères numériques" en valeur numérique

@tom@, cherche plustôt à utiliser la procédure str ( I : integer ; S : string )

moi j'aime généralement créer une fonction très pratique qui rend le code moins lourd : :wink:

appelons cette fonction strg
voici son code source :
Code:

1 2 3 4 5 6 7 function strg (valeur:double) : string; var s:string; begin val(valeur,s); {conversion de la valeur de type double} :wink: strg:=s; end;
ensuite tu pourras utiliser cette fonction dans ton programme en tapant par exemple Outtext ( strg ( 548e-125 ) ) ;.

j'espère que j'ai fais d'une pierre 2 coups ! :)
17/01/2004, 21h10
olymat

oups

un smilies a mal glissé dans le code de strg

n'insère pas : wink :

Sauf que ta "super" fonction ne fait pas un truc : arrondir à un certain nombre de chiffres après la virgule.
Code:

1 2 3 4 5 6 7 8 9 10 11 12 var D: Double; S: string; W: Integer; begin D := 12.34; W := 2; { 2 chiffres après la virgule } Str(D:0:W, S); { La longueur est quelconque (0) avec (W) chiffres après la virgule } end;
A+

18/01/2004, 02h15
@tom@

Sauf que moi je veux pas arrondir à trois hiffres apres la virgule...

Sinon j'avoue que les réponses sont sympa, aller, 9 / 10 ^pur la rédaction et 10 / 10 pour le fond>... :lol:
18/01/2004, 11h44
Giovanny Temgoua

:? :twisted: J'ai confondu de fonction :x
18/01/2004, 18h47
olymat

rep

ca arrive :)

Code:

1
2
3
4
5
6
7
8
9
10
 
var 
  D: Double; 
  S: string; 
 
begin 
D := 12.34165465461465198465165161651984842513219876842311; 
 
Str(D:0, S);
end;

Faut tout leur faire à ces jeunes.... :lol: