BorlandTalk.com

Noel · Guest

Hello All !

I am writing a HTTP server using Broland C++ Builder 6 and indy 9.
For better performance i would like to use Thread Pooling with my
TIdHTTPServer component.

Here an excerpt from help:
"To use TIdThreadMgrPool with TIdTCPServer, create an instance of
TIdThreadMgrPool, and assign the object reference to
TIdTCPServer.ThreadMgr."

and

"Assign an instance of TIdThreadClass to ThreadClass before using the
thread manager to allocate new threads using CreateNewThread."

I am also using MySQL and would like to follow Chad's guidelines

"When each client needs a resource that is expensive, resource-wise, to
create, you should consider pooling these resources. Specifically, for a
high-load version of this server, the database connections should be
pooled. An easy way to pool database connections is to use a thread
pool, creating the connection in each thread’s constructor,
and releasing the connection in the corresponding destructor."

+--------------------------------------------------------+

Now my problem is that for some unknown reason ...
the ThreadMgr is not using the TIdThread descendant i want to use.

Here my code:

This is the definition of the TidThread descendant i want to use:

class TIdDS_Thread : public TIdThread
{
private:
int ThreadIndex;

public:
__fastcall TIdDS_Thread (bool CreateSuspended);
__fastcall ~TIdDS_Thread (void);
};

.... creator
__fastcall TIdDS_Thread::TIdDS_Thread (bool CreateSuspended)
: TIdThread (CreateSuspended)
{
ThreadIndex = 0;
}

I create and initialize ...

void __fastcall TMainForm::FormCreate(TObject *Sender)
{
...
IdThreadMgrPool = new TIdThreadMgrPool (this);
IdThreadMgrPool -> ThreadClass = __classid(TIdDS_Thread);

IdHTTPServer = new TIdHTTPServer (this);
IdHTTPServer -> ThreadMgr = IdThreadMgrPool;
...

+-----------------------------------------------------------+

The creator of my TIdDS_Thread is never called ... (?)

What am i missing ?

IdThreadMgrPool -> ThreadClass = __classid(TIdDS_Thread);

Is this the proper way to tell the Thread manager to use my
TIdThread descendant ?

Thank you for your precious help !!!

Noël

Remy Lebeau (TeamB) · Guest

"Noel" <noel (AT) teledata (DOT) qc.ca> wrote in message
news:43e8b9a7$1 (AT) newsgroups (DOT) borland.com...

Noel · Guest

Hello Gambit !

You are an expert !
Works ok now !