如何在form的onshow事件里关闭该form?

Question

先判断是否可create,再create啊，在onshow中是关不了的，在oncreate可以

Answer 1

PostMessage(self.Handle,WM_CLOSE,0,0);
应该没问题，在你的机器上试试。

Answer 2

OnShow事件中是不能关闭的

Answer 3

PostMessage(self.Handle,WM_CLOSE,0,0);
应该没问题，在你的机器上试试。
在我机器上是没问题的，就写在OnShow事件中

Answer 4

通常你在OnCreate或Onshow里关闭窗体
会出保护性错误，这里用发消息的方法  begin 
    messagedlg('将要关闭', mtInformation, [mbOK], 0); 
    PostMessage(self.handle, WM_CLOSE, 0, 0); 
    Screen.Cursor := crDefault; 
  end 
  
                             ---Delphi之未经证实的葵花宝典version 2.1

Answer 5

在onshow里关闭Form不太好。newform := TNewForm.Create(Self);
try
  if {出错} then
     raise Exception.Create('xx错误');
  newform.Show;
except
  newform.Free;
end;