[Bross]

Сообщение от mav_c

Ты всё ОК пишешь!
Только после ExtractFilePath(Application.ExeName) поставь + '\data\' + ...

Если писать таким образом + '\data\' +, то выходит ошибка неправильно указан путь к файлу.