Файл в папке программы в Delphi

Question

Файл в папке программы в Delphi

Даниил Воронов Ученик (200), закрыт 5 лет назад

Как в делфи 7 привязать файл, к которому приходится указывать полный путь, к папке то есть если я сначала указывал например C:\users\user1\folder\folder\file.doc, то теперь мне нужно чтобы расположение папки могло меняться а программа брала файл из своей папки, то есть ..\folder\res\file.doc или чтобы она считала свою папку корневой.

Answer 1

Есть функция которая возвращает путь к той папке где находится программа, от него и пляши. Название не помню, я с Дельфи ушёл на Qt, но суть та же.

Навскидку

function ApplicationPath: string;
begin
Result := ExtractFilePath(ParamStr(0));
end;

Answer 2

ExtractFilePath(ParamStr(0)) + 'file.doc'

или

ExtractFilePath(Application.ExeName) + 'file.doc'

Answer 3

ExtractFilePath(ParamStr(0)) + 'file.doc' или
ExtractFilePath(Application.ExeName) + 'file.doc'