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

Вниз

Сканирование каталога...   Найти похожие ветки 

 
Fog ©   (2002-10-16 20:34) [0]

...или как оно там называется.. Вообщем мне нужно знать список файлов находящехся в директории .


 
LongIsland ©   (2002-10-16 20:41) [1]

http://delphi.mastak.ru/articles/panov/index.html


 
Anatoly P   (2002-10-16 20:45) [2]

FindFirst();
FindNext();


 
fdghsdfgsdfg   (2002-10-16 21:03) [3]

lb_dir/cb_dir


 
Геннадий ©   (2002-10-16 21:17) [4]

var
SF : TSearchRec;
HA : Word;
FileList : array of String; //здесь список файлов
begin
If FindFirst("C:\*.*", faAnyFile - faDirectory - faVolumeID, SF) <> 0
then begin
ShowMessage("Нет файлов в указанной папке");
Exit;
end;

Repeat
HA:= Length(FileList);
Inc(HA);
SetLength(FileList, HA);
FileList[HA-1]:= SF.Name;
Until FindNext(SF)<>0;
FindClose(SF);
end;


Что-то в этом духе...



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
6-92641
bnn
2002-08-27 12:54
2002.10.28
Ошибка при работе с FTP клиентом SOCKET ERROR 10054


14-92675
AL2002
2002-10-07 12:29
2002.10.28
Ва-ва, чё делать?


14-92710
AL2002
2002-10-08 13:17
2002.10.28
Девушки. Не напивайтесь никогда.


1-92542
SergeyDon
2002-10-16 10:33
2002.10.28
Создание компонента


1-92549
Jony
2002-10-16 13:50
2002.10.28
Как задать цвет шрифта для акт. ячейки в DBGrid1DrawColumnCell?