请问exit和close指什么含义

Question

var count:integer;;
procedure buttonclick();if trim(edit1.text)='book' then
begin
close;
exit;
end;inc(count);end;请问exit和close指什么含义，并且当在edit1中输入book时,inc(count)能否被执行。

Answer 1

Close是关闭当前窗体，exit是退出当前子程序的执行。如果被close掉了，就中断程序的执行了，当然inc（count）就不能执行了

Answer 2

close 已经是关闭窗口了吧,,那exit就不起作用了,exit是中断程序执行!
inc(count)也就不会被执行!

Answer 3

恩，close是调用当前窗体的close事件，既关闭当前窗体。而exit正如楼上2位所说，是中断程序执行。退出当前过程。

Answer 4

Exit 是退出当前过程或函数.Close 是触发窗体的 Close事件.在上例中, inc(count)没有执行.
是因为 Exit 出去了. 并不是因为 Close 语句.如果把 inc(count) 放在 Close 语句后, 它还是执行了.你可以在 inc(count) 语句后加上几行写入文件的语句把 count 写入一个文本文件试试.
放到Close语句后试试.