Discussion :

[pataluc]

Re - Bonjour,
je voudrais pouvoir forcer l'affichage des dizaines, a savoir que mon inttostr(i) si i=5 me rende 05 et non 5, comment faire sans passer par un test fastidieux????

Merci
LUC

[Frederic]

Moi je ferais une fontion pour aller plus vite...

Code :

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

1
2
3
4
5
6
7
8
function IntToChaine(I, NbCaracteres: Integer): String;
var S: String;
begin
  S:=IntToStr(I);
  While Length&#40;S&#41;<NbCaracteres do
    S&#58;='0'+S;
  Result&#58;=S;
end;

Frederic

[Ctrl+F2]

En utilisant la fonction FormatFloat

Code :

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

1
2
3
// Exemple :
ShowMessage(FormatFloat('00', 5));
// affichera '05'

[pataluc]

Ok merci,
j'étais parti sur un truc comme a dit Fred, et finallement le formatfloat me plait bien... :o)

@plus

LUC

[Frederic]

Eh ouais... y'en a qui vont encore se dire... CA SERT A RIEN DE REINVENTER LA ROUE. .. Mais moi je suis pas d'accord... Pour les debutants, reprogrammer quelques fonctions ne fait pas de mal...

Frederic