| Subject | RE: [IBO] Re: TIBOQuery param AsFloat strange behaviour |
|---|---|
| Author | Jason Wharton |
| Post date | 2018-06-26T20:09:08Z |
Here is a patch that can be applied in
IB_Utils.pas
...
function VarSameValueEx( const A, B: variant ):
boolean;
function GetVarSame( const v1, v2: variant ):
boolean;
begin
Result := VarSameValue( v1, v2 );
if ( not Result ) then
begin
if ( VarType( v1 ) in [ varDouble, varSingle ] ) and
( not VarIsEmpty( v1 )) and
( not VarIsEmpty( v2 )) then
Result := FloatToStr( v1 ) = FloatToStr( v2 );
end;
end;
begin
Result := VarSameValue( v1, v2 );
if ( not Result ) then
begin
if ( VarType( v1 ) in [ varDouble, varSingle ] ) and
( not VarIsEmpty( v1 )) and
( not VarIsEmpty( v2 )) then
Result := FloatToStr( v1 ) = FloatToStr( v2 );
end;
end;
...
With
this new version of that routine, IBO will handle things
properly.
Thank
you for drawing my attention to this issue and to Carlos for helping put
together a simple app to demonstrate the problem.
Jason
Wharton
www.ibobjects.com
From: IBObjects@yahoogroups.com [mailto:IBObjects@yahoogroups.com]
Sent: Thursday, June 21, 2018 5:56 AM
To: Grupo IBOBjects
Subject: Re: [IBO] Re: TIBOQuery param AsFloat strange behaviour
Hello,
Please, can anyone help me. I bought the official version of IBO but the
version available for download has several problems. We already tried to contact
Jason but so far we have not gotten an answer. Could someone provide us with a
stable version of the IBO please. We are with an ongoing project that needs to
be urgently converted to Delphi XE and we are desperate. I do not know where
else to call for help. If necessary, we have the proof of payment of the
license.
2018-06-20 16:03 GMT-04:00 'GMS - Ulrich Hutter' ulrich@... [IBObjects] <IBObjects@yahoogroups.com>:
we also set the version back to 5.9.3...
br
mit besten Grüßen aus Salzburg
Ulrich HutterProgrammierung und Geschäftsführung
Original Message processed by david®
[IBO] Re: TIBOQuery param AsFloat strange behaviour 20. Juni 2018, 16:10 Uhr Von wsr@... [IBObjects] An IBObjects@yahoogroups.com Hi Jason,We just bought the IBO version 5.9.7 but really it has problem with AsFloat from 0 to null. This is impacting our project and hurting our team. Could you please provide a stable version of it?
Att.
Whanderson
S. Rodrigues
Engenheiro de Software / M.e em Agronegócio - UFGD
Softgran Informática Ltda.
Fone: (67) 3427-2040
Engenheiro de Software / M.e em Agronegócio - UFGD
Softgran Informática Ltda.
Fone: (67) 3427-2040