Delphi中自己定义的procedure中调用exit显示为什么不可以。、exit相当于...

发布网友发布时间：2024-10-01 05:29

我来回答

共2个回答

热心网友时间：2024-10-07 07:41

以下供参考：

一、在 delphi 里，exit 用于退出当前的函数。

二、自定义过程或函数，如果没有特殊要求，通常将这个函数定义在类窗体里比较方便一些，比如，上面的函数可以用以下代码来定义：

procedure TForm1.dfs1(step:Integer);

三、从代码中来看，变量 n 和 a 并没有在函数体内部定义，那么就只能是外部的全局变量。

热心网友时间：2024-10-07 07:44

在delphi中使用 exit 无问题，如：

procedure TForm1.Button1Click(Sender: TObject);
begin
     if true then showmessage('jhdfkjhjkdshf') else exit;
     showmessage('jhdfkjhjkdshf');
end;
－－－－－－－－－－会显示两次“hdfkjhjkdshf”
若是：
procedure TForm1.Button1Click(Sender: TObject);
begin
     if false then showmessage('jhdfkjhjkdshf') else exit;
     showmessage('jhdfkjhjkdshf');
end;
－－－－－－－－－－则一次也不会显示！