Discussion :

[@tom@]

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..."]

[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...

[olymat]

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 :

appelons cette fonction strg
voici son code source :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 !

[olymat]

un smilies a mal glissé dans le code de strg

n'insère pas : wink :

[Eric Sigoillot]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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+

[@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>...

[Giovanny Temgoua]

J'ai confondu de fonction

[olymat]

ca arrive

[M.Dlb]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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....