[kotyarko@fb]

а что нибудь попроще допустим через DirExists »

Если проще, то можете попробовать из того же SHFile применить функцию CopyDir и указать что-то типа: '{src}\*'. Т.к. там есть то же условие (if SR.Attributes = FILE_ATTRIBUTE_DIRECTORY), то может получится.