急...急....Indy中Idpop3控件异常处理的问题????
我引用Idpop3控件,连接多个服务器去接收邮件,在实现中,使用了循环,但是当一个服务器出现异常(就比如说,连接失败吧),该次循环之后的都不执行了,为什么呀???
说明:当有3个服务器时,接收第一个服务器的时候,连接失败,Idpop3提示连接失败的错误,但是就是继续执行了,因为我的循环中还要接收第二个和第三个服务器的邮件呢,并且,我对这个异常没处理。
代码如下:
Listtmp: TStringList;
......
for EmailAddCount:=1 to 3 do
begin
CutString(ListTmp,DelEmailList[EmailAddCount-1]);
if Idpop31.Connected then
begin
Idpop31.Disconnect;
end;
Idpop31.Host:=ListTmp[1];
Idpop31.Port:=110;
Idpop31.Username:=ListTmp[2];
Idpop31.Password:=ListTmp[3];
try
begin
Idpop31.Connect(1000);
end
finally
begin
StatusBar1.SimpleText:='连接服务器失败!';
end
end;
end