| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Копировать каталог [D7, Win2k, WinXP]
DimDim © (2005-01-16 13:09:00)Уважаемые Мастера, как скопировать весь каталог (с подкаталогами).
Эта тема уже встречалась, но пока небыло необходимости - не обратил внимание.
Хоть ссылку дайте!
DimDim (2005-01-16 22:24:00) [1]Ну, тогда проще копировать каждый файл по отдельности. Тогда хоть атрибуты файлов сохраняются.
begin...end (2005-01-16 22:07:00) [2]> DimDim © (16.01.05 22:02) [3]
Думаю, потом придётся вручную устанавливать атрибуты скопированных файлов с помощью SetFileAttributes.
Kerk (2005-01-16 22:03:00) [3]DimDim © (16.01.05 22:02) [3]
P.S. Действительно Дмитриев развелось... Пора отстрелевать.
Ты не представляешь насколько ты прав!!! :)
DimDim (2005-01-16 22:02:00) [4]Большое спасибо. Работает.
Вот только одна маленькая неприятность: при копировании файлов с CD ставит атрибуты файлов "Только для чтения", а мне они нужны с полным доступом.
Как это обойти? Заранее спасибо!
P.S. Действительно Дмитриев развелось... Пора отстрелевать.
begin...end (2005-01-16 13:28:00) [5]> DimDim © (16.01.05 13:09)
uses ShellAPI;
var
Structure: TSHFileOpStruct;
FromPath, ToPath: String;
begin
FromPath := ...;
ToPath := ...;
ZeroMemory(@Structure, SizeOf(Structure));
Structure.wFunc := FO_COPY;
Structure.fFlags := FOF_NOCONFIRMATION + FOF_SILENT;
Structure.pFrom := PChar(FromPath + #0);
Structure.pTo := PChar(ToPath + #0);
SHFileOperation(Structure)
end.
P.S. Мне кажется, или среди программистов имя Дмитрий встречается очень часто?
Fay (2005-01-16 13:19:00) [6]Ищи по форуму.
| |
