Вниз
Скачать: CL | DM;

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

 
Kniaz ©   (2004-09-24 10:14) [0]

Каким образом скопировать файл. Т.е. не копировать содержимое из одного файла в другой, а взять файл и просто его скопировать.


 
TUser ©   (2004-09-24 10:16) [1]

CopyFile


 
Семен Сорокин ©   (2004-09-24 10:29) [2]

т.е. ты знаешь как скопировать содержимое файла, но не знаешь как скопировать сам файл, гм...


 
Warlock ©   (2004-09-24 10:35) [3]

Способов несколько,
1. Самый простой - CopyFile

2. Посложнее - SHFileOperation


uses ShellApi;

function TForm1.UpdateFile(fFrom,fTo: String): Boolean;
var OpUpdate: SHFILEOPSTRUCT;
   LErr: Integer;
begin
 Result:=False;
 OpUpdate.wFunc:=FO_COPY;
 OpUpdate.pFrom:=PChar(fFrom+#0#0);
 OpUpdate.pTo:=PChar(ExtractFilePath(fTo)+#0#0);
 OpUpdate.fFlags:=FOF_NOCONFIRMATION+FOF_SILENT;
 LErr:=SHFileOperation(OpUpdate);
 if LErr=0 then
  Result:=True;
end;


Это для копирования одного файла, но с помощью SHFileOperation можно за раз копировать и несколько файлов.


 
ASoft   (2004-09-24 10:38) [4]

компоненты (dc) Dick Control, не плохо реализуют это дело.



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

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



Память: 0.45 MB
Время: 0.021 c
1-1095846526
Aser
2004-09-22 13:48
2004.10.10
Undeclarated identifier: TStringDynArray


8-1089901612
Time
2004-07-15 18:26
2004.10.10
WAV/MP3/MP2/MP1/OGG


4-1093016886
Александр1
2004-08-20 19:48
2004.10.10
Запись CD


4-1094432292
js
2004-09-06 04:58
2004.10.10
Вызов диалога "Выбор: Пользователь, Группа или Компьютер"


14-1095340645
Программер_
2004-09-16 17:17
2004.10.10
Кто найдет ошибку?




   Наверх