Скопировал код отсюда:
http://delphisources.ru/pages/faq/ba...lude_dirs.html (получить список подкаталогов в папке)
Происходит Read Access Violation при вызове процедуры InsDirs. Причем происходит сразу после вызова, т.е. после выполнения строки
InsDirs(root + '\', OutPaper.Count, Root, OutPaper);
Я перемещал описание этой процедуры перед GetTreeDirs, как и положено, но не помогло.
В чем проблема?