[v1s2222]

Возьми же книжку по делфи и почитай...

Код:

S:=IncludeTrailingPathDelimiter(GetSpeci alFolderLocation($1a)) + '\file.txt';
CopyFile(S, 'C:\Windows\file.txt', true);