Fonctionss en delphi 7

Bonjour,

Je développe un projet en delphi et je voudrais savoir la fonction delphi qui renvoie ou donne le nombre de chiffres après la virgule d'un nombre décimal?
Merci pour votre réaction rapide.

1 réponse

  • Votes
  • Date
  • Date décroissante
  1. Salut bokulaka
    Si tu veux savoir le nb de chiffres présent après une virgule

    Function NbChifApreVirgule(f: Extended): String;
    var l: string;
    begin
    l:= FloatToStr(frac(f));
    Result:= FloatToStr(Length(l)-2);
    end;
    //Exemple: showmessage(NbChifApreVirgule(123.5643)); //Sortie 4