Главная страница
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.047 c
15-1141201191
McSimm
2006-03-01 11:19
2006.03.26
Funny UNIX Shell Commands


15-1141278167
Ega23
2006-03-02 08:42
2006.03.26
С Днём рождения! 2 марта


2-1142065880
AlexeyT
2006-03-11 11:31
2006.03.26
Число отображаемых строк в TMemo


2-1142049830
mfender
2006-03-11 07:03
2006.03.26
Редактор TStrings в Design-Time


1-1140452149
Gear
2006-02-20 19:15
2006.03.26
Динамическое размещение объектов на форме.