带变量形参的过程怎么调用？

Question

procedure TMainForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
      if (Application.MessageBox('确认退出系统？','确认信息',MB_YESNO+mb_iconinformation)=IDYES)then
      begin
              CanClose:=true;
      end else
              CanClose:=false;end;我要在Button1Click时调用上面的过程，怎么处理的？普通过程的方法是
MainForm.FormCloseQuery(Sender);
如果带 形参中带 var 呢？
怎么调用

Answer 1

self.close就可以了带var的参数要声明一个变量传禁区

Answer 2

刚才没说清楚button1Click里面只要写Self.close就可以了

Answer 3

...button1onclick(sender :tobject)... 
var flag:boolean; 
begin
  FormCloseQuery(Sender,flag); 
end;

Answer 4

直接对self.close
事件会自动转到FormCloseQuery事件的了

Answer 5

var t:boolean; 
begin
  FormCloseQuery(Sender,t); 
end;