Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.16;
Скачать: CL | DM;

Вниз

Как программно скопировать папку в другу директорию ?   Найти похожие ветки 

 
alpine   (2005-09-23 14:19) [0]

Доброго времени суток уважаемые мастаки.
Мне нужно средствами дельфи скопировать папку с кучей файлов в другую директорию. Подскажите кто знает ... Заранее спасибо !


 
TUser ©   (2005-09-23 14:20) [1]

SHFileOperation


 
ssk ©   (2005-09-23 14:28) [2]

пути подставишь свои


var
 OpStruc: TSHFileOpStruct;
 frombuf, tobuf: Array [0..128] of Char;
begin
 FillChar( frombuf, Sizeof(frombuf), 0 );
 FillChar( tobuf, Sizeof(tobuf), 0 );
 StrPCopy( frombuf, "d:\brief\*.*" );
 StrPCopy( tobuf, "d:\temp\brief" );
 with OpStruc do begin
   Wnd := Handle;
   wFunc := FO_COPY;
   pFrom := @frombuf;
   pTo := @tobuf;
   fFlags := FOF_NOCONFIRMATION or FOF_RENAMEONCOLLISION;
   fAnyOperationsAborted := False;
   hNameMappings := Nil;
   lpszProgressTitle := Nil;
 end;
 ShFileOperation( OpStruc );
end;



Страницы: 1 вся ветка

Текущий архив: 2005.10.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.054 c
2-1126957033
AlexLines
2005-09-17 15:37
2005.10.16
Относительные пути и win98


1-1127790985
HelpMy
2005-09-27 07:16
2005.10.16
Service & DLL


10-1105775800
SMT
2005-01-15 10:56
2005.10.16
Программное определение наличия Excel


2-1127201435
Tab
2005-09-20 11:30
2005.10.16
"правильное" выполнение запросов


9-1117733233
.cpp
2005-06-02 21:27
2005.10.16
Волшебная точка