当不符合条件时，不能打开窗体form1，请问怎样实现 ？？

Question

如题：
我想在窗体创建时判断，如果符合条件，则打它，不然不打开它。如果已经创建了，则销毁它，我的程序：
procedure Tform1.FormCreate(Sender: TObject);
begin  
  if GetlimitCksl<DM.ADOQue_ckxx.RecordCount then
  begin
    //这里该怎么写呀？？？？
    Application.Terminate;//用这个的话，一下就退出整个程序了，不好！
  end;
end;

Answer 1

你可以这样看看;
procedure Tform1.FormCreate(Sender: TObject);
begin  
  if GetlimitCksl<DM.ADOQue_ckxx.RecordCount then
  begin
    //这里该怎么写呀？？？？
    //Application.Terminate;//用这个的话，一下就退出整个程序了，不好！
     PostMessage(Handle,WM_CLOSE,0,0);
  end;
end;