|
타이머로 계속해서 클라이언트로 값을 보내는데 클라이언트를 죽이면 인덱스 에러가 나오네요. 아마두 클라
이언트가 죽었을때 보내지 말라는 명령을 해야 할거 같은데 어떻게 클라이언트가 죽는걸 알수 있죠?
*****Server*******
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
temp=0;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ServerSocket1ClientRead(TObject *Sender,
TCustomWinSocket *Socket)
{
receivePacket = Socket->ReceiveText();
Edit2->Text = receivePacket;
Socket->SendText(Edit2->Text);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Timer1->Enabled = true;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
temp++; // Time Interval = 200;
Edit1->Text = temp;//sendPacket;
ServerSocket1->Socket->Connections[0]->SendText(temp);//sendPacket);
}
//---------------------------------------------------------------------------
*********Client*****************
void __fastcall TForm1::ClientSocket1Read(TObject *Sender,
TCustomWinSocket *Socket)
{
AnsiString str1;
str1 = Socket->ReceiveText();
Edit2->Text = str1;
}
|