Главная страница
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.026 c
4-1124265334
Warlock
2005-08-17 11:55
2005.10.16
Копирование в службе и права доступа


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


4-1124033378
ArtemESC
2005-08-14 19:29
2005.10.16
Дата создания Link - ом EXEшника


3-1125917057
oradb
2005-09-05 14:44
2005.10.16
Blob, как параметр хранимой процедуры


2-1127051375
Igor_thief
2005-09-18 17:49
2005.10.16
DBGrid