Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.14;
Скачать: CL | DM;

Вниз

Зацикливаем TControl   Найти похожие ветки 

 
AGN   (2004-03-04 09:23) [0]

Давно мучает такой вопрос - как работать с однотипными элементами управления в циклах и т.п.

Приведу простой пример:

procedure TForm1.Button1Click(Sender: TObject);
begin
CheckBox1.Checked := true;
CheckBox2.Checked := true;
CheckBox3.Checked := true;
CheckBox4.Checked := true;
CheckBox5.Checked := true;
end;

как такое переписать в виде цикла, типа
for i :=1 to 5 do CheckBox[i].Checked := true; :)

Как такую фигню правильно описать - сам я эксперементировал долго и по всякому, но уже сдался.


 
Palladin ©   (2004-03-04 09:24) [1]

TComponent.FindComponent


 
AGN   (2004-03-04 09:31) [2]

дико извиняюсь, но можно поподробнее? как должен выглядеть приведённый пример?
спасибо


 
Palladin ©   (2004-03-04 09:33) [3]

var
c:TComponent;

for i:=1 to 5 do
begin
c:=Form1.FindComponent("CheckBox"+IntToStr(I));
if c Is TCheckBox then (c as TCheckBox).Checked:=True;
end;



Страницы: 1 вся ветка

Текущий архив: 2004.03.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.039 c
8-43683
Sergious
2003-11-12 19:58
2004.03.14
Как проиграть mp3 без TMediaPlayer и без BassPlayer ?


14-43760
Delphin
2004-02-19 15:11
2004.03.14
Hi all!! Кто - нить знает принципы работы Нюков ? (Nuke)


3-43360
tomek
2004-02-15 11:03
2004.03.14
Глюк TStoredProc


1-43580
tararasyk
2004-02-27 14:32
2004.03.14
Как нарисовать перпендикуляр ?


3-43367
ceval
2004-02-15 14:41
2004.03.14
Как открыть несколько таблиц в DBGrid