Delphi BCD Field incorrectly displayed if DisplayFormat contains the dot

Asked Jul 23 '12 at 12:28

Active Jul 23 '12 at 13:21

Viewed 1,269 times

I'm having a weird problem with an old project that's still being maintained with Delphi 7.

I have a TFMTBCDField component, representing Firebird Numeric Field (called GROSSPRICE). It's value gets calculated on the server side (by the Firebird SQL server). Due to a 27% tax rate the values are often like 4999.9999 that I'd like to display values rounded.

The strange thing is that if I set the DisplayFormat on that field to a value that has the dot inside (eg: '0.##') then 4999.9999 gets displayed as "5" (Should be either "5000" or "4999.99"). The same thing works with Currency fields as expected.

I have attached some images with examples as well. Do you know why is that happening, and (if possible) how to resolve it?

enter image description here

edited Jul 23 '12 at 13:21

LU RD

34,438
5
88
296

asked Jul 23 '12 at 12:28

Attila Fulop

6,861
2
44
50

Thanks for the tip. It results in '4!' (including the exclamation mark) – Attila Fulop Jul 23 '12 at 13:21
Yeah, neither I've seen such thing yet. However BCD's often have something to surprise with :) – Attila Fulop Jul 23 '12 at 19:55
Since the app is in maintenance mode, you could just use the OnGetText event handler of the field and format the text there... – John Easley Jul 23 '12 at 20:23
This might be related to (http://qc.embarcadero.com/wc/qcmain.aspx?d=2732). Do you have Delphi 7 update 1 installed? – Hendra Jul 24 '12 at 01:31

Delphi BCD Field incorrectly displayed if DisplayFormat contains the dot

0 Answers0