[[basti]]

Faltaban los corchetes...

Código Delphi [-]
procedure TForm1.DBEdit1Exit(Sender: TObject);
begin
  Edit1.Text := format('%n', [StrToFloat(Edit1.Text)]);
end;