🚀 go-pugleaf

You can't mix BDE (TQuery) and ADO like that.

Use a TADOQuery.  It's ParamByName semantics are different.  Use:
TADOQuery * q;
...
q->SQL->Add( " ... WHERE X = :x" );
q->Parameters->ParamByName( "x" )->Value = whatever.

Note that the TADOQuery ParamByName() doesn't have "AsXxxxx"
properties.  It uses the Variant 'Value';

Hope this helps.

- Arnie

"Henrik Franz�n" <xhfr@wayne.se> wrote in message news:3b4c0a6b_1@dnews...
> TADOConnection *MainConnection;
> TADOTable *XMLRecordHolder;
> TADOQuery *Query_XMLLoader;
> TQuery *Query_Updater;
>
> I ADOQuery don't seem to support ParamByName().. .. or SQL server
conflicts
> with ADOQuery's Parameters.. hum I dono whats wrong. i just want it to
> work.. ..
> '
>
>
> Formentz <francesco@leotron.com> wrote in message news:3b4c04ea_2@dnews...
> > What is Query_Updater which you assign DatabaseName?
> > A BDE TQuery? Why don't you use TADOQuery?
> >
> > Ciao
> >     Formentz
> > "Henrik Franz�n" <xhfr@wayne.se> ha scritto nel messaggio
> > news:3b4bf906$1_2@dnews...
> > > Hi!
> > > I have one class called DBHandler. In this class i have three ADO
> objects.
> > I
> > > also have a frame. There is one button in this frame. I got some
strange
> > > exception when pressing this button.. I should call a function in my
> > > DBHandler called ConnectTo(AnsiString Database), and connect to a
> > database,
> > > whats the problem ??
> > >
> > > .. here is my code. :
> > >
> > > void __fastcall TForm1::Button3Click(TObject *Sender)
> > > {
> > >     DBHandler->ConnectTo("nucleusdb");
> > > }
> > >
> > >
> > > bool __fastcall TDBaseHandler::ConnectTo(AnsiString Database)
> > > {
> > >     try{
> > >         FDatabase = Database;
> > >
> > >         AnsiString Def("Provider=MSDASQL.1;Persist Security
> > Info=False;Data
> > > Source=");
> > >         AnsiString ConnectionString(Def + FDatabase);
> > >
> > >         MainConnection->ConnectionString =
WideString(ConnectionString);
> > >         MainConnection->Open();
> > >         Query_Updater->DatabaseName = FDatabase;
> > >         Query_Updater->OpenDatabase();
> > >         XMLRecordHolder->Connection = MainConnection;
> > >         Query_XMLLoader->Connection = MainConnection;
> > >         return true;
> > >
> > >     }catch(Exception &E)
> > >     {
> > >         return false;
> > >     }
> > >
> > > }
> > >
> > >
> > >
> > > I hope someone can help me!
> > >
> > > /wr Henrik Franz�n
> > >
> > >
> >
> >
>
>