大虾们好!
例如下面的部分程序:
procedure TF_Main.FormClose(Sender:   TObject;   var   Action:   TCloseAction);
begin
      Action:=caFree;
      F_Main.Close;
end;
我想在按钮中调用上面的事件,是不是应该如下?如果是,问号里应该填什么?
procedure TF_Main.btn_exitClick(Sender: TObject);        
begin
     F_Main.OnClose(?);end;

解决方案 »

  1.   

    procedure TF_Main.btn_exitClick(Sender: TObject);         
    begin 
       Close();  //这样就可以了
    end;
      

  2.   

    如果一定要这样就填F_MainF_Main.OnClose(F_Main); 
      

  3.   

    直接close 就是了,括号里何必填那玩意
      

  4.   

    F_Main.OnClose(?); LZ想把原来的onclose方法关联到另外的方法???onclose关联的方法(过程)是窗体在关闭的时候做的事情而close()或者self.close()是关闭窗口两者概念不同的