Another thing that should work just fine as well would be to leave it with
my fix as was implemented in the 36Df sub-release and comment out just one
single line of code that I forgot about which isn't necessary and is most
likely responsible for the performance hit.

constructor TIB_Component.Create( AOwner: TComponent );
begin
FHasNilAncestry := ( not Assigned( AOwner )) or
(( AOwner is TIB_Component ) and
( AOwner as TIB_Component ).FHasNilAncestry );
inherited Create( AOwner );
// Comment out this line of code.
// CheckSession( false );
end;

I would really appreciate those of you who have applied the new sub-release
and noticed this slow down to try commenting out this line and tell me if it
speeds things up. I'm sure that it will but I would also like to know if
there are any other problems that result. I ran through a bunch of my apps
testing it and it does indeed seem to be unnecessary to do this call to
CheckSession.

Please confirm ASAP.

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

----- Original Message -----
From: "Jason Wharton" <jwharton@...>
To: <IBObjects@yahoogroups.com>
Sent: Wednesday, May 16, 2001 10:53 AM
Subject: Re: [IBO] Re: New sub-release posted to all areas


> What is happening is it is checking through all components on the form for
a
> reference to a session and I have some recursive logic that is being
overly
> aggressive about looking things over.
>
> Simply put, I need to rethink a couple of things on this.
> For now, you can revert the code back to its original state and keep the
> other bug fixes by applying this change to the source of
IBA_Component.IMP.
>
> function GrabSession( ACmp: TComponent ): boolean;
> begin
> if ACmp is TIB_Session then
> tmpSession := TIB_Session( ACmp )
> else
> if ( ACmp <> Self ) and
> ( ACmp is TIB_Component ) then
> begin
> // Revert back for now.
> tmpSession := TIB_Component( ACmp ).IB_Session;
> end;
> Result := Assigned( tmpSession );
> end;
>
> It's quite near the top in the CheckSession method.
>
> Sorry about this.
>
> Jason Wharton
> CPS - Mesa AZ
> http://www.ibobjects.com
>
>
> ----- Original Message -----
> From: "D.F." <delphi@...>
> To: "Sergey Kanovka" <IBObjects@yahoogroups.com>
> Sent: Wednesday, May 16, 2001 8:35 AM
> Subject: Re: [IBO] Re: New sub-release posted to all areas
>
>
> > The same....Think to rollback to De...
> >
> > D.
> >
> >
> > > --- In IBObjects@y..., "Jason Wharton" <jwharton@i...> wrote:
> > >> 5/16/2001 Sub-Release 3.6 Df
> >
> > > I installed 3.6 Df and after that all forms that contain queries open
> terribly slow (30-40 sec instead of 3-4). Also I noticed almost 100%
> processor work when I open form. I rolled back to 3.6 De
> > > and problem disappears. Does anyone experience same problem?
> >
> > > Thanks
> > > Serge
> >
> >
> >
> >
> > > Your use of Yahoo! Groups is subject to
> http://docs.yahoo.com/info/terms/
> >
> >
> >
> >
> >
> > Your use of Yahoo! Groups is subject to
http://docs.yahoo.com/info/terms/
> >
> >
>
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>