W wys1de7a Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-09 #1 现在正在做毕业设计，遇一问题，自定义过程和函数后，如其内部有异常，能否同Java 一样往上层抛出？我不想用全局boolean变量。
晚 晚起的小虫 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-09 #4 procedure aa(i:integer); begin If i<0 then raise Exception.Create('i不能小于0'); //..函数处理 end; 使用时 try aa(-1); except On e:Exception do //Exception 是所有异常的父类。 begin Log(e.message);//记录日志，自定义函数 Raise;//如有须要，继续往上层抛 end; end;
procedure aa(i:integer); begin If i<0 then raise Exception.Create('i不能小于0'); //..函数处理 end; 使用时 try aa(-1); except On e:Exception do //Exception 是所有异常的父类。 begin Log(e.message);//记录日志，自定义函数 Raise;//如有须要，继续往上层抛 end; end;
W wys1de7a Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-09 #5 谢了， 以后还得多多向你学习， 我是学机械的，对计算机编程挺感兴趣，
