Текущий архив: 2004.10.10;
Скачать: CL | DM;
Вниз
Последовательный просмотр картинок Найти похожие ветки
← →
Popovich A. (2004-07-20 15:28) [0]Приветствую Вас Мастера Delphi. Подскажите , существует ли процедура, позволяющая просмотреть(обратиться) последовательно каждый файл,в частности JPG в указанной папке. Необходимо, через определенный промежуток показать следующую картинку в директории. Заранее признателен и благодарен за любую подсказку!!!
← →
Красный молоток (2004-07-20 15:30) [1]Составь список всех *.jpg файлов в нужной директории и показывай по таймеру
← →
Satan © (2004-07-20 15:46) [2]
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;
Страницы: 1 вся ветка
Текущий архив: 2004.10.10;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.06 c