ｓｅｔｆｏｃｕｓ出错

Question

procedure TForm1.FormCreate(Sender: TObject);
begin
      AnimateWindow (Handle, 400, AW_CENTER);  //窗体淡入淡出效果..
      Form1.SetFocus;  //出错..显示错误信息(Cannot focus a disabled or invisible                                            window)
end;
请帮忙解释一下出错的原因．．

Answer 1

不能为一个未在显示状态的窗体类控件设置输入焦点，在Form的OnCreate事件中，窗体还未显示出来，所以，这样是不行的！
你使用
  ShowWindow(Handle,sw_show);
就行了