CopyFile_ in

← →
vovan1 © (2001-12-20 15:09) [0]

Доброго времени суток! Подскажите пожалуйста, в Win95 не хочет работать функция CopyFile, т.е. вновь созданный файл в этой системе не хочет копироваться на другой диск, хотя на других системах (Win2000) усе работает нормально. По описаниям, эта функция ДОЛЖНА РАБОТАТЬ в Win95. Помогите, а то с этой 95 виндой скоро тронусь.

← →
gek (2001-12-20 15:44) [1]

Под WimMe у меня нормально раб
copyfile(pchar(FILE_NAME_1),pchar(FILE_NAME_2),false);

← →
Mick (2001-12-20 16:54) [2]

В таких случаях обычно "Надо все микросхемы менять" :)

← →
Anatoly Podgoretsky © (2001-12-20 22:15) [3]

Так она и работает, у тебя наверно ошибка в программе.

← →
XPDeveloper (2001-12-21 02:33) [4]

function TForm1.FileCopy(FFrom, FTo : string) : boolean;
var F : TShFileOpStruct;
begin
Result:=false;
F.Wnd := Handle;
F.wFunc := FO_COPY;
FTo := FTo+#0;
FFrom := FFrom+#0;
F.pTo := Pchar(FTo);
F.pFrom := Pchar(FFrom);
F.fFlags := FOF_ALLOWUNDO+FOF_NOCONFIRMATION+FOF_NOCONFIRMMKDIR;
if ShFileOperation(F) = 0 then
Result:=true;
end;
Можно копировать сразу несколько файлов, с undo - см. документацию

CopyFile_ in_Win95 Найти похожие ветки