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

Вниз

Список файлов в папке   Найти похожие ветки 

 
WestBronx   (2006-02-26 22:29) [0]

Привет. Подскажите, как в TStrings, занести имена файлов, в N"ой папке?
Спасибо.


 
Dmitrij_K   (2006-02-26 22:56) [1]

Var SearchRec:TSearchRec;
...
If FindFirst("c:\Windows\*.*", faAnyFile, SearchRec)=0 then
repeat
 if (SearchRec and faDirectory)=0 then
   TStrings.Add(SearchRec.Name)
until FindNext(SearchRec) <> 0;    
FindClose(SearchRec);


www.drkb.ru MuST HaVe


 
WestBronx   (2006-02-27 09:03) [2]

Спасибо.
Хм, за урл тоже thx, вечером обязательно скачаю.



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

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

Наверх




Память: 0.46 MB
Время: 0.042 c
2-1140782253
HellSing
2006-02-24 14:57
2006.03.12
Массив из Label ов


3-1137613145
Dataqbazer
2006-01-18 22:39
2006.03.12
Как правльно? в чем может быть ошибка?


2-1140805955
sairus
2006-02-24 21:32
2006.03.12
Работа с Tclient/serverSocket


3-1137401302
fishka
2006-01-16 11:48
2006.03.12
Запись картинки в DBF - файл


4-1135118283
Delphi_is_cool
2005-12-21 01:38
2006.03.12
Как добавить строку