type
  TfrmADOLinkSetting = class(TfrmBase_S)
procedure TfrmADOLinkSetting.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
  inherited;
  frmADOLinkSetting:=nil;//这里是什么意思?
end;

解决方案 »

  1.   

    实际等同于 FreeandNil(frmADOLinkSetting)
      

  2.   

    都高手啊,谢了
    那同action:=cafree有什么区别?
      

  3.   

    procedure ChildForm.OnClose(Sender: TObject; var Action: TCloseAction);
    begin
      Action := caFree;
    end;
       Delphi为一个Form的关闭行为指定了四种方式,分别是:caNone 禁止Form被关闭 
    caHide Form不被关闭,但是被隐藏。被隐藏的Form仍然可以被程序访问。 
    caFree Form被关闭,并且释放其占用的资源。 caMinimize Form被最小化而不是被关闭,这是MDI子窗口的默认关闭行为。
      

  4.   

    好贴。
    FreeandNil(frmADOLinkSetting)也是释放资源,具有相同的作用,我的理解对吗?