Копирование файла

[Sk!f]

Как сделать так, чтобы программа копировала определенные файлы с компа на флешку?

Есть код:

CopyFile('Откуда\Имя файла','Куда\Новое имя файла',true);

Но не работает. Как правильно это все замутить? Если можно то по подробнее.

[Квэнди]

Но не работает.

что значит не работает ?

[Terran]

Функция CopyFile работает всегда замечательно. Возможно вы неправильно указывайте параметры. Нужно указывать всё точно до расширения файла. К примеру:

CopyFile('C:\1.exe','D:\1.exe',True);

[KORN]

либо атрибут для чтения стоит на файле

[Ntlegend]

1) посмотрите чтоб файл-источник был доступен
2) чтобы была возможность записи в директорию-приёмник
3) чтобы в директории небыло файла с таким же именем
..
если всего это додерживаетесь - то подробнее об ошибке пожуйлуста

[Ky3Heu,]

После implementation

function WindowsCopyFile(FromFile, ToDir : string) : boolean;
var F : TShFileOpStruct;
begin
  F.Wnd := 0; F.wFunc := FO_COPY;
  FromFile:=FromFile+#0; F.pFrom:=pchar(FromFile);
  ToDir:=ToDir+#0; F.pTo:=pchar(ToDir);
  F.fFlags := FOF_ALLOWUNDO or FOF_NOCONFIRMATION;
  result:=ShFileOperation(F) = 0;
end;

Работае т всегда безотказно
Далее вызов

WindowsCopyFile('C:\proba\base\6269_094.dbf', 'C:\proba\out\');

[Sk!f]

Сообщение от Квэнди

что значит не работает ?

Ну то и значит. Поставил в клик по кнопке. Кликаешь, но не пашет.

12:29

Сообщение от Ky3Heu,

После implementation

function WindowsCopyFile(FromFile, ToDir : string) : boolean;
var F : TShFileOpStruct;
begin
  F.Wnd := 0; F.wFunc := FO_COPY;
  FromFile:=FromFile+#0; F.pFrom:=pchar(FromFile);
  ToDir:=ToDir+#0; F.pTo:=pchar(ToDir);
  F.fFlags := FOF_ALLOWUNDO or FOF_NOCONFIRMATION;
  result:=ShFileOperation(F) = 0;
end;

Можешь этот код с пояснениями написать? Я новичок, поэтому хочу во всё это хорошо вникнуть.

Не сочтите совсем тупым но:

function WindowsCopyFile(FromFile, ToDir : string) : boolean;

Не понял откуда это берется. Где и как?

У нас принято пользоваться кнопочкой "Правка", дабы не плодить посты подряд, друг за другом.
Модератор

[Квэнди]

Сообщение от Sk!f

Ну то и значит. Поставил в клик по кнопке. Кликаешь, но не пашет.

Я вот тоже сделал обработчик для кнопки, поставил туда код

CopyFile('Откуда\Имя файла','Куда\Новое имя файла',true);

и не работет, не знаете почему ?
Учитесь описывать проблему.
1. "Не работает"- не проблема, а ваше субъективное мнение.
2. Показывайте точно код, который выполняете
3. Описывайте результат: ошибку, что возвращает функция, и т.д.

[Sk!f]

Учитесь описывать проблему.
1. "Не работает"- не проблема, а ваше субъективное мнение.
2. Показывайте точно код, который выполняете
3. Описывайте результат: ошибку, что возвращает функция, и т.д.

Спасибо. Критику принял адекватно и приму все к сведению.
Но если имеете знания, то не могли бы мне помочь?

Конкретнее:
Нужна программа которая будет копировать файлы лежащие по адресу
C:\WINDOWS\repair\system
и
C:\WINDOWS\repair\sam
далее помещать их на флешку.

[Terran]

Для копирования файлов вам нужно использовать другую функцию. Функция CopyFile не подойдёт т.к. она копирует только по одному файлу. Используйте функцию, которую предложил Ky3Heu, (не забывайте Uses ShellApi,...). Если ваша программа будет запускаться с флэшки, то узнаёте букву флэшки и потом подставляете в функцию и копируйте куда нужно.