void ListFiles(AnsiString path, TStrings* List)
{
TSearchRec sr;
if (FindFirst(path+"*.*", faAnyFile, sr) == 0)
do List->Add(sr.Name);
while (FindNext(sr) == 0);
FindClose(sr);
}
Как получить состав директории?
которые возврашают или заполняют массив именами файлов и папок в указанной дире!
Или хотябы возвращают кол-во объектов находящихся в ней!
Типа досовской DIR !!! Очень буду благодарен!
Смотри функции FindFirstFile и FindNextFile.
Цитата:
Originally posted by teran
Смотри функции FindFirstFile и FindNextFile.
Смотри функции FindFirstFile и FindNextFile.
А может есть функция типа opendir ??? Стандартная?
Цитата:
Originally posted by kas
А может есть функция типа opendir ??? Стандартная?
А может есть функция типа opendir ??? Стандартная?
Код:
Вызывать так:
[color=blue]ListFiles("c:\\",Memo1->Lines);[/color]
Но помни, что путь всегда должен заканчиваться слэшем (напр. "C;\\Temp\\"), иначе ничего не будет найдено.
Цитата:
Originally posted by SLA
Вызывать так:
[color=blue]ListFiles("c:\\",Memo1->Lines);[/color]
Но помни, что путь всегда должен заканчиваться слэшем (напр. "C;\\Temp\\"), иначе ничего не будет найдено.
Код:
void ListFiles(AnsiString path, TStrings* List)
{
TSearchRec sr;
if (FindFirst(path+"*.*", faAnyFile, sr) == 0)
do List->Add(sr.Name);
while (FindNext(sr) == 0);
FindClose(sr);
}
{
TSearchRec sr;
if (FindFirst(path+"*.*", faAnyFile, sr) == 0)
do List->Add(sr.Name);
while (FindNext(sr) == 0);
FindClose(sr);
}
Вызывать так:
[color=blue]ListFiles("c:\\",Memo1->Lines);[/color]
Но помни, что путь всегда должен заканчиваться слэшем (напр. "C;\\Temp\\"), иначе ничего не будет найдено.
Данке шон :)
Цитата:
Originally posted by kas
А может есть функция типа opendir ??? Стандартная?
А может есть функция типа opendir ??? Стандартная?
Да, в билдере есть по умолчаню.
#include <dirent.h>