No se porque me parece que utilizando
FormaFloat acabaría el problema, te pongo un ejemplo a ver si te sirve.
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
x:Integer;
begin
x:=133;
Edit1.Text:=FormatFloat(',0.00',x);
end;
procedure TForm1.Button2Click(Sender: TObject);
var
x1: Double;
begin
x1:=1988.343;
Edit1.Text:=FormatFloat(',0.00',x1);
end;
Un Saludo.