[fpc-pascal] CopyFile for FreePascal without Lazarus?

[Bart]

On Thu, Apr 18, 2019 at 3:11 AM James Richters
<james at productionautomation.net> wrote:
> I just want to make a copy of a file into a different directory and maintain it's timestamps etc

http://svn.code.sf.net/p/flyingsheep/code/trunk/MijnLib/fsifileutils.pp
It has a filecopy() function with progress event.
Just replace TFileStreamUTF8 with TFileStream and you'r probably done.

-- 
Bart