引言: 當我使用ClientSocket連線的時候 如果無法與Server連線,Client端會不斷嘗試連線 但是會出現一個問題 不斷嘗試連線一段時間後,會出下以下問題 Windows socket error無法在通訊端執行操作,因為系統緩衝區空間不足,或是佇列已滿.(10055),on API connect 請問有辦法避免此問題嗎??請指教......

shing187 你好: 是否把你 Client 端「嘗試連線」的那段程式碼貼上來，幫你看看?? --

 
void __fastcall TFormRemoteViewer::BtnConnectClick(TObject *Sender)
{
    TIniFile *ini = new TIniFile("Set.ini");
    ClientSocket->Address = ini->ReadString("Setting","IPAddress", "192.168.0.10");
    ClientSocket->Port = StrToInt(ini->ReadString("Setting","Port", "80"));
    ClientSocket->Open();
    delete ini;
}    void __fastcall TFormRemoteViewer::ClientSocketError(TObject *Sender,
      TCustomWinSocket *Socket, TErrorEvent ErrorEvent, int &ErrorCode)
{
if(!ClientSocket->Socket->Connected)
    {
        ClientSocket->Open();
    }
}

引言: 因為程式很長.... 我取其中一部分的程式碼

 
void __fastcall TFormRemoteViewer::BtnConnectClick(TObject *Sender)
{
    TIniFile *ini = new TIniFile("Set.ini");
    ClientSocket->Address = ini->ReadString("Setting","IPAddress", "192.168.0.10");
    ClientSocket->Port = StrToInt(ini->ReadString("Setting","Port", "80"));
    ClientSocket->Open();
    delete ini;
}    void __fastcall TFormRemoteViewer::ClientSocketError(TObject *Sender,
      TCustomWinSocket *Socket, TErrorEvent ErrorEvent, int &ErrorCode)
{
if(!ClientSocket->Socket->Connected)
    {
        ClientSocket->Open();
    }
}

shing187 你好:
(1)我做了一個小小的實驗，程式碼如下，也不會產生你所說的問題
>Address="192.168.16.152">Port=4000;
      ClientSocket1->Open();
      // 中間做想做的事情
      ClientSocket1->Close();
   }
}
void __fastcall TForm1::ClientSocket1Error(TObject *Sender,
      TCustomWinSocket *Socket, TErrorEvent ErrorEvent, int &ErrorCode)
{
   ErrorCode=0;   
}
(2)還有你的 DVRClient 是什麼呢?? 我的建議是不管 Open 是否成功，最後要
   記得 Close