[MIHAHIM]

Всем Доброго дня!

Подскажите как можно максимально оптимизировать и минимизировать путь при копировании файла.
Файл который надо скопировать будет находиться в папке с моей программой (нигде не могу найти как прописать это)
И также хотелось бы сюда присобачить определение папки пользователя куда будет скопирован файл.

То, что у меня есть:

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if CopyFile('C:\Users\Ben\Documents\Embarcadero\Studio\Projects\Win32\game.cfg','C:\Users\Ben\Saved Games\My Games\Racing\game.cfg',true) then
  ShowMessage('Файл успешно скопирован =)')
  else ShowMessage('Неудача =(');
end;

[Bargest]

папке с моей программой

Получить из Paramstr(0).

определение папки пользователя

%Userprofile%.