各位先進好！ Q‧ 我希望程式在運行中，如果擊窗體的關閉按鈕，窗體不會被關閉，而是隱藏，請問該如何考慮，謝謝！

你好： 你可以在 OnClose 使用下列的方式，但你要考慮到當你真正要釋放時的做法喔 < class="code"> procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin Action := caHide; // 當你真的要釋放時可設為 caFree end;

Hi！ha0009  前輩給出的參考方法我已試過: Action := caHide;     我希望的隱藏方式是與Form1‧hide一樣，但好像有所不同. 如果是

你好： form1.hide 與 cdHide 是同樣的作用呀。如果方便是不是將你的專案上傳呢

procedure TFormMain.FormClose(Sender: TObject; var Action: TCloseAction); begin Action:=caNone; Application.Minimize; end; ====================== 久病成良医--多试 千人之诺诺,不如一士之谔谔--兼听

------
江上何人初见月，江月何年初照人

感謝前輩ha0009和mustapha‧wang 的回應！ 在我的程式中，兩位前輩的方法實做出的效果時都可以隱藏，但按Ctrl D 都不再顯示，不過我估計這是我程式的原因，我稍做變化，現在在關閉時可以隱藏，再按Ctrl D 可以顯示,Code如下: procedure TForm1.FormClose(Sender:TObject; var Action: TCloseAction); begin Action := caNone; Visible := False; end;