|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Работа с компонентами как с массивами
У меня есть 10 компонентов LabeledEdit и 1 Edit. В поле Edit пользователь вводит число от 1 до 10 и в зависимости от этого столько же первых компонентов LabeledEdit должно остаться видимыми, а остальные - невидимыми. Например, пользователь ввёл "3". Тогда
procedure TForm1.Button18Click(Sender: TObject); LabeledEdit1.Visible:=true; LabeledEdit2.Visible:=true; LabeledEdit3.Visible:=true; LabeledEdit4.Visible:=false; LabeledEdit5.Visible:=false; ................................ LabeledEdit10.Visible:=false; Было бы хорошо это организовать как-то в виде массива, потому что писать 100 строк кода как-то нерационально. Есть ли более простой способ это организовать? может что-то типа этого: var LabEd:array[1..10] of ....... for i:=1 to 10 do LabEd[i]:=TLabeledEdit.Create(Self); |