Скачать: CL | DM;

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

← →
AlexGalkin ©   (2007-05-30 10:20) [0]

Мне нужно создать exe-файл, который мог бы копировать с одной папки (с:\1) со всем ее содержимым в другую папку (с:\2). Причем нужно предусмотреть замену файлов и папок без запроса пользователя.

---

← →
DVM ©   (2007-05-30 10:37) [1]

Вопрос в чем? За тебя создать этот файл надо?

---

← →
Jeer ©   (2007-05-30 10:45) [2]

AlexGalkin ©   (30.05.07 10:20)
Особенно занятно будет A:\Windows > C:\Windows

---

← →
clickmaker ©   (2007-05-30 10:47) [3]

> Мне нужно создать exe-файл, который мог бы копировать с
> одной папки

а зачем exe? bat.
copy /Y c:\1\*.* c:\2

---

← →
Робинзон   (2007-05-30 10:56) [4]

function CopyDir(const fromDir, toDir: string): Boolean;
var
 fos: TSHFileOpStruct;
begin
 ZeroMemory(@fos, SizeOf(fos));
 with fos do
 begin
   wFunc  := FO_COPY;
   fFlags := FOF_FILESONLY;
   pFrom  := PChar(fromDir + #0);
   pTo    := PChar(toDir)
 end;
 Result := (0 = ShFileOperation(fos));
end;

if CopyDir("D:\Проба", "d:\Проба2") = True then
  label1.Caption:="Процес копирования закончен успешно. Завершить?";
 

---

← →
Amoeba ©   (2007-05-30 11:05) [5]

Подробно о SHFileOperation здесь:
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=91

---

← →
Anatoly Podgoretsky ©   (2007-05-30 11:39) [6]

> AlexGalkin  (30.05.2007 10:20:00)  [0]

Это уже написано и поставляется с самой Виндоус

---

← →
AlexGalkin ©   (2007-05-30 15:22) [7]

> Подробно о SHFileOperation здесь:
> http://www.delphikingdom.com/asp/viewitem.asp?catalogid=91


Большое спасибо за ссылку!!!
Очень помогла

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.016 c