TDBEdit float format

Hi!

My problem is the following. I have a *.dbf file with float fields defined. All of them are of certain precision and I see it in the Database Desktop.
I need to format the TDBEdit components connected to the table so that they display trailing zeros. For example, if the precision of the field is 4 and the field contains 1.23, I need 1.2300 to be displayed.

How can I do that? I tried setting up the EditMask for the Table fields, but there are the following problems:
- The mask works only when the field is being edited and I need it to be always displayed with trailing zeros
- I cannot figure out the precision of the field run-time, it always equals 0. Why?

Any help is very much appreciated. Thanks in advance!
LVL 4
vk33Asked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
DarkCore_Connect With a Mentor Commented:
Have you used "DisplayFormat" property for this field?
0
 
vk33Author Commented:
Where's that property? I haven't found it in the TField class definition.
0
 
kretzschmarConnect With a Mentor Commented:
if u are not using persistent fields, then you can set it at runtime as follows
(best in the afteropen event)

TFloatField(Dataset.FieldByName('FloatFieldNameHere')).DisplayFormat := '#0.00';

meikl ;-)
0
Upgrade your Question Security!

Your question, your audience. Choose who sees your identity—and your question—with question security.

 
DarkCore_Commented:
Are you using fields definitons at design time? if true, then is in object inspector, in any other case, you can use meikl trick when opening your Dataset.

Edu
0
 
vk33Author Commented:
Aha, yes, I didn't try casting to specific field types. Thanks!

But still there's the problem remaining - I cannot get the field precision. When I do something like that:

       Precision := TFloatField(Table.Fields.FindField('smth')).Precision

it returns default precision value (15), not the one specified in the dbf-header. How can I deal with that?

If you consider this an off-topic, I can rate this post and open another one, or just raise the points.
0
 
DarkCore_Commented:
maybe is problem of the default format for floats, controlled by locale settings.
0
 
MolandoCommented:
use the above to format, to get the precision look at:
table1.FieldDefs.Items[1].Precision;

Fielddefs are the definitions of the fields.
Precision specifies the number of digits of accuracy used to store the field value.
0
 
MolandoCommented:
If the above gives you the wrong value, look at table1.FieldDefs.Items[1].size;
0
 
vk33Author Commented:
Both table1.FieldDefs.Items[0].Precision and table1.FieldDefs.Items[0].size return 0.

How should I generally obtain the meta-infomration about the table fields?

Just have a try, you create a simple table with one float column using Database Desktop, specify the size and precision values for this column. Next you launch Delphi, put the TTable component, connect it to the dbf-file previously created, activate the table and see the FieldDefs. I think there's something wrong here, it doesn't display the real size and precision values. And it's the same when you consult the property runtime. :/
0
 
vk33Author Commented:
Ok, I guess it's better to start another topic.

Thanks for the help!
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.