Вниз
Скачать: CL | DM;

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

← →
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 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.025 c
3-1081333332
Ascana_
2004-04-07 14:22
2004.05.02
Как выбранную запись сделать первой?


1-1082031763
gauss
2004-04-15 16:22
2004.05.02
Возник такой вопросик в связи с оператором if ... then


3-1081422620
Zn
2004-04-08 15:10
2004.05.02
Глюки с кодовой страницей - кто виноват?


14-1081765345
Тимохов
2004-04-12 14:22
2004.05.02
BOOL


1-1082307275
DK
2004-04-18 20:54
2004.05.02
Нужно папку запоролить. Как моно сделать




   Наверх