為何讓程式主要Form隱藏必須用下面方法

[code delphi]
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
Application.Initialize;
// Application.ShowMainForm := False;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
[/code]

而不能用
Form1.Visibel := false;
或
Form1.hide;

------
能力不足，求助於人；有能力時，幫幫別人；如果您滿意答覆，請適時結案！

子曰：問有三種，不懂則問，雖懂有疑則問，雖懂而想知更多則問！

不是主form 問題, 是不能在on show 的時候去hide 這是矛盾的
而app 在一開始執行的時候會自動show 主form , 所以造成衝突

舉例來說, 可以放一個按鈕 ,on click 時 form1.hide 這就不會有問題
或者 on Click 時呼叫第二個form , form2.show ; 而在form2 on show 裡面寫 form2.hide 一樣會出錯
主要delphi 在執行 show , activate 這種讓畫面出現的 mothed 的同時 , 沒辦法執行 hide 指令

------
額有朝天骨,眼中有靈光

編輯記錄

[code delphi]
procedure TApplication.Run;
begin
FRunning := True;
try
AddExitProc(DoneApplication);
if FMainForm <> nil then
begin
case CmdShow of
SW_SHOWMINNOACTIVE: FMainForm.FWindowState := wsMinimized;
SW_SHOWMAXIMIZED: MainForm.WindowState := wsMaximized;
end;
if FShowMainForm then
if FMainForm.FWindowState = wsMinimized then
Minimize else
FMainForm.Visible := True;<<----HERE

repeat
try
HandleMessage;
except
HandleException(Self);
end;
until Terminated;

end;
finally
FRunning := False;
end;
end;

[/code]

另外,也可以在Trace TCustomForm.SetVisible()
為何無法以Visible := False; 來隱藏MainForm...

謹供參考...

編輯記錄