Массив Timage

[Алекссс]

скажите как сделать что бы при отображении массива был не только в подряд один и тот же рисунок а все которые находятся в этой папке пишу код

var i:integer;
    img: array [0..10] of TImage;
begin
  for i:=0 to 10 do
  begin
   img[i]:=TImage.Create(Self);
   img[i].Parent:=ScrollBox1;
   img[i].Name:=('Foto')+inttostr(i);
   img[i].Width:=200;
   img[i].Height:=200;
   img[i].Center:=true;
   img[i].Picture.LoadFromFile(DirectoryListBox1.FileList.FileName);
   img[i].Left:=i*250+10;
   img[i].Top:=10;
   img[i].Cursor:=crHandPoint;
   img[i].Visible:=true;
  end;

а он выдает только 1 и тот же рисунок в подряд, что можно сделать и как быть с ограничением [0..10] а если у меня их там 1500 фотографий будеит как быть....

[mihali4]

img[i].Picture.LoadFromFile(DirectoryList Box1.FileList.FileName);

Грузится во все имэджи одно и то же.

у меня их там 1500 фотографий будеит

Что у вас за монитор, что будет показывать одновременно 1500 картинок с размерами

img[i].Width:=200;
img[i].Height:=200;

да еще и с зазором 60 ???

img[i].Left:=i*250+10;

Да еще и в один ряд...

img[i].Top:=10;

[Aliens_wolfs]

попробуй измени строку в своем коде
будут грузиться файлы в директории и сделай проверку на количество файлов и твоих TImage

img[i].Picture.LoadFromFile(DirectoryListBox1.FileList.Items[i]);

либо так:
Сделай изменения в своем коде. Будут создаваться TImage по количеству файлов в директории

var i:integer;
    img: array [0..2000] of TImage;
begin
  for i:=0 to DirectoryListBox1.FileList.count-1 do
  begin
   img[i]:=TImage.Create(Self);
   img[i].Parent:=ScrollBox1;
   img[i].Name:=('Foto')+inttostr(i);
   img[i].Width:=200;
   img[i].Height:=200;
   img[i].Center:=true;
   img[i].Picture.LoadFromFile(DirectoryListBox1.FileList.items[i]);
   img[i].Left:=i*250+10;
   img[i].Top:=10;
   img[i].Cursor:=crHandPoint;
   img[i].Visible:=true;
  end;

Если много файлов то делай частичную загрузку иначе память загрузишь и ошибка появиться о нехватки ресурсов. Можно подгружать например в событиях ScrollBox1 у тебя же на нем появляются картинки.