Russell LibbySoftware Engineer, Advisory Commented:
Btw, you could also just use the CopyFile routine in windows:
if not(CopyFile(PChar(Source), PChar(Destination), False)) then
begin
// GetLastError will contain the error code
ShowMessage(SysErrorMessage(GetLastError));
end;
---
Russell
0
pjeliasAuthor Commented:
Of course, hard to see the simple things at 2:30am.
Also need to set the File Attributes so that file is not read only.
Thanks for your help
Regards
pje
0
Question has a verified solution.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
filemode := fmOpenReadWrite;
Reset( FromF );
opens the source file in read / write mode, which is not possible on a RO (readonly) media. It really should be:
filemode := fmOpenRead;
Reset( FromF );
---------
Russell