//例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;