Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.10;
Скачать: 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 вся ветка

Текущий архив: 2004.10.10;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.041 c
1-1095976334
Ezhik
2004-09-24 01:52
2004.10.10
Поиск файлов


3-1094836526
BigError
2004-09-10 21:15
2004.10.10
MySQL: VarChar -> Decimal


1-1096030702
Mirror
2004-09-24 16:58
2004.10.10
GetLogicalDrives


14-1096016865
Prohodil Mimo
2004-09-24 13:07
2004.10.10
Забыл как задать колонке имя.


1-1095875344
hgd
2004-09-22 21:49
2004.10.10
Ктог знает, как можно картинку формата png