如何屏蔽弹出框？

Question

在Delphi中如何屏蔽弹出框？
如错信息等，会自动弹出，请问怎样屏蔽！

Answer 1

找本书，看看vcl的异常处理机制。
就是常见的
try
  ...
except
  ...
end;
或者
try
  ..
finally
  ..
end;

Answer 2

加异常处理，try .. except .. end;

Answer 3

yes　樓上的可以我剛以為是實現　屏蔽廣告窗口之類的彈出那。

Answer 4

这个肯定是不行的，如果行，我就不会问了!再问一下：如果一个存取过程没有返回结果集，应该怎样调用？with ADOquery1 do
begin
         Close;
         SQL.Clear;
         SQL.Add('execute p_GetConfirmPhone');
         open;
end;报错！不能屏蔽的错！

Answer 5

这个肯定是不行的，如果行，我就不会问了!
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
这个肯定行，如果不行，大家也就不会告诉你了。再问一下：如果一个存取过程没有返回结果集，应该怎样调用？with ADOquery1 do
begin
         Close;
         SQL.Clear;
         SQL.Add('execute p_GetConfirmPhone');
         try
           ExecSQL;//open;
         except
           // 异常处理代码
         end;
end;这个异常对话框在IDE环境下始终有，脱离了IDE就没了。

Answer 6

try .. except .. end

Answer 7

try except end
在调试的时候是不能屏蔽错误信息的,但是编译完了自己运行exe文件的时候就不会弹出来了

Answer 8

在MainForm中定义:
procedure OnException(Sender: TObject; E: Exception);
实现:
procedure OnException(Sender: TObject; E: Exception)
begin
//
end;在MainForm中写
Application.OnException:=OnException;
保证你程序一个出错窗体也弹不出.

Answer 9

Application.OnException:=OnException;
请问：写在什么样的事件当中啊？

Answer 10

var
str:array of char;
begin
  try
     showmessage(str[0]); //肯定会报错的，请问应该怎样屏蔽掉？
  except
     showmessage('未定义');      // 异常处理代码
  end;
end;

Answer 11

弄清楚了，在IDE环境下都有的，
脱离就没有了！（运行EXE就不会弹出了）

Answer 12

写在OnCreate中
Application.OnException:=OnException;