🚀 go-pugleaf

"Ulrik Nilsson" <di2niul@chl.chalmers.se> wrote in message
news:413cc343$1@newsgroups.borland.com...

>     while( ! AThread->Terminated  && AThread->Connection->Connected() )

You should not be looping like that.  The OnExecute event is already looped
for you.  Get rid of the loop altogether.

>             AThread->Connection->Disconnect();

Use DisconnectSocket() instead of Disconnect().

>             AThread->Connection->CheckForDisconnect();

You don't need to call that.  ReadLn() and WriteLn() will do that for you.

> You wrote "Use the actual constructor instead". How and where?

You do know what a constructor is in the first place, don't you?  It is a
class method that has the same name as the class itself.  In this case,
TForm1(), which is automatically generated for you by the IDE for VCL forms:

    __fastcall TForm1::TForm1(TComponent *Owner)
        : TForm(Owner)
    {
        // this is the constructor.  Put your initialization code in here...
    }


Gambit