![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Динамическое создания нескольких копий формы [D5]
SOLDEN1 © (2004-11-26 15:55:00)Здравствуйте! Подскажите как правильно динамически создать несколко копий формы и чтобы можно было обращаться к ним по отдельности.
SOLDEN1 (2004-11-26 16:44:00) [1]Спасибо. Я решил свою позорную проблему.
Amoeba (2004-11-26 16:35:00) [2]А еще лучше исполоьзовать не динамический массив, а TObjectList.
begin...end (2004-11-26 16:23:00) [3]
> [2] SOLDEN1 (26.11.04 16:15)
var
MyArray: array of TMyForm;
I: Integer;
begin
SetLength(MyArray, {нужное количество элементов});
for I := Low(MyArray) to High(MyArray) do
MyArray[I] := TMyForm.Create(NIL)
end.
Плохиш (2004-11-26 16:17:00) [4]
> SOLDEN1 (26.11.04 16:15) [2]
> Я имел ввиду неограниченное число копий, а Form1, Form2
> - ограничивает в какой-то мере.
repeat
TMyForm.Create(nil);
until false;
PS. Книжку бы что ли почитал.
SOLDEN1 (2004-11-26 16:15:00) [5]Я имел ввиду неограниченное число копий, а Form1, Form2 - ограничивает в какой-то мере.
begin...end (2004-11-26 15:57:00) [6]Экземпляры классов, в том числе и формы, создаются с помощью вызова конструктора.
Например:
var
Form1, Form2: TMyForm;
begin
Form1 := TMyForm.Create(NIL);
Form2 := TMyForm.Create(NIL)
end.
Теперь можно по отдельности ображаться к Form1 и Form2.