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

Вниз

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

← →
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;

---

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

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

Наверх

Память: 0.46 MB
Время: 0.029 c