Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.10.08;
Скачать: CL | DM;

Вниз

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

 
RomanH ©   (2006-09-19 13:25) [0]

Мастера подскажите как правильно удалять и копировать файлы.
Желательно по одинаковому расширению.
FillChar(FromBuf,SizeOf(frombuf),0);
  FillChar(ToBuf,SizeOf(tobuf),0);
  StrPCopy(fromBuf,Path_OR+"*.rom");
  StrPCopy(tobuf,Path_IR);
  with OpStruc do
    begin                      
         wnd:=handle;
         wFunc:=FO_COPY;
         pFrom:=@frombuf;
         pTo:=@tobuf;
         fFlags:=FOF_NOCONFIRMATION or FOF_NOCONFIRMMKDIR ;
         fAnyOperationsAborted:=false;
         hNameMappings:=nil;
         lpszProgressTitle:=nil;
    end;
   ShFileOperation(OpStruc);

Этот вариант копирует если в приемнике отсутствуют файлы.
Как можно сделать более кратче код и чтобы если в приемнике есть такие файлы которые мы хотим скопировать то их необходимо перезаписать


 
Virgo_Style ©   (2006-09-19 13:33) [1]

кратче?) CopyFile.


 
RomanH ©   (2006-09-19 13:41) [2]


> Virgo_Style ©  

Извените что не по теме, но ваш ник мне кажется связан с Blitz3D.
Хотелось бы узнать что вы сейчас на B3D творите.
А потеме Возможно такое CopyFile("c:\*.rom","d:\*.rom",1)


 
Virgo_Style ©   (2006-09-19 13:50) [3]

RomanH ©   (19.09.06 13:41) [2]
Возможно такое CopyFile("c:\*.rom","d:\*.rom",1)

Нет, хотя бы потому, что неверен тип третьего параметра. Да и маски, afaik, не поддерживаются. И вообще это почти на правах шутки, с обвязкой из FindFirst-FindNext выйдет разве на пару строк короче.

А вообще у ShFileOperation должны быть флаги "переписывать без предупреждения".

P.S. Не по теме: не был, не состоял, не привлекался =)



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

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

Наверх




Память: 0.47 MB
Время: 0.032 c
15-1158318249
Wetr
2006-09-15 15:04
2006.10.08
Скомпилировать программу.


2-1159123064
vain
2006-09-24 22:37
2006.10.08
запуск прграммы


2-1158512716
POP
2006-09-17 21:05
2006.10.08
WaitCommEvent(ComFile,Mask,@Overlapped)


15-1157627753
Chort
2006-09-07 15:15
2006.10.08
13 сентября - День компьютерщика и программиста


2-1158399969
stfu
2006-09-16 13:46
2006.10.08
Поиск по имени и столбцу в StringGrid..