Главная страница
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.024 c
6-1090999462
Evgenius
2004-07-28 11:24
2004.10.10
Помогите справиться с тестом сокетов без сети.


1-1095270763
Gear
2004-09-15 21:52
2004.10.10
Как реализовать прилипание Form к краям десктопа (как у ICQ)?


4-1094798681
Apolo
2004-09-10 10:44
2004.10.10
Обмен данными между потоками не используя главную форму!


14-1095763884
Rule
2004-09-21 14:51
2004.10.10
Вот это рынок труда в Москве.


14-1095214894
Soft
2004-09-15 06:21
2004.10.10
Первый сервисный робот использует Windows XP.