Aufruf ohne bestimmten Namen

[fr0g]

Guten Tag

Tut mir erstmal Leid das mir kein besserer Titel eingefallen ist. Denn ich habe folgendes Problem. Ich erstelle in meinem Programm eine bestimmt Anzahl von Formblättern aus einem vordefinierten herraus.
Also:

Delphi-Quellcode:

for i:=0 to 50 do begin
 form[i].MsgBox:=TFicMessageBox.Create(self);
 form[i].MsgBox.Name:='icY'+IntToStr(i);
end;

In dieser Form befindet sich ein Memo-Feld. In dieses soll jetzt nach einer bestimmten Vereinbarung ein Text hinzugefügt werden. Aber nur speziell dnan in Formblatt 1 oder 2 ... Nur wenn ich dann vom Programm aus schreibe [ist im jeweiligen n-ten Formblatt]:

Delphi-Quellcode:

if(...)and(...)then
  mhistory.Lines.Add(Fhaupt.evstext.Text);
end;

Dann fügt er aber in jedes erstellte Formblatt den Text und nicht nur in dem speziellen. Also müsste ich Für jedes Formblatt auch noch den Namen des Memo-Feldes ändern.

Delphi-Quellcode:

for i:=0 to 50 do begin
 form[i].MsgBox:=TFicMessageBox.Create(self);
 form[i].MsgBox.Name:='icY'+IntToStr(i);
 form[i].MsgBox.mhistory.Name:='mhistory'+IntToStr(i);
end;

So. Das ist ja auch alles gut und schön. Aber wie ist denn jetzt der Befehl dafür das er auf die Memo-Felder zugreift? Weil mit:
mhistory.Lines.Add(Fhaupt.evstext.Text); kann ich ja nicht arbeiten weil der Name ja nicht mehr stimmt. Und ne Variable im Aufruf geht ja auch nicht. Oder? <- Und das ist meine Frage!

Lange Rede kurzer Sinn. Hoffe es kann mir jemand helfen.
mfg fr0g