DELPHI 程序停止运行

if edit1.text := '' then

这么写是错的

:=是世孝赋值，不是比较。delphi中比较是=号

应该歼埋是

if edit1.text = ''搜改稿 then

begin

showmessage('不能为空')

Exit//这里加个exit，表示退出此过程或者函数，后面的代码不会执行。

end；

begin

showmessage('不能为空')

end；

Application.Terminate 中止应用程序的运行，比较运耐安全。而Halt则完全停止程序，这种完全停止，会忽略任何try finally块、任何finalization语句块以及Delphi编译器自动编旁袭春译优化的内存清理代码的执行，从而造成内存丢失。强烈建议不要使用Halt。使用Application.Terminate 还会触发一些事件，而Halt绝对不会Application.Terminate 不会触发CLOSE事件close是正常的关闭方法FREE与DESTROY不是关闭的方法而是释放所创建的对禅蔽象，不会关闭程序其它的关闭关法是调用API方式的，如结束进程的方式一般一用，正常情况中只要用close

delphi 语言中，终止执行、跳出循环，大明使用如下代码：

Exit //退出本过睁仿雹程，继续执行调用些过程后的代码

Abort //退出悉帆本过程，但过程中异常处理部分的代码仍会执行

通常使用 Exit 在 procedure 或是 function 中执行跳出过程或是函数体。

如果需要直接中止程序，可以使用 Application.Terminate。

---