Programming Forums > Application Development > Delphi

Scientist2005 · Aug 24th, 2005, 7:24 AM

Anybody help!!!!!!!!!!!!!
Could anybody exactly explain to me How to create connection to database through ADO or BDE in TServiceApplication or
at least how to execute a query to database with TQuery or TADOQuery.
Don't say that it's only necessesary to execute a procedure CoInitialize(): it doesn't work.
If it's possible, show me the code.

Thanks in advance.

Scorpions4ever · Aug 26th, 2005, 12:35 PM

It's been a while since I did this, but can't you simply do this:

(Toggle Plain Text)

TDatabase dbConn;

dbConn = TDatabase.Create;
dbConn.Alias := 'Aliasname';
dbConn.DatabaseName := 'dbname';
// Set rest of properties.
dbConn.Connected := true;

Aug 24th, 2005, 7:24 AM	#1
Scientist2005 Newbie Join Date: Aug 2005 Posts: 1 Rep Power: 0	Set a connection to database in TService Anybody help!!!!!!!!!!!!! Could anybody exactly explain to me How to create connection to database through ADO or BDE in TServiceApplication or at least how to execute a query to database with TQuery or TADOQuery. Don't say that it's only necessesary to execute a procedure CoInitialize(): it doesn't work. If it's possible, show me the code. Thanks in advance.

Aug 26th, 2005, 12:35 PM	#2
Scorpions4ever Programmer Join Date: Jun 2005 Posts: 86 Rep Power: 4	It's been a while since I did this, but can't you simply do this: (Toggle Plain Text) TDatabase dbConn; dbConn = TDatabase.Create; dbConn.Alias := 'Aliasname'; dbConn.DatabaseName := 'dbname'; // Set rest of properties. dbConn.Connected := true; TDatabase dbConn; dbConn = TDatabase.Create; dbConn.Alias := 'Aliasname'; dbConn.DatabaseName := 'dbname'; // Set rest of properties. dbConn.Connected := true;

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)

Programming Forums > Application Development > Delphi

Set a connection to database in TService