怎么使用raise(30分)

  • 主题发起人 主题发起人 wxj9527
  • 开始时间 开始时间
W

wxj9527

Unregistered / Unconfirmed
GUEST, unregistred user!
constructor TBaseEnvironnement.Create;
begin
//$ML-
raise EEnvironnement.Create('Do not call Create Directly. Call CreateEx');
//$ML+
end;

如题!!请解释下上面的代码!!谢谢~~~
 
就是 手工抛出 一个异常错误啊
错误的message 是 'Do not call Create Directly. Call CreateEx'
 
不关创建成功与否都抛出这个错误吗?
 
只要 执行到 raise 就会
//$ML- 是开关
raise = 手工抛出

EEnvironnement.Create('Do not call Create Directly. Call CreateEx');
=message 是 'Do not call Create Directly. Call CreateEx' 的错误
 
接受答案了.
 

Similar threads

D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
886
DelphiTeacher的专栏
D
后退
顶部