Problema cu TServerSocket

in BCB5:am un thread care deschide un COMPort shi un socket-server.Nu reusesc nicidecum sa trimit clientului msg. De la client primesc msg, da ynapoi nu se trimete. Pls, unde este nuanta pe care am omis-o??__fastcall COMIP_th::COMIP_th(bool CreateSuspended,TComPort *ACPPar, AnsiString ACOMPort, unsigned int ASocketPort,int AID) : TThread(CreateSuspended){ FID=AID; FCOMPort=ACOMPort; FSocketPort=ASocketPort; FSS=new TServerSocket(NULL); FSS->Port=FSocketPort; FSS->ServerType=stNonBlocking;void __fastcall COMIP_th::FDPPacketReceive(TObject *Sender, const AnsiString Str){//ABuffer=Str;Form1->LB3->Items->Add(Str);/*aici e greseala*/ FSS->Socket->SendText(ABuffer);}Constructorul la COMIP_th nu e complet indicat(ca s a nu apara sugestii ca am eroare de sintaxa:)))