procedure TForm1.FormCreate(Sender: TObject); begin (DBEdit2.Field as TNumericField).DisplayFormat:= '#.00'; end;