Главная страница
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.028 c
2-1127104746
nik7777
2005-09-19 08:39
2005.10.16
Создать текстовый файл


2-1126973912
Oleg77
2005-09-17 20:18
2005.10.16
Выделение определенных дней в календаре


14-1127141196
Zeqfreed
2005-09-19 18:46
2005.10.16
Блок питания


5-1103272219
han
2004-12-17 11:30
2005.10.16
Копонент наподобии CombBox


14-1127219038
Prohodil Mimo
2005-09-20 16:23
2005.10.16
Пишем программу вместе.