Einzelnen Beitrag anzeigen

Satty67

Registriert seit: 24. Feb 2007
Ort: Baden
1.566 Beiträge
 
Delphi 2007 Professional
 
#3

Re: Ganzzahl mit Tausenderzeichen darstellen

  Alt 22. Mai 2009, 11:01
Also ich weis nicht wie es bei neueren Delphi-Versionen ist, aber bei D5 hab' ich keine passende Funktion gefunden. Forma() bietet das ja nur für reelle Zahlen an.

Hab' mir selber was gebastelt, vieleicht reicht das ja:
Delphi-Quellcode:
function IntToStrF(Int : Int64) : string;
var
  i : Integer;
begin
  Result := IntToStr(Int);
  i := Length(Result) -3;
  while i > 0 do begin
    Insert(ThousandSeparator, Result, i+1);
    dec(i,3);
  end;
end;
€: Funktions-Name geändert, damit es zu FloatToStrF passt.
  Mit Zitat antworten Zitat