I see that you are using TIB_Query. For some reason I thought you were using
the TDataset based one. Let me take this from here and I will see about
isolating and resolving this issue.

Thanks,
Jason Wharton
CPS - Mesa AZ
http://www.ibobjects.com

----- Original Message -----
From: <jocelyndionne@...>
To: <IBObjects@yahoogroups.com>
Sent: Tuesday, February 06, 2001 12:00 PM
Subject: [IBO] Re: Problem in TIB_Query and currency...


> Hello Jason.
>
> If I use TIBOQuery, I don't have this problem, small numbers or big
> ones. So, I think it's not the problem. Maybe I don't understand
> what you mean.
>
> Do you think about some actions that I can take to solve the problem?
>
> From now on, I don't specify any field 'currency', and I use the
> OnGetDisplayText event to format the numbers. But, I find it very
> annoying.
>
>
> Jocelyn Dionne.
>
>
>
> --- In IBObjects@y..., "Jason Wharton" <jwharton@i...> wrote:
> > I believe with flagging a column as currency it will use the curr
> datatype
> > which uses 4 decimal places. This might be limiting the upper range
> of
> > dollars that the column can extend to.
> >
> > Just a thought.
> >
> > Jason Wharton
> > CPS - Mesa AZ
> > http://www.ibobjects.com
> >
> >
> > ----- Original Message -----
> > From: <jocelyndionne@u...>
> > To: <IBObjects@y...>
> > Sent: Tuesday, February 06, 2001 8:28 AM
> > Subject: [IBO] Re: Problem in TIB_Query and currency...
> >
> >
> > > Hello Jason.
> > >
> > > It's very simple to recreate the problem.
> > > It's obvious that you know how to do what I will explain here,
> but I
> > > do it just to be sure that you are aware of the exact steps that I
> > > did to get the problem.
> > >
> > >
> > > In Interbase:
> > >
> > > 1) create a table (table1) with three fields:
> > > a) field1 integer
> > > b) field2 varchar(50)
> > > c) field3 double precision
> > > 2) insert some rows in the table
> > > 3) enter big number like 25,123,987.34 in field3
> > >
> > >
> > > In Delphi:
> > > 1) put a tib_connection,tib_query and a tib_datasource on a form
> > > 2) I assume that you define the connection
> > > 3) double-click on the tib_query component to bring the editor
> > > 4) select * from table1 for update
> > > 5) prepare it
> > > 6) in column attributes tab, select field3 and click on currency
> > > check box
> > > 7) put a grid on the form, attach it to the datasource that you
> > > defined
> > > 8) run the program
> > >
> > > The form shows on my screen with the grid and in field3, I see,
> for
> > > example, 2512.3987. If I go back to the column attributes and
> > > deselect the currency checkbox, I see 25123987.34 which is the
> exact
> > > number that I entered in field3.
> > >
> > >
> > > I have to tell you that I put some breakpoints in your code (in
> > > IBA_Column.imp) in the TIB_Column.GetDisplayText function and I
> saw
> > > that IsCurrency is never true.
> > >
> > >
> > > I also tried with a numeric field and the behaviour is not exactly
> > > the same. If I create a field3 numeric, the result in the grid is
> > > rounded. I have to specify a large numeric field if I want it to
> > > show correctly. But with large numbers, the problem reappears.
> > >
> > >
> > > I hope this will help. I know you asked me for a little
> application,
> > > but, it is very simple to recreate the problem.
> > >
> > >
> > > Jocelyn Dionne.
> > >
> > >
> > >
> > >
> > > --- In IBObjects@y..., "Jason Wharton" <jwharton@i...> wrote:
> > > > Is it possible that you could put this in a simplified
> application
> > > for me to
> > > > look at?
> > > >
> > > > Thanks,
> > > > Jason Wharton
> > > > CPS - Mesa AZ
> > > > http://www.ibobjects.com
> > > >
> > > >
> > > > ----- Original Message -----
> > > > From: <jocelyndionne@u...>
> > > > To: <IBObjects@y...>
> > > > Sent: Monday, February 05, 2001 12:27 PM
> > > > Subject: [IBO] Re: Problem in TIB_Query and currency...
> > > >
> > > >
> > > > > Am I the only one who's having this problem???
> > > > >
> > > > > Nobody has an idea???
> > > > >
> > > > >
> > > > > Thanks.
> > > > >
> > > > > Jocelyn Dionne
> > > > >
> > > > >
> > > > >
> > > > > --- In IBObjects@y..., jocelyndionne@u... wrote:
> > > > > > There is something strange that happens when I specify that
> a
> > > field
> > > > > > is 'Currency' in TIB_Query.
> > > > > >
> > > > > > The field is defined 'Double precision' in the table.
> > > > > >
> > > > > > For example, if the field contains 25000000.000, it appears
> only
> > > > > > 2500.0000 in the grid and I don't see the dollar sign.
> > > > > >
> > > > > > If I don't specify 'Currency' and I enter a display format,
> > > it's OK.
> > > > > >
> > > > > > My regional settings are well defined.
> > > > > > I have some applications that use ADO and currency fields
> > > appear OK.
> > > > > >
> > > > > > Do you have any idea of what's happening?
> > > > > >
> > > > > > Specs:
> > > > > > Delphi 5 with the update pack
> > > > > > IB6
> > > > > > IBO 3.6cd
> > > > > >
> > > > > >
> > > > > > Thanks in advance.
> > > > > >
> > > > > > Jocelyn Dionne
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > >
> > >
> > >
> > >
> > >
>
>
>
>
>