Wie wär's mit sowas?
Delphi-Quellcode:
type
TMainForm = class(TImage)
public
procedure AddLogFileEntry(msg: String);
{ ... }
end;
procedure TMainForm.AddLogFileEntry(msg: String);
begin
MyListBox.Items.Add(DateTimeToString(Now) + ' --- ' + msg);
end;
// Das hier in der Projektdatei (*.dpr):
f1 := TFirstChildForm.Create(MainForm);
f1.Parent := MainForm;
f2 := TSecondChildForm.Create(MainForm);
f2.Parent := MainForm;
// usw.
// Deine Kindformulate können die Logfileentries dann so machen:
uses
MainForm; // MUSS sein; anders kann man gar nicht auf's Hauptformlar zugreifen
procedure TFirstChildForm.AnyMethodYouCouldThinkOf();
begin
(Parent as TMainForm).AddLogFileEntry;
end;
Ist so ziemlich sauber implementiert. Wie gesagt, ohne
Unit-Einbinden geht's nicht, weil du sonst nur auf Methoden von TWinControl zugreifen könntest, was nicht reichen sollte.
Du kannst das Einbinden natürlich auch umgehen, indem du den Umweg über Windows machst und Messages versendest. Das ist aber kein so besonders sauberes
OOP, weil du keine Typensicherheit hast und außerdem nicht besonders performant, weil du die Message-Queue von Windows zusätzlich beanspruchen musst (oder besser gesagt: öfter beanspruchen musst; du merkst nur nicht, dass du es ständig tust und jetzt müsstest du sogar explizit). Außerdem verlörest du die Plattformunabhängigkeit.
Alles andere (was ich mir vostellen kann) wäre nur ekelig und unpraktisch, weil von Echtzeit überhaupt nicht mehr die Rede sein kann (z.B. beim regelmäßigen Pollen einer Property der Kindformulare).