Загрузка картинок

[abaza]

Есть диалог выбора фото. Если одна фотка, загружается в один image. Если больше, то на экране появляется 6 image и каждая фотка загружается в соответствующий image. Как в C++ Builder 6 сделать это? Заранее спасибо

[Sazary]

Нужно создавать объекты TImage динамически.
Вот пример: сколько файлов выбрано, столько и объектов создается.

 TImage **array;
 int imagesCount;

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 int height,width;
OpenDialog1->InitialDir = GetCurrentDir();

if(OpenDialog1->Execute())
 {
 imagesCount = OpenDialog1->Files->Count;
 array = new TImage*[imagesCount];
 width = Form1->Width / imagesCount - 20;
 height = width;
 for(int i=0; i<imagesCount; i++)
  {
   array[i] = new TImage(Form1);
   array[i]->Parent = Form1;
   array[i]->Left = 20 + i*width;
   array[i]->Top = 100;
   array[i]->Width = width;
   array[i]->Height = height;
   array[i]->Picture->LoadFromFile(OpenDialog1->Files->Strings[i]);
  }
 }

}

[abaza]

Спасибо. Еще такой вопрос. Как открыть картинки и листать, просматривать их вперед-назад?Я вперед сделал, а как назад сделать?

[Stilet]

Я вперед сделал

А как ты вперед сделал?
Я бы на твоем месте при условии что листаемые картинки лежат в одной папке, загрузил их имена в ListBox

SendMessage(ListBox1->Handle, LB_DIR, 0 , <с:\foto\*.bmp>);

(Сорри не помню как в Бильдере это правильно пишется). И потом по этому Листу ходил туда-сюда-обратно. И загружал по имени файла из выбранного элемента списка.