alle activemdichilds schließen funktioniert nicht

[Overclocker]

Hi,
folgende Procedur schließt mir immer ein aktuelles MDI Child Fenster:

Delphi-Quellcode:

while assigned(activemdichild)
do
activemdichild.free;//vorher close

Folgendes Szenario:

Aus der Main-MDI Form öffne ich ein MDI Child um eine Suche auszuführen (von Benutzern).
Beim Doppelklick auf das DBGrid wo alle Benutzer angezeigt werden, öffnet sich darüber ein neues MDI Child mit dem Profil des Benutzers.


Wenn ich jetzt links einen anderen Button anklicke, um ein ganz anderes MDI Child Fenster zu öffnen, führt er die Procedure (siehe oben) aus.
Allerdings schließt er mir immer nur 1 MDI Child Fenster (nämlich das mit dem Profil). Das Suchfenster wird nicht mehr angezeigt, existiert allerdings noch.
Wenn ich im OnClose des Profil diese Procedur mit einfüge, dann wird das Suchfenster auch RICHTIG geschlossen und es kommt zu keinem Fehler mehr beim nächsten Aufruf.

Jetzt die Frage: Wieso schließt er mir immer nur das oberste MDI CHild Fenster, wenn doch in der Procedure eine WHILE Schleife ist, die alle Childs schließen sollte?

Danke für die Hilfe