退出程序

时间:2017-06-08 08:05:18

标签: console-application freepascal

我有一些非常简单的代码,但我无法解决这个问题。我正在调用一个程序(希望)退出进程。但它并没有完全这样做:

procedure quit;
begin
    exit;
end;

这就是我在说它的地方:

If (Ch2 = #13) and (Bar2 = 5) and (Five) Then Quit;

Bar2基本上是一个字节变量,它包含一个包含不同元素的数组,如"display""help""next""prev",当然, quit,根据他们的行为,都有自己的代码。 Ch2ReadKey的变量,它接受各种按键,然后允许它执行为该specfic命令定义的任何内容。在这种情况下,它需要使用返回键。 Five是一个布尔运算符,作为运行quit命令的先决条件。我想这不是必要的。

顺便说一下,如果它有帮助,这是一个单元,而不是一个独立的程序。

任何人都知道为什么这个exit命令不起作用?希望这篇文章足够冗长。

谢谢。

1 个答案:

答案 0 :(得分:2)

exit语句从找到它的函数或过程中退出。然后它将执行返回给调用函数或过程。

要终止流程,请使用halt