L liner1 Unregistered / Unconfirmed GUEST, unregistred user! 2002-04-03 #1 我用socketconnection连接到服务器，当服务上scktsrvr.exe上关闭时， 客户端会收到 socket read error 错误信息， 怎么解决该问题。
天 天真 Unregistered / Unconfirmed GUEST, unregistred user! 2002-04-03 #3 try sockectconnection.connected:=true; except sockectconnection.connected:=false; end;
L liner1 Unregistered / Unconfirmed GUEST, unregistred user! 2002-04-03 #5 下面的代码在哪里写?现在的触发事件是服务器的scktsrvr.exe关闭。 try sockectconnection.connected:=true; except sockectconnection.connected:=false; end;
下面的代码在哪里写?现在的触发事件是服务器的scktsrvr.exe关闭。 try sockectconnection.connected:=true; except sockectconnection.connected:=false; end;
B BlackDragon Unregistered / Unconfirmed GUEST, unregistred user! 2002-04-03 #6 procedure Tkqgy.ClientSocket1Error(Sender: TObject; Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer); begin errorcode:=0; messagebox(handle,'远程FIX服务器未启动，请打电话与赵海联系（13977780996）。','提示',MB_ICONINFORMATION); end;
procedure Tkqgy.ClientSocket1Error(Sender: TObject; Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer); begin errorcode:=0; messagebox(handle,'远程FIX服务器未启动，请打电话与赵海联系（13977780996）。','提示',MB_ICONINFORMATION); end;
L liner1 Unregistered / Unconfirmed GUEST, unregistred user! 2002-04-03 #7 我用的是sockectconnection,没有OnError事件
B bluerain Unregistered / Unconfirmed GUEST, unregistred user! 2002-04-04 #9 type TSocketConnectionEx = class(TSocketConnection) protected proceduredo Error(E: Exception); virtual; end; procedure TSocketConnectionEX.DoError(E: Exception); begin showmessage('error: ' + e.message); // not inheriteddo error(e); end;
type TSocketConnectionEx = class(TSocketConnection) protected proceduredo Error(E: Exception); virtual; end; procedure TSocketConnectionEX.DoError(E: Exception); begin showmessage('error: ' + e.message); // not inheriteddo error(e); end;
B bluerain Unregistered / Unconfirmed GUEST, unregistred user! 2002-04-04 #11 这些错误是异步(PostMessage)的,try except end拿不了的.
