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

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

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


LostHero ©   (2006-03-07 14:40:00) 

Здраствуйте Мастера! Помогите пожалуста в следующей ситуации:
Имеется набор картинок в папке ...\Images все в формате .bmp и имеют названия 1, 2, 3, 4 ... Как по нажатии на кнопку Image1.Picture присваивалось рандомом одно из этих значений рандомом, а Image2.Picture любое другое значение???


Virgo_Style   (2006-03-07 15:02:00) [1]

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


LostHero   (2006-03-07 14:54:00) [2]

А как сделать так чтоб во втором Image картинка не повторялась??


Virgo_Style   (2006-03-07 14:45:00) [3]

S:='..\Images\'+IntToStr( Random(4)+1 )+'.bmp';
Image.Picture.Bitmap.LoadFromFile(S);


Наверх

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