一个很简单的异常问题

江山易改 2003-06-03 10:31:44
问题是,如果何在程序当中获取异常号或异常信息。
比如,我在联接数据库时,数据库联接失败,有可以是网络不通,也有可能是用户密码不正确,还有可能是用户设置有问题。
(在线等待)
...全文
22 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
helodd 2003-06-03
  • 打赏
  • 举报
回复
用 try...except ,try...finally 呀
例:
try
RemoteServer.AppServer.SetDatabaseName(DatabaseName.Text, '');
except
on E: Exception do
if E.Message = 'Password Required' then
begin
if InputQuery(E.Message, 'Enter password', Password) then
RemoteServer.AppServer.SetDatabaseName(DatabaseName.Text, Password);
end else
raise;
end;

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧