delphi:raise 语句: 抛出异常 （转载）

//例1:
begin
  raise Exception.Create('抛出异常');
end;

//例2:
begin
  raise Exception.CreateFmt('%s %d', ['错误代码:', 999]);
end;


//例3:
var
  exc: Exception;
begin
  exc := Exception.Create('发现异常');
  raise exc;
end;
————————————————
版权声明：本文为CSDN博主「Microblue」的原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接及本声明。
原文链接：https://blog.csdn.net/yanjiaye520/article/details/7617026