16.35.29. function FolderIsEmpty
function FolderIsEmpty(AName : string):boolean;
Возвращает TRUE, если указанная папка отсутствует на диске, или присутствует и пустая (не содержит вложенных папок и файлов). Если папка существует и в ней есть хотя-бы один вложенный объект, то возвращает FALSE. Данная функция очень полезна для операций чистки каталогов, содержащих кеши, дампы, протоколы и т.п.
В имени папки допустимо указывать макросы, подробнее см. в разделе "макросы, допустимые в именах файлов"
Совместимость: AVZ 4.32 и выше
Пример:
begin
if FolderIsEmpty('c:\temp') then
AddToLog('папка c:\temp отсутствует или пустая')
else
AddToLog('в папке c:\temp есть файлы или каталоги');
end.
В примере использовались: AddToLog