| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Создание и удаление label, checkbox, combobox
Zirus © (2005-12-10 06:07:00)Написал подпрограмму, которая создаёт в GroupBox всякие другие компоненты: label, checkbox, combobox. Поле Name нумеруется Lab0, Lab1, ... Порядок следования компонентов - случайный: может чередоваться, например label и checkbox. Name при добавлении любого компонента инкрементируется:
label.name:='Lab0'
checkbox.name:='Lab1'
label.name:='Lab2'
Так как подпрограмма должна вызываться много раз, каждый раз по разному создавая компоненты, то встаёт вопрос про destroy ВСЕХ созданных компонентов, расположенных на GroupBox. Как это можно организовать? Может, можно удалить всех потомков в GroupBox сразу?
TUser (2005-12-10 12:04:00) [1]Еще можно Owner'а назначить, если удаление требуется при разрушении групбокса - передается как параметр в конструктор объекта.
Zirus (2005-12-10 06:43:00) [2]Большое спасибо!
p.s. (п.с.) я думал, что знаю. главное, меня поняли :-)
Джо (2005-12-10 06:28:00) [3]П.С. Не употребляй терминов, значения которых не знаешь: поле, потомок... :)
Джо (2005-12-10 06:27:00) [4]
var
I: Integer;
begin
for I := GroupBox1.ControlCount-1 downto 0 do
GroupBox1.Controls[I].Free;
end;
| |
