Работа с компонентами как с массивом

Тема в разделе "Delphi - Компоненты", создана пользователем nattaella, 11 янв 2011.

Статус темы:
Закрыта.
  1. nattaella

    nattaella Гость

    У меня есть 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:=TLabeledEdit.Create(Self);
     
  2. Dock1100

    Dock1100 :-]

    Регистрация:
    9 ноя 2009
    Сообщения:
    678
    Симпатии:
    0


    именно так, в FormCreate пишеш

    for i:=1 to 10 do
    begin
    LabEd:=TLabeledEdit.Create(Self);
    labed.parrent:=form1;//важно, иначе не будет видно компонент
    ...
    //и далее задаёте свойства
    end;
     
Загрузка...
Похожие Темы - Работа компонентами как
  1. Normann
    Ответов:
    5
    Просмотров:
    3.764
  2. Andrey Kha
    Ответов:
    0
    Просмотров:
    20
  3. Hoasker
    Ответов:
    0
    Просмотров:
    64
  4. garri671
    Ответов:
    0
    Просмотров:
    54
  5. lelik200969
    Ответов:
    0
    Просмотров:
    50
Статус темы:
Закрыта.

Поделиться этой страницей