Текущий архив: 2004.10.24;
Скачать: CL | DM;
ВнизСколько файлов в папке? Найти похожие ветки
← →
Dr. Genius (2004-10-08 09:22) [0]Вопрос 1.
Допустим, есть папка Reports, находящаяся в одном каталоге с *.exe-файлом программы. Как узнать, сколько файлов в папке Reports?
Вопрос 2.
Как переместить файл, находящийся в одном каталоге с *.exe-файлом программы в папку Reports?
← →
Reindeer Moss Eater © (2004-10-08 09:24) [1]1. Сосчитать их
2. MoveFile
← →
piople © (2004-10-08 09:25) [2]FindFirst, findNext?!
← →
Dr. Genius (2004-10-08 09:38) [3]Я что-то слышал про FindFirst, FindNext, но как ими пользоваться? Если не трудно, напишите код.
← →
Reindeer Moss Eater © (2004-10-08 09:39) [4]Код примера написан в хелпе.
← →
Valwhite (2004-10-08 12:48) [5]Взято из http://delphiworld.narod.ru/
Пример иллюстрирующий поиск всех файлов и каталогов в определенном каталоге:var
SearchRec: TSearchRec;
...
if FindFirst("c:\Windows\*.*", faAnyFile, SearchRec) = 0 then
repeat
{ Вот здесь мы можем делать с найденным файлом что угодно
SearchRec.name - имя файла
ExpandFileName(SearchRec.name) - имя файла с полным путем
Можно наращивать счетчик файлов e.t.c.
}
until
FindNext(SearchRec) <> 0;
FindClose(SearchRec);
Там же, возможно тоже поможет:
http://delphiworld.narod.ru/base/change_all_exe_files_in_win_dir.html
Страницы: 1 вся ветка
Текущий архив: 2004.10.24;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.042 c