Главная страница
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.041 c
15-1141635706
DelphiN!
2006-03-06 12:01
2006.03.26
Установка 10ых Инди на Д6


2-1142248982
Id
2006-03-13 14:23
2006.03.26
Пользователь SYSDBA


15-1141329344
Cardinal
2006-03-02 22:55
2006.03.26
Ошибка чтения файла на нормальном диске


15-1141497250
ArtemESC
2006-03-04 21:34
2006.03.26
Получить текущую дату JavaScript?


2-1142251872
S{h}ura
2006-03-13 15:11
2006.03.26
MSAccess