■ TServerSocketでのエラー

[Delphi Q & A 掲示板] [過去ログの一覧]


sato 2009/03/03(火) 10:43:02 <初心者>
TServerSocketで「非同期ソケットエラー 10053」がまれに起こります。
どのタイミングで起こるか分かりませんが、ServerSocket1ClientErrorの時
このメッセージが出るようです。
受信側のServerSocketも、送信側のClientSocketも常時ONです。
ClientSocketで時々送る短い文字列をServerSocket1ClientReadで読んでいるだけです。
また、エラー発生時、そこで処理が止まっているわけではないようです。

#1 エラーの起こる原因
#2 エラー時、ServerSocket1ClientErrorの中で、ログに書き込むだけに
  したいので、エラーメッセージを出さないようにする。
には、どうすればいいのでしょうか。よろしくお願いします。

Win-XP、Delphi7です。

おも 2009/03/05(木) 01:18:33
#1は回答できません。

#2はヘルプファイルにも書いてありますが以下の1行のみで可能です。

procedure TForm1.ServerSocket1ClientError(Sender: TObject;
 Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
 var ErrorCode: Integer);
begin
    ErrorCode:=0;
end;

sato 2009/03/05(木) 15:02:20 <初心者>
おも様
ありがとうございました。
key:=#0; はやったことがありますが、ErrorCode:=0;は
気が付きませんでした。なかなか、再現しないので、テスト
できませんが、気長に待ちます。

毎週金曜日はポイント最大3倍!さらに4倍のチャンスも!

Programming Library