![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как автоматически создать N количество CheckBox'ов? [D7, WinXP]
fuzzu © (2004-12-05 21:12:00)История такая: на Form2 загружается таблица, на Form1 нужно создать столько CheckBox'ов, сколько столбцов в таблице, и чтобы названия столбцов сопоставлялись каждому CheckBox'у.
fuzzu (2004-12-05 22:27:00) [1]Спасибо.
Оказалось, совсем легко... :-()
Zacho (2004-12-05 21:31:00) [2]Например, так:
for i:=0 to Form2.MyDataSet.Fields.Count-1 do
begin
with TCheckBox.Create(Form1) do
begin
Parent:=Form1;
Caption:=Form2.MyDataSet.Fields[i].DisplayLabel;
// Далее устанавливаем нужные width, height, top, left
// и прочие св-ва чекбокса.
end;
end;
novice__man (2004-12-05 21:30:00) [3]Создай динамический массив компанентов.
ListOfCheckBox: array of tCheckBox;
и вперед! На этом сайте как в форуме так и FAQ неоднократно встречались обсуждения массива компанентов.