急,急:请教: 用POP3控件当connect远程主机失败时,系统弹出出错信息程序异常终止,用try-excption 不行,怎么控制不能退出程序? 谢谢!
解决方案 »
- 如何实现字符加串加1,如(fg00100227)变到(fg00100228).....
- ◆ 重要+紧急:如何判断一个Thread对象有没有被创建,有没有被释放!
- 究竟如何判断当前是否运行了Word?
- 一个程序需要验证,我截获了他send和recv两个包,怎样编程可以不用验证。用工具也可以
- 如何用dephi制作的程序编译出简单的exe程序
- 请教:QuickReport自定义纸张打印出现的问题!!!
- 如何在打印的时候让报表中的QRLabel不打印出来?(在线等)
- [讨论] 业务逻辑分离问题
- 请问这样的方式应该用何种方式实现???(详情见内)
- 对《程序员》杂志的单元测试有一些疑问请大家解惑。
- 在DELPHI的RichTextEdit控件中,怎样实现插入图片的功能。
- 各位高手,能否把你们的email 或者QQ告诉小弟,以便小弟请教一些很菜的问题,提供者都有分,我的QQ:24324773,Email:[email protected],谢谢!
tmppop.Host:=mailsrv;
tmppop.Port:=StrToInt(popport);
tmppop.UserID:=userid;
tmppop.TimeOut:=5000; //设置延时
tmppop.Password:=passwd;
tmppop.DeleteOnRead:=True;
try
tmppop.Connect;
except
ShowMessage(' Connect '+mailsrv+' Error!!!');
tmppop.Free;
Exit;
end;