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

Копирование всех файлов из одной папки   Найти похожие ветки 

← →
иван8511   (2007-06-28 19:17) [0]

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

---

← →
Anatoly Podgoretsky ©   (2007-06-28 19:19) [1]

> иван8511  (28.06.2007 19:17:00)  [0]

Для всех файловых операций используйте ShFileOperation

---

← →
ivan8511   (2007-06-29 12:51) [2]

А по подробнее можно? Я совсем недавно в Delphi.

---

← →
Плохиш ©   (2007-06-29 12:55) [3]

http://delphimaster.net/view/2-1180973368/

---

← →
Pohil ©   (2007-06-29 12:56) [4]

FindFirst
FindNext
ShFileOperation

---

← →
THandle ©   (2007-06-29 13:01) [5]

Создай свою функцию.
примерно вот так:
uses ShellAPI;
...
Function FileOperation(File1,File2:string; opt:integer):integer;
var
S:TSHFILEOPSTRUCT;
begin
 with S do
  begin
   Wnd:=0;
   pFrom:=PChar(File1);
   pTo:=PChar(File2);
   wFunc:=opt;
   fFlags:=FOF_ALLOWUNDO;
  end;
 Result:= SHFileOperation(S);
if Result <> 0 then
if S.fAnyOperationsAborted then Result := 1 else Result:=2;
end;

---

← →
Плохиш ©   (2007-06-29 13:02) [6]

> FindFirst
> FindNext

Это здесь лишнее.

---

← →
THandle ©   (2007-06-29 13:05) [7]

> Pohil ©   (29.06.07 12:56) [4]
>
> FindFirst
> FindNext


Если уж на то пошло, то ещё FindClose надо:)

---

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

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



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