[ecfisa]

Empezado por Jose Manuel

...
Coste1 me aparece así 124256,1 y yo quiero 124.256,10

Hola Jose Manuel.

Código Delphi [-]
...
var
  ThSep, DeSep : Char;

procedure TForm1.FormCreate(Sender: TObject);
begin
  ...
  ThSep := ThousandSeparator;
  DeSep := DecimalSeparator;
  ThousandSeparator := '.';
  DecimalSeparator  := ',';
  TFloatField(DataSet.FieldByName('CALCULADO')).DisplayFormat := '0,0.00';
end;

...

procedure TForm1.FormDestroy(Sender: TObject);
begin
  ...
  ThousandSeparator := ThSep;
  DecimalSeparator  := DeSep;
end;

Donde: DataSet sería el componente que estes utilizando y CALCULADO el nombre de tu campo calculado

Saludos