| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Последовательный просмотр картинок [D6, WinXP]
Popovich A. © (2004-07-20 15:28:00)Приветствую Вас Мастера Delphi. Подскажите , существует ли процедура, позволяющая просмотреть(обратиться) последовательно каждый файл,в частности JPG в указанной папке. Необходимо, через определенный промежуток показать следующую картинку в директории. Заранее признателен и благодарен за любую подсказку!!!
Satan (2004-07-20 15:46:00) [1]
var
f: TSearchRec;
x: integer;
begin
x:=FindFirst(fldr+'\*.jpg',FaAnyFile,f); // fldr - директория с файлами *.jpg
while(x=0) do
begin
// f.Name - имя файла
x:=findnext(f);
end;
findclose(f);
end;
Красный молоток (2004-07-20 15:30:00) [2]Составь список всех *.jpg файлов в нужной директории и показывай по таймеру
| |
