[AllenWallker]

Ребят кто нить подскажите как подсчитать кол-во текстовых файлов в папке и в следующих под папках. И как открыть их все для чтения?
Заранее благодарен!

[lmikle]

FindFirst/FindNext/FindClose.
Ну а открывать, зная имя, можно разными способами. Смотря для чего тебе.

[AllenWallker]

открывать чтоб найти определенные слова.FindFirst/FindNext/FindClose -есть ли примеры их использования?

[ryderx34]

Сообщение от AllenWallker

открывать чтоб найти определенные слова.FindFirst/FindNext/FindClose -есть ли примеры их использования?

Код:

var
 SearchRec:TSearchRec;
begin
  if FindFirst('C:\'+'*.jpg', faAnyFile, SearchRec)=0 then
    repeat
      ListBox1.Items.Add(SearchRec.Name);
    until FindNext(SearchRec) <> 0;
  FindClose(SearchRec);
end;

[AllenWallker]

а как все эти файлы открыть для чтения и сделать один большой массив или для каждого найденного собственный?

[AllenWallker]

помогите пожалуйста очень нужно!!