Note that version 3.4.6 will do this mutexing for you if TOracleSession.ThreadSafe = True.

------------------
Marco Kalter
Allround Automations

test ok [Linked Image] !!

Modification :
I create a TcriticalSection and i "protect" all Connected action of OracleSession.

example :

**Main of Service
Definition critical section(SessionCriticalSection)

**procedure TService.ServiceStart
Create critical section (SessionCriticalSection)

-> and for all thread
**procedure TXYZThread.execute;

XYZDM := TXYZDM.Create(nil);
SessionCriticalSection.Enter;
try
XYZDM.oraSession.Connected := True;
finally
SessionCriticalSection.Leave;
end;


Thanks (a lot) for help !!
---------
nb: i don't test TOracleSession.ThreadSafe = True.

[This message has been edited by cgi (edited 05 March 2003).]