OnCloseQuery in einer MDI-Anwendung

[s.h.a.r.k]

Ich würde von vorn herein davon ausgehen, dass die MDI-Childs nichts über das Parent wissen, sondern lediglich eine Schnittstelle anbieten, um "anderen" die Möglichkeit zu bieten, zu erfahren, ob Änderungen im MDI-Child vorgenommen wurden -- eine Property bietet sich hier wunderbar an. Daraus folgt, dass ich alle "Wollen Sie die Änderungen speichern?"-Dialoge in das Parent-Window legen würde. Du kannst beim Erzeugen eines MDI-Childs ja folgendes machen:

Delphi-Quellcode:

procedure TParentForm.CreateChild();
var
  mdi : TMdiChild;
begin
  // Self = ParentWindow
  mdi := TMdiChild.Create(Self);
  mdi.OnCloseQuery := Self.OnMdiChildCloseQuery;
end;

procedure TParentForm.OnMdiChildCloseQuery(Sender: TObject);
begin
  if (TMdiChild(Sender).Changed) then
  begin
    { Abfrage, ob Änderungen des MDI-Childs gespeichert werden sollen }
  end;
end;

procedure TParentForm.OnCloseQuery();
var
  i : Integer;
  Changed : Boolean;
begin
  { Prüfen, ob irgendein MDI-Child geändert würde }
  Changed := False;
  for i := 0 to Self.MDIChildCount - 1 do
  begin
    if (TMdiChild(Self.MDIChildren[i]).Changed) then
    begin
      Changed := True;
      break;
    end;
  end;
  if (Changed) then
  begin
    // ...
  end;
end;

[Codehunter]

Im Prinzip läuft es bei mir auch genau so. Nur dass das ParentForm in meinem Fall eben ein Property im ChildForm setzt wenn die Close-Anforderung für das ParentForm vorliegt. Hintergrund ist, dass es zwei verschiedene "Willste mich speichern?"-Dialoge gibt. Einen simplen, der sich nur auf das MDI-Child bezieht wenn es geschlossen wird und einen umfassenden, der eine Dateiliste der veränderten Dateien anzeigt. Das Problem war eben nur, im OnCloseQuery unterscheiden zu können, welche Art Close-Anforderung vorliegt. Sonst hätte man bei einem Application-weiten Close vor dem Erscheinen des umfassenden "Willste mich speichern?"-Dialoges erstnoch jede Menge Einzelnachfragen hätte wegklicken müssen.

Ich habs dann noch so weit verfeinert dass der ausführliche Speichern-Dialog nur dann erscheint wenn mehr als eine veränderte Datei vorliegt. Egal ob die Close-Anforderung nun global war oder nur auf das Child bezogen.

[s.h.a.r.k]

So hast du das Parent und das Child aber sehr stark verzahnt. Mit meiner lösung übernimmt alles das Parent -- ich glaub sogar für diese technik gibts ein Pattern.