各位前輩，在下想請問一下： 我以建好了fsmdiform及fsmdichild運作都正常，但如果我想有button的click事件在將childform關閉，不知要如何作????? 謝謝

引言: 各位前輩，在下想請問一下： 我以建好了fsmdiform及fsmdichild運作都正常，但如果我想有button的click事件在將childform關閉，不知要如何作????? 謝謝

你在fsmdichild中加入button,直接在click事件中用Close不就可了吗？

引言: 各位前輩，在下想請問一下： 我以建好了fsmdiform及fsmdichild運作都正常，但如果我想有button的click事件在將childform關閉，不知要如何作????? 謝謝

加入一段..... procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction); begin action:=cafree; end; 永遠追不上技術更新的速度~~

此篇與資料庫無關吧 !

比爾先生謝謝你，可以用了，但還有個疑問，就是為什麼form2.close;會有錯誤訊息

建議Form結束時在Close事件設定Form為Nil    procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Form2:=Nil;
end;    

Mr.cmj你好: 可不可以說明一下，那行指令是什麼意思，幹什麼用的????謝謝感激不盡

在Form2 結束後 Form2指標應設定為Nil 在下次Form2在Create時先確定Form2=Nil在執行,程式就不會有錯誤訊息

Mr.cmj你好:         那Nil是什麼東西呀，是不是針對這個錯誤訊息來處理的？這個錯誤訊息又是什麼意思呢？？？？謝謝你期待你的解答.

你好：     Nil 是物件的一種狀態，代表這個物件尚未建立。 MDI 的 Client 預設的 Close 事件不會把視窗給關閉，而是縮小。 所以需要在 OnClose 的事件中設定 action:=cafree 讓 Client 將視窗釋放。 當視窗釋放後，你再度開啟 Client 視窗時就會發生存取錯誤，因為該視窗以不存在了。 所以我們在 Client 視窗釋放的同時要將 Client 設為 Nil 當要開啟 Client 時則要先檢查 Client 是否已建立，如果尚未建立則要先建立。如此就不會有錯誤了。    下面的範例你看看應該可以明白，如果還不明白可能要請口齒清晰的前輩們來幫忙了 

引言: 你好： Nil 是物件的一種狀態，代表這個物件尚未建立。 MDI 的 Client 預設的 Close 事件不會把視窗給關閉，而是縮小。 所以需要在 OnClose 的事件中設定 action:=cafree 讓 Client 將視窗釋放。 當視窗釋放後，你再度開啟 Client 視窗時就會發生存取錯誤，因為該視窗以不存在了。 所以我們在 Client 視窗釋放的同時要將 Client 設為 Nil 當要開啟 Client 時則要先檢查 Client 是否已建立，如果尚未建立則要先建立。如此就不會有錯誤了。 下面的範例你看看應該可以明白，如果還不明白可能要請口齒清晰的前輩們來幫忙了 >< face="Verdana, Arial, Helvetica">

即已滿意答案，請給分給提供該答案的答題者。 若不懂給分請看 : 本站採用總積分制度(含如何給分) http://delphi.ktop.com.tw/topic.php?TOPIC_ID=22190 也應參看 : 新手需知---本站使用說明 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=19264

你好請問我在執行時下面這行會有錯誤訊息：這是為什麼呀 if Form2 = nil then Form2 := TForm2.Create(Self);