Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Картинки в массив


volkafff ©   (2011-05-07 13:55:00) 

Здравствуйте! Мне нужно загрузить 25 картинок(1-25.bmp)в массив картинок.Вот как я это сделал:
CODE>procedure Twin.FormCreate(Sender: TObject);
var
i:integer;
begin
Randomize;
for i:=1 to 25 do
begin
image2.Picture.LoadFromFile(IntToStr(i)+'.bmp');
ticket[i]:=image2.Picture;
end;
end;
Но в итоге у меня во всём массиве(с 1 по 25 индекс) все картинки-25.bmp! А мне-то нужны разные! В чём ошибка?


Anatoly Podgoretsky   (2011-05-08 10:10:00) [1]

> Плохиш  (08.05.2011 03:56:10)  [10]

Старье, теперь модны облака


Плохиш   (2011-05-08 03:56:00) [2]


> Германн ©   (07.05.11 15:02) [7]


> clickmaker ©   (07.05.11 21:19) [8]

Мелко, настройки должны храниться на центральном сервере, работа с ними осуществляться через веб-сервис.


Плохиш   (2011-05-08 03:46:00) [3]


> Ещё один вопрос:как сделать сохранение настроек?

Чем несколько миллионов объяснений из гугла не устраивают?


clickmaker   (2011-05-07 21:19:00) [4]

> как сделать сохранение настроек?

TRegistry, TIniFile + F1


Германн   (2011-05-07 15:02:00) [5]


> как сделать сохранение настроек?

Записать настройки в файл, например.


volkafff   (2011-05-07 14:55:00) [6]

Ещё один вопрос:как сделать сохранение настроек?
Объясните,хотя бы вкратце,пожалуйста.


volkafff   (2011-05-07 14:52:00) [7]

А в классе TPicture  тоже так же? Спасибо!


Германн   (2011-05-07 14:52:00) [8]


> Объясню по-другому.Мне надо 25 картинок ещё на уровне программирования
> "засунуть" в массив.

Ничего себе объяснение! "На уровне программирования" :)


Ega23   (2011-05-07 14:40:00) [9]


> Но в итоге у меня во всём массиве(с 1 по 25 индекс) все
> картинки-25.bmp! А мне-то нужны разные! В чём ошибка?


В том, что основ не знаешь.

arr: array[1..25] of TBitmap;

var
 i: Integer;
begin
 for i := 1 to 25 do
 begin
   arr[i] := TBitmap.Create;
   arr[i].LoadFromFile(IntToStr(i)+'.bmp');
 end;
end;


volkafff   (2011-05-07 14:25:00) [10]

Всмысле?

Объясню по-другому.Мне надо 25 картинок ещё на уровне программирования "засунуть" в массив.Как это можно сделать?


Плохиш   (2011-05-07 14:04:00) [11]


> В чём ошибка?

В незнании основ. Для каждой картинки надо создавать свой экземпляр.


Наверх

Титульная страница Поиск, карта сайта Написать письмо