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;

posted on 2008-03-27 23:26  万一  阅读(9828)  评论(2)  编辑  收藏