Subject Re: [IBO] TIBOQuery invalid properties stored in DFM
Author Jason Wharton
Ok, I see where this has a problem now.

Please try this and see if it works and confirm ASAP.

function TIB_Statement.IsTransactionStored: boolean;
Result := Assigned( IB_Transaction ) and
( IB_Transaction <> FIB_Transaction );
if Result and Assigned( IB_Connection ) then
Result := IB_Transaction <> IB_Connection.DefaultTransaction;

This code is in IBA_Statement.IMP.

Jason Wharton
CPS - Mesa AZ

----- Original Message -----
From: "G. Allen Casteran" <allen@...>
To: <>
Sent: Tuesday, November 13, 2001 2:22 PM
Subject: [IBO] TIBOQuery invalid properties stored in DFM

> Came across this yesterday and it looks like a bug to me. If I have
> aTIBODatabase on the main form of an application and add a TIBOQuery to a
> datamodule, then IB_Connection and IB_Transaction properties show up as
> <default> in the Obj Insp. When I try to save the DM after copying to a
> filename, Delphi reports that the for xxxDataModule is linked to form
> Database, do I want to remove or redirect the links.
> Looking at the DFM it has these properties set for the Query.
> IB_Connection = MainForm.Database
> IB_Transaction = Database.trDatabase
> Then Delphi thinks that Database is a form or something. Since these are
> shown as default in the Obj Insp. I did not expect these properties to
> appear in the dfm. I would expect the object to merely assign them when
> the object is instantiated at run-time.
> Can this be fixed, Jason?
> Thanks,
> Allen.