2 stellen hinterm komma

[ichbins]

format... ... Hab ich eigentlich auch noch nicht so ganz verstanden...

aber ich versuchs mal anderst:

Delphi-Quellcode:

function myfloattostr(float:extended;minvorkommastellen,nachkommastellen:integer):string;
var
  i:integer;
  rest:extended;
begin
  result:=inttostr(trunc(float));
  rest:=(float-trunc(float))*10;
  for i:=length(result) to minvorkommastellen do
    result:='0'+result;
  if nachkommastellen=0 then exit;
  result:=result+',';
  for i:=1 to nachkommastellen-1 do
  begin
    result:=result+inttostr(trunc(rest));
    rest:=(rest-trunc(rest))*10;
  end;
  result:=result+inttostr(round(rest));
end;

[edit] beitrag bearbeitet, hatte mich vertippt. jetzt getestet. funzt super. Beispiel: myfloattostr(123.456789,5,3) -> '00123,457' [/edit]