如何在MDI main form 中得知他的MDI child 關閉了        K.Top是我見過最棒的程式社群
如果沒有K.Top真不知道該怎麼活

引言: 如何在MDI main form 中得知他的MDI child 關閉了 K.Top是我見過最棒的程式社群
如果沒有K.Top真不知道該怎麼活

我目前的作法,不是很好,還請前輩教導 在MainForm 建一個Function給 ChildForm Call Mail procedure TSYSMain.ChildClose(sender: Tform); begin if PB_NowMode = 'OPENFORM' then //必須反回原Access begin GoToApp(); end; end; ----------------------------- Child procedure TJFForm.FormClose(Sender: TObject; var Action: TCloseAction); begin SYSMain.ChildClose(self); Action := caFree; end;

第一種作法，當然就是在 MDI Child OnClose 事件中添加 呼叫 Mainform 的方法。以便得知 MDI Child 要關閉了。    第二種方法，透過 TApplicationEvents。 就是 Application.OnMessage 事件中，我們知道在關閉視窗。 會引發一個訊息。(Showmodal 無效) 如下：

procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
  if Msg.message = 45089 then
  begin
    Showmessage(inttostr(Msg.hwnd));
  end;
end;

可在此得知 MDI Child 要關閉了。

    還是前輩厲害,我又學到了 但我原本也在想用ApplicationEvents 但不知如何區份Event ?? 不知前輩是如何得知的??

Delphi的體系真是龐雜啊 學了那麼久還是看不到它的全貌 還要多久,要怎麼學才能達到 /> 如果沒有

引言: Delphi的體系真是龐雜啊 學了那麼久還是看不到它的全貌 還要多久,要怎麼學才能達到<>> 啊~我會不會太不自量力了呢... /> 如果沒有>< face="Verdana, Arial, Helvetica"> 大大！您也未免太誇張了一點！ 程式設計的領域太大了。 窮極一生的努力，也無法得其全貌。 我也是學的多，忘了更多！.....嘿嘿... 正所謂「學而知不足！」 代表大大學了很多，才有這樣的想法。