捕捉socket错误，高手请进啊

    mySocket:=TClientSocket.Create(self) ;
    mysocket.onerror:=SocketError;procedure TfrmDataListOFAssistBatExport.SocketError(Sender: TObject;
  Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
  var ErrorCode: Integer);
begin
// 网络断了，请重新登陆
end;为什么我拔掉网线之后没有执行此函数，如果不是这样，那假如果网络断了，应该怎么捕捉错误，让线程中止并通知主进程