如何屏弊掉clientsocket产生的错误？

我的程序如下
procedure TForm1.Button2Click(Sender: TObject);
begin
 try
 clientsocket1.Active:=true;
 except
 on esocketerror do
 begin 
 clientsocket1.active:=false;
 showmessage('123');
 end; 
 end;
 end;
但是当server端未运行而点击该按钮后发现系统仍旧起动一个错误
“anynchrous socket error 10060"  请问如何才能屏弊掉该错误