also jetzt ma von vorne
ich würde mir mein formular komplett so designen wie ichs gerne möchte.
dann speichere ich die
unit und binde sie in meine main-
unit ein.
gehen wir ma von der standard namesvergebung aus.
mein dynamisch erzeugtes form (dein s.g. chat-fenster bei icq)soll ma
form2 in der
unit unit2 sein. dann fügst du bei deinem projekt
(meist ja form1 in unit1) in der uses klausel "unit2" hinzu.
Delphi-Quellcode:
unit Unit1;
interface
uses
Unit2, Windows, Messages, ...;
dann deklarierst du dir n array der die ganzen dynamisch erstellten
forms aufnimmt.
Delphi-Quellcode:
var
FormList: array of TForm2;
und wenn du ne neue instanz von form2 erstellt dann vergrößerst du
den array um ein element und speicherst es da.
Delphi-Quellcode:
var
frm: TForm2;
begin
frm := TForm2.Create;
frm.Show;
setlength(FormList, length(FormList)+1);
FormList[high(FormList)] := frm;
end;
wenn dein prog beendet wird oder du aus einem anderen grund alle
instanzen von form2 freigeben willst sollte das so aussehen
(z.B. in OnDestroy von deinem form1)
Delphi-Quellcode:
var
i: integer;
begin
for i:=0 to high(FormList) do
FormList[i].free;
setlength(FormList, 0);
end;
edit: da war wohl jemand schneller als ich...