Имена компонентов

← →
scorpi (2003-01-08 13:34) [0]

Мужики, помогите!!!
Как мне осуществить обращение к свойствам одинаковых компонентов через цикл???
Чтобы не писать каждый раз вот так
Button1.Enabled:=false;
.....
.....
Batton9.Enabled:=false;

Типа вот так

For i:=1 to 10 do
Button[i].enabled:=false;

но естественно по другому как-то???

← →
MBo (2003-01-08 13:41) [1]

findcomponent

← →
Bis (2003-01-08 13:43) [2]

вроде того

for i:=0 to ComponentCount-1 do
if Components[i] is TButton then
(Components[i] as TButton).Enabled:=False;

вызывать в методе формы конечно ...
или массив заведи из "бутонов"

← →
stone (2003-01-08 13:43) [3]

var
i: integer;
c: TComponent;
begin
for i: = 0 to ComponentCount-1 do
begin
c := Components[i];
if c is TButton then
(c as TButton).Enabled := true;
end;
end;

← →
Думкин (2003-01-08 13:58) [4]

c.Enabled - тоже валит, без асов.

Имена компонентов Найти похожие ветки