Discussion :

[mickael.be]

Salut,

Je suis un petit débutant en Delphi, et j'aimerais avoir vos conseils.

J'ai une valeur temps en millisecondes.

exemple : 21452 pour 21 secondes, 452 dixièmes.

Il me faudrait convertir cette chaine en 21,4

Quelle méthode est la plus sure, et ne bugera pas quand on sera à plus de 99 secondes..

Merci !

[tourlourou]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
var
 s: string;
 i: integer;
 r: extended;
begin
 s:='21452'; // chaîne de départ
 i:=StrToIntDef(s, 0); // conversion en nombre de millisecondes
 r:=i/1000; // passage en nombre de secondes
// r:=i/100;
// r:=Ceil(r)/10; // ou Floor ou Round, pour gérer les arrondis  
 s:=FloatToStrF(r, ffFixed, 5, 1); // devrait afficher '21.4'
end;

si je ne me suis pas trompé, mais dans ce cas, un petit coup de F1, et hop...

[mickael.be]

Merci :-)

J'ai appris une nouvelle fonction comme ça
FloatToStrF :-)