How to Format a DBGrid Column to Display Two Decimal Places?

Question

I would like to format specific cells to force two decimal places. The data is coming from an ElevateDB stored procedure and hooked into a TDataSource.

EDIT: SQL Programming Note:

I wasn't sure if this was just an ElevateDB issue or not. Before knowing about the Fields Editor, I attempted to format the data at the SQL level by using a CAST (NumericField as varchar(10)) statement inside the stored procedure. By doing so, it did not expose the DisplayFormat property inside the fields editor for this particular field.

When I removed the CAST() statement from the stored procedure, the DisplayFormat property showed up in the Fields Editor.

Only numeric fields expose a DisplayFormat property - there is no use for it in string fields. — Uwe Raabe, Apr 23 '12 at 06:51

Uwe Raabe · Accepted Answer · 2012-04-22T20:50:51.613

9

You can format the DBGrid columns by formatting the underlying fields. If not done, create static fields in your dataset and then set the DisplayFormat property of the field in question to 0.00 and you are done.

edited Apr 22 '12 at 20:50

answered Apr 22 '12 at 20:35

Uwe Raabe

39,888
3
77
115

How do you create "Static Fields"? How do you set the DisplayFormat? – Michael Riley - AKA Gunny Apr 22 '12 at 21:14
Use the [fields editor](http://docwiki.embarcadero.com/RADStudio/en/Fields_Editor) to create static (also called persistent) fields. Each field has a property DisplayName. – Uwe Raabe Apr 22 '12 at 21:35
I "Right-Clicked" and found the "Fields Editor". However... there is no DisplayFormat. I am so frustrated with Delphi right now I could spit. – Michael Riley - AKA Gunny Apr 22 '12 at 22:27
Once inside the fields editor, right-click and select 'Add All Fields', then click on the field you want, and in the object inspector you should see the displayformat property, and set to ###.00 – John Easley Apr 22 '12 at 22:40
Thanks for your patience... please read edit to OP. – Michael Riley - AKA Gunny Apr 22 '12 at 23:08

score 9 · Answer 2 · answered Apr 22 '12 at 20:55

9

I use same method as Uwe answered, in code after opening the dataset just add this line of code to format certian column:

  TFloatField(MyDs.FieldByName('Cost')).DisplayFormat := '0.00';

answered Apr 22 '12 at 20:55

Mohammed Nasman

10,782
7
41
67

score 2 · Answer 3 · answered Apr 23 '12 at 10:37

You can format the field using the DrawDataCell event.

procedure TFormMain.DBGridCompareDrawDataCell(Sender: TObject;
  const Rect: TRect; Field: TField; State: TGridDrawState);
begin
  if Field.Name = 'FIELDNAME' then
    TFloatField(Field).DisplayFormat := '#,##0.00';
end;

How to Format a DBGrid Column to Display Two Decimal Places?

3 Answers3

Linked