работа с несколькими объектами

← →
Legolas (2007-01-28 19:39) [0]

Помогите пожалуйста, как можно задать какие-нибудь параметры нескольким объектам через цикл? (К примеру загрузить одну и туже картинку в Image1, Image2...до Image25)

← →
Olivetti (2007-01-28 19:43) [1]

var
i: integer;
Img: TImage;
begin
for i := 1 to 25 do
begin
Img := TImage(FindComponent("Image" + IntToStr(i)));
if (Img <> nil) then
Img.Picture.LoadFromFile("picture.bmp");
end;
end;

работа с несколькими объектами Найти похожие ветки