Текущий архив: 2003.04.24;
Скачать: CL | DM;
Вниз
Как скопировать каталог Найти похожие ветки
← →
DjVirus (2003-04-15 08:32) [0]Как скопировать целиком каталог со всеми подкаталогами? Если кому не трудно то вышлите мне на мыло эту процедуру(желательно с примером).
← →
Babay © (2003-04-15 08:48) [1]можно воспользоваться функциями windows например так
uses .... shellapi;
.....
procedure TForm1.Button2Click(Sender: TObject);
Var T:TSHFileOpStruct;
begin
t.pFrom:=PChar("d:\tools"#0#0);
t.pTo:=PChar("d:\tt"#0#0);
t.Wnd:=Handle;
t.wFunc:=FO_COPY;
t.fFlags:=0;// смотри подробнее в хелпе
SHFileOperation(t);// смотри подробнее в хелпе
end;
Страницы: 1 вся ветка
Текущий архив: 2003.04.24;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.01 c
