USEGEAR

导航

delphi窗口的create和free,一个古老的话题

窗体分为模式窗体和无模式窗体。

模式窗体在创建窗口创建和释放:

begin
  if not Assigned(FB_Input_JianYanDan) then FB_Input_JianYanDan :=TFB_Input_JianYanDan.Create(Self);
  try
    FB_Input_JianYanDan.ShowModal;
  finally
    FB_Input_JianYanDan.Free; 
    FB_Input_JianYanDan:= nil; 
  end;
end;

非模式窗口:在自己的窗口close中free:FreeAndNil(FB_Input_JianYanDan);



posted on 2016-07-02 18:06  USEGEAR  阅读(471)  评论(0编辑  收藏  举报