各位大大好：

Indy 的 TIdTCPClient 不像 TClientSocket 有 onError 的事件，

那如何讓TIdTCPClient 的錯誤的Dialog不出現，就是如何在連不上Server時不會出現錯誤的訊息。

http://delphi.ktop.com.tw/board.php?cid=168&fid=920&tid=38512

謝謝大大!!





以下是 TClientSocket 的 OnError 事件

在其TClientSocket 的 OnError的事件中，把ErrorCode設為0，
如:

void __fastcall TForm1::ClientSocket1Error(TObject *Sender,
TCustomWinSocket *Socket, TErrorEvent ErrorEvent, int &ErrorCode)
{
ErrorCode=0;
}

根據說明文件，如果TIdTCPClient碰上連線有狀況
會丟出exception，由使用者來接
e.g.
[code cpp]
try
{
TCPClient1->Connect();
}
catch(const EIdSocketError &SocketErr)
{
::MessageBox(NULL, SocketErr.Message.c_str(), "Connection Error", MB_ICONERROR);
...
}
[/code]
請參考Indy的說明文件