請問一個delphi 3.0 中斷程式執行的方法???

[天空]

※ 引述《Letch...@cis.nctu.edu.tw (Lamb)》之銘言：
: ==> 在 SUNJEI <SUN...@MS4.ACCMAIL.COM.TW> 的文章中提到:
: > 請問一個使程式中斷的方法
: > if DBGrid1.SelectedField.FieldName = 'PLU_NO' then
: > begin
: > sqlplu:='select plu_no from plu where
: > plu_no="'+form1.query3.fieldbyname('plu_no').asstring+'"';
: > if form1.query7.RecordCount=0 then
: > begin
: > showmessage('此廠商無此商品編號');
: > ??????? <---------此處有哪些指令可以使程式中斷而回到form的畫面??
: > end;
: > 請各位高手幫幫我 謝謝
: 應該用 abort 就可以離開此 procedure 了！

應像,好像 abort 是 中斷整個程式,

也許試用 [exit;] 看看吧 ( Delphi's exit 地位有點像 C's return.

--
※ [36;1m風信遊子 [35m(bbs.cm.nctu.edu.tw) [37m ★ [33mPost From: [34m phys10.phys.nchu.edu.tw [m★

[charge]

raise 個Error 如何?

天空 撰寫於文章 <3QPD7V$4...@bbs.cm.nctu.edu.tw>...