🚀 go-pugleaf

Hello Again
  Thanks for the quick responce. The reason I needed a static is because I
needed to maintain a count value for each independant thread. Your second 
solution looks A1 though, I will
give it a try later.

Thanks again

Andy Blackmore

"Omar Zelaya" <ozelaya2010@hotmail.com> wrote in message 
news:4256a163@newsgroups.borland.com...
> Use the static storage class specifier with a local variable to preserve 
> the last value between successive calls to that function. A static 
> variable acts like a local variable but has the lifetime of an external 
> variable.
>
> I think that if you remove static from the Count variable declaration, it 
> will work as you expect.
>
> You can also do this
>
> class TMyClass
> {
> public:
>    int Count;
> protected:
> private:
> };
>
> On the connect event of the IdTCPServer1 create the class and assign it to 
> the Data property of TIdPeerThread and destroy it on the disconnect event 
> something like this:
>
> void __fastcall TFArt::IdTCPServer1Connect(TIdPeerThread *AThread)
> { TMyClass* MyClass;
>
>   MyClass = new TMyClass();
>   MyClass->Count = 0;
>   AThread->Data = MyClass;
> }
>
> void __fastcall TFArt::IdTCPServer1Disconnect(TIdPeerThread *AThread)
> { TMyClass* MyClass;
>
>   MyClass = (TMyClass*) AThread->Data;
>   delete MyClass;
>   AThread->Data = NULL;
> }
>
> void __fastcall TFArt::IdTCPServer1Execute(TIdPeerThread *AThread)
> { TMyClass* MyClass;
>   AnsiString ReplyStr;
>
>   MyClass = (TMyClass*) AThread->Data;
>
>   ReplyStr = AThread->Connection->ReadLn();
>
> if(ReplyStr == "c")
>  {
>   MyClass->Count++;
>   AThread->Connection->WriteLn("Count = " + IntToStr(MyClass->Count));
>  }
> else
>  if(ReplyStr == 'q')
>    AThread->Connection->Disconnect();
> }
>
> "Andy Blackmore" <andy@number18.co.uk> wrote in message 
> news:425669ba@newsgroups.borland.com...
>> Hello
>>  I am trying to create a multi threaded server with a local variable to 
>> each thread and not a global one. I first tried the code listed below :-
>>
>> void __fastcall TFArt::IdTCPServer1Execute(TIdPeerThread *AThread)
>> {
>> static int Count = 0;
>> AnsiString ReplyStr;
>>
>> ReplyStr = AThread->Connection->ReadLn();
>>
>> if(ReplyStr == "c")
>>   {
>>    Count++;
>>    AThread->Connection->WriteLn("Count = " + IntToStr(Count));
>>   }
>> else
>>   if(ReplyStr == 'q')
>>     AThread->Connection->Disconnect();
>> }
>>
>> But I found that the variable listed here (Count) is global to all 
>> threads. So I looked at creating a new class derived from TIdPeerThread 
>> and called TMyIdThread where I can declair a local variable
>>
>> class TMyIdThread : public  TIdPeerThread {
>> public:
>>    int Count;
>> protected:
>> private:
>> ];
>>
>> But I don't know how I link this new class into the IdTCPServer 
>> component. Please can someone help me with this problem
>>
>> Thanks in advance
>>
>>
>> Andy Blackmore
>>
>
>