CopyFile

[Airou]

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

CopyFile(PChar(OpenDialog1.FileName ),PChar(ExtractFilePath(Application .ExeName)+'Папка1\'+ExtractFileName (OpenDialog1.FileName)),True);

Что не так?

PS Последний указатель я так понимаю вызывает сообщение об ошибке если был сбой в копировании?

[B_N]

Сообщение от Airou

Последний указатель я так понимаю вызывает сообщение об ошибке если был сбой в копировании?

Какой-такой указатель? Нет. Если последний параметр TRUE, то функция завершается с ошибкой в том случае, если файл уже существует. Если FALSE, то просто переписывает его. Никаких сообщений она сама по себе не выдаёт.
http://programmersforum.ru/showthread.php?t=14854

[Airou]

Понял. А почему не работает не скажешь?

[SunKnight]

if CopyFile('c:\1.txt','c:\2.txt',true) then

ShowMessage('Файл успешно скопирован!')

else

ShowMessage('Ошибка! Вот ее код: '+IntToStr(GetLastError));

это чтоб ошибку узнать.

И кажется мне что тут:

PChar(Extract FilePath(Application.ExeName)+'Папка1\'+ExtractFil eName(OpenDialog1.FileName))

чет неправильно, возможно слеша нехватает.

[Airou]

Код ошибки - 2.

[B_N]

Airou, ну вот честно, я ссылку зачем привёл? Ведь не для того же, чтобы пройти опять всю ту цепочку и написать здесь опять то же самое...

[Airou]

И к чему ты это... по той ссылке другая ситуация будет. Там просто человек неправильно указал путь к исходному файлу.

Проверил пути:
D:\Разное\программа_2\Презентация1. pps //Исходный файл
D:\Разное\программа_2\Краткий конспект\Презентация1.pps //Скопированный файл

Вроде с ними все в поряде.

[B_N]

Ошибка 2: The system cannot find the file specified. - этого достаточно.

А кириллицу в пути очень бы желательно через CopyFileW копировать.

[Airou]

Применил CopyFileW. Файл там где надо по прежнему не сохраняется.

Обнаружил что после копирования в директории программы создается копия файла но с каким-то аддским названием типа -
㩄䅜物畯퍜쑜忬忠尲⃩콜￨⸱灰sҔ 矗蠈矔￿￿蟿矔띃矔
Эт еще почему...

[Zeraim]

Думаю потомучто у тебя название файла кирилицей, либо поменяй либо покапайся в доке, наверное можно както адаптировать под кирилицу =\\