Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.25;
Скачать: CL | DM;

Вниз

Организация цикла   Найти похожие ветки 

 
max3   (2005-07-06 09:54) [0]

Подскажите плиз. Как организовать цикл по всем файлам в указанной мной папке, имеющих расширение *.txt.
Спасибо.


 
evvcom ©   (2005-07-06 10:01) [1]

FindFirst, FindNext


 
Катерина   (2005-07-06 10:13) [2]

uses SysUtils;
var s :  tsearchrec; code : integer;
begin
 code := findFirst("*.txt",faAnyFile,s);
 while code = 0 do
 begin
   <...s.name...>;
   code := findNext(s);
 end;
end;



Страницы: 1 вся ветка

Текущий архив: 2005.07.25;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.039 c
1-1120566147
K
2005-07-05 16:22
2005.07.25
Смежный компонент TreeView и ListView


1-1120629244
max3
2005-07-06 09:54
2005.07.25
Организация цикла


3-1118566441
0123
2005-06-12 12:54
2005.07.25
Упаковка таблиц Paradox


1-1120646620
Demidoff
2005-07-06 14:43
2005.07.25
Есть ли в Delphi компонент по работе с архивами?


1-1120728956
Aleksandr.
2005-07-07 13:35
2005.07.25
Объясните мне, на что заменять AssignStr, NewStr, DisposeStr?