Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.26;
Скачать: CL | DM;

Вниз

Загрузка картинок   Найти похожие ветки 

 
LostHero   (2006-03-07 14:40) [0]

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


 
Virgo_Style ©   (2006-03-07 14:45) [1]

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


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

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


 
Virgo_Style ©   (2006-03-07 15:02) [3]

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



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

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

Наверх




Память: 0.47 MB
Время: 0.042 c
15-1141390711
Nic
2006-03-03 15:58
2006.03.26
19" LCD NEC 1970-NXB


11-1123192059
Thaddy
2005-08-05 01:47
2006.03.26
Propose small change to _Tobj to the Dacha man ;)


1-1140416878
V.exeR
2006-02-20 09:27
2006.03.26
Корзина (Recycled)


15-1141591611
JUS
2006-03-05 23:46
2006.03.26
IP?


4-1136416486
Piter
2006-01-05 02:14
2006.03.26
LoadLibrary, FreeLibrary