Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.47 MB
Время: 0.043 c
14-1096940811
Думкин
2004-10-05 05:46
2004.10.24
С днем рождения! 5 октября


3-1096405958
AndrewK
2004-09-29 01:12
2004.10.24
Как переименовать объект в IB Expert?


1-1097078281
TeNY
2004-10-06 19:58
2004.10.24
Почему теряется значение переменная?


6-1092898751
PL
2004-08-19 10:59
2004.10.24
Еще раз о пересылке файлов


14-1096634877
Aleckceych
2004-10-01 16:47
2004.10.24
Пожалуйста, скиньте ссылки