Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];

Вниз

Как рандомайзом выбирать картинки?   Найти похожие ветки 

 
ASvencim   (2004-04-15 16:28) [0]

Я тут прогу решил написать, которая при каждой загрузке компьютера меняет картинку рабочего стола. Как организовать случайный выбор графического файла из определенной папки?


 
Reindeer Moss Eater ©   (2004-04-15 16:37) [1]

А не рандомайзом уже умеешь это делать?


 
ASvencim   (2004-04-15 16:39) [2]

AssignFile (Pic, "*.jpg");
Если знать адрес и название умею, а если надо выбрать одну из 200?


 
Алхимик ©   (2004-04-15 16:42) [3]

Занести имена картинок в список, массив и т.д.
Выбирать случайный индекс.


 
Fay ©   (2004-04-15 16:43) [4]

FindFirst
FindNext
CloseFind
HappyEnd


 
Рамиль ©   (2004-04-15 16:44) [5]

random(200) + FindFirst, FindNext


 
Reindeer Moss Eater ©   (2004-04-15 16:45) [6]

AssignFile (Pic, "*.jpg");

И как это связано со сменой картинки рабочего стола?
Или это не рабочий стол Windows?


 
ASvencim   (2004-04-15 16:57) [7]

>Занести имена картинок в список, массив и т.д.
>Выбирать случайный индекс.
Дана папка с картинками. И как занести их имена в массив?


 
Dimka Maslov ©   (2004-04-15 17:05) [8]

TStringList.Add


 
ASvencim ©   (2004-04-15 17:20) [9]

>TstringList.Add
А весь код написать не мог - бы?


 
Fay ©   (2004-04-15 17:24) [10]

Загляни в [4], [5] и [8]. Нажми F1. Если вопросы останутся (после этого!) - ждём.


 
Dimka Maslov ©   (2004-04-15 17:38) [11]

http://delphibase.endimus.com/?action=viewfunc&topic=fileops&id=10046


 
ASvencim ©   (2004-04-15 22:16) [12]

http://delphibase.endimus.com/?action=viewfunc&topic=fileops&id=10046
Использовал процедуру, но
if MatchesMask(Name, Mask) then List.Add(StartFolder+Name);
выдает ошибку:  Symbol "include TrailingBackslash" to a platform. Не пойму, в чем дело?


 
Fay ©   (2004-04-16 02:01) [13]

Ты сам думать вАщЕ собираешься? Как тебе помогать?
- Ты что делаещь?
- Ничего.
- А ты что?
- Ему помогаю...


 
kaif ©   (2004-04-16 03:28) [14]

Сдается мне, что это кандидат для орешника...


 
Fay ©   (2004-04-16 03:35) [15]

Привет, kaif! Есть мнение, что "Орешник" переехал в форумы. 8)


 
kaif ©   (2004-04-16 03:40) [16]

2 Fay ©   (16.04.04 03:35) [15]
:)))))))))



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

Форум: "Основная";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.036 c
1-1082109344
forest
2004-04-16 13:55
2004.05.02
Как очистить TImage


4-1078218124
Gia Gvatua
2004-03-02 12:02
2004.05.02
Повторный запуск


1-1082100051
DimonNew
2004-04-16 11:20
2004.05.02
TExcelWorkSheet


4-1079030059
BaDeVlad
2004-03-11 21:34
2004.05.02
Как сделать многоуровневую отмену в Richedit?


3-1081336264
Guest1z
2004-04-07 15:11
2004.05.02
Access Клиент-Сервер запросы из клиента на сервер





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский