Показать сообщение отдельно
  #6  
Старый 09.09.2011, 11:02
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

ну так:
procedure MakeDir(const ADirName: string);
сканируешь локальную папку, создаешь удаленные папки и копируешь в них файлы, рекурсивно.
__________________
Пишу программы за еду.
__________________
Ответить с цитированием