Читать файлы один за другим из каталога

[savov]

Всем добра!
Возникла надобность читать файлы (.xml) подряд из нужного каталога. Определить каталог легко, читать файл и его парсить тоже могу. Вопрос: какими функциями считать заголовки файлов из каталога и как определить, что все файлы считаны?

[edward_K]

str := GetFirstFile(PathJob,'*.dbf');
while str <> strDataIsEmpty do
{
чего то там
str := GetNextFile;
}