哪位大虾能写的出告警信息屏蔽的代码 我是菜鸟 在线等 急～～～～～～～～

Question

关于SQL Server2000告警管理系统的告警屏蔽
用Delphi语言写
实在不知道怎么写
昨天有位大哥写了点
try //你的代码；except
  ;
end;
可是中间的代码我不知道写
麻烦哪位大虾帮下啊
谢谢拉

Answer 1

什么意思，是不是想有系统异常信息时什么也不显示try  Query1.Close;
  Query1.sql.text:='select getdate()';
  Query.open;except
 //这里什么都不要写，就可以没有警告信息了。
end;

Answer 2

什么意思，是不是想有系统异常信息时什么也不显示try  Query1.Close;
  Query1.sql.text:='select getdate()';
  Query1.open;except
 //这里什么都不要写，就可以没有警告信息了。
end;

Answer 3

用了try...except后
在IDE的调试状态,你要进入菜单的tools->Debugger Options->Language Exceptions将Stop on delphi exceptions前的勾去掉,不然系统仍会报错(实际运行时不会)

Answer 4

在Debug状态时，出错信息还是要显示的。单独运行就没事了。