Показать сообщение отдельно
  #8  
Старый 23.10.2012, 22:12
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Да можно и самому набросать, используя FindFirst и FindNext с атрибутом faDirectory (FindFirstFile и FindNextFile с атрибутом FILE_ATTRIBUTE_DIRECTORY если по дзену). Но проще использовать тот, который нашел.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием