不想执行后面的语句，退出当前PORCEDURE，用EXIT吗？

关于网友提出的“ 不想执行后面的语句，退出当前PORCEDURE，用EXIT吗？
”问题疑问，本网通过在网上对“ 不想执行后面的语句，退出当前PORCEDURE，用EXIT吗？
”有关的相关答案进行了整理，供用户进行参考，详细问题解答如下：

问题： 不想执行后面的语句，退出当前PORCEDURE，用EXIT吗？
描述:

UP

---

解决方案1:

procedure TFmUserlogin.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
  Fmexit.Lab.Caption:='是否退出登录？';
  Fmexit.Show;
  if (Fmexit.Exitstr='1') then
//改一下    Exit;
  　Action := caNone //不关闭窗口
  else
    Action := caFree;
    
end;

解决方案2:

"我想在退出本窗体的时候弹出一个提示，是否退出"，这个功能你应写在form的CloseQuery事件中。
If Application.MessageBox('你确定要退出吗？','请确认',MB_YesNo+MB_IconQuestion)=IDYES then
  CanClose:=True
else
  CanClose:=False;
//CanClose是form的CloseQuery事件的参数

以上介绍了“ 不想执行后面的语句，退出当前PORCEDURE，用EXIT吗？”的问题解答，希望对有需要的网友有所帮助。
本文网址链接：http://www.codes51.com/itwd/2702159.html