Главная страница
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.039 c
15-1141060496
I am
2006-02-27 20:14
2006.03.26
Оптимальный вариант проверки подлинности


10-1114352917
VVP7%
2005-04-24 18:28
2006.03.26
Регистрация сервера в системе.


2-1142181698
zaN0za
2006-03-12 19:41
2006.03.26
Сравнение типов


10-1115555213
MaFon
2005-05-08 16:26
2006.03.26
Проблема Delphi+Word


15-1141390901
keal
2006-03-03 16:01
2006.03.26
8 марта