Как получить список файлов в папке? (Win32)

[trexxet]

Нужно добавить список файлов в папке в динамический массив. Не используя LCL. Заранее спасибо.

[Padre_Mortius]

FindFirst(FindNext). За примерами в поиск по форуму, тема разжевана полностью.

[trexxet]

Для винды без LCL я не нашел примеров. Даже в гугле.

[amateur]

Эххх, а так:
http://www.freepascal.ru/forum/search.php?keywords=FindFirst

Для винды без LCL я не нашел примеров. Даже в гугле.

[Padre_Mortius]

trexxet, LCL это библиотека Лазаруса, а FindFirst описан в модуле sysutils, который является частью fpc.

[ZeUsM]

А что именно используется из LCL для ваших целей? Может без LCL никак?
Сам поиск файлов, как уже было описано выше использует

Код: Выделить всё

function FindFirst(constPath: string; Attr: Integer;varF: TSearchRec): Integer;
function FindNext(varF: TSearchRec): Integer;
procedure FindClose(varF: TSearchRec);

Это все лежит в sysutils и отношения к LCL не имеет.

[trexxet]

Спасибо