Главная страница
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.059 c
1-1140602547
Alexandr
2006-02-22 13:02
2006.03.26
преобразовать строку


2-1142165553
dera
2006-03-12 15:12
2006.03.26
Как отловить событие движения курсора по записям в DBGrid-е?


2-1141918242
Vitalik__
2006-03-09 18:30
2006.03.26
Как получить серийник винчестера?


15-1141655648
DVM
2006-03-06 17:34
2006.03.26
Delphi 2006 нет пункта Установить компонент. Че то я торможу.


15-1141379233
Mozart
2006-03-03 12:47
2006.03.26
Звуковой файл в линию через модем...