TCOFail 是我自己继承了,EXCEPTION做的里面就重载了一个过程.就是提示信息,但是还不好用.
不行了搞不定了.请指点怎么能捕获CLIENTSOCKET1.OPEN的错误呢??????????try
clientsocket1.open;
except
on e:TConFail do
e.warning();//这里根本走不到啊.我服了,搞不定了.
end;
不行了搞不定了.请指点怎么能捕获CLIENTSOCKET1.OPEN的错误呢??????????try
clientsocket1.open;
except
on e:TConFail do
e.warning();//这里根本走不到啊.我服了,搞不定了.
end;
try
func;
except
on e:TConFail do
dosomething;
end;function func;
begin
...
if error then raise TConFail.Create('error');
end;