Bars1992, Ваш подход в корне не верен.
либо ExtractFilePath(Application.ExeName)+'\textfiles\1 .txt'
либо ExtractFilePath(ParamStr(0))+'\textfiles\1.txt'
__________________
Некоторые программисты настолько ленивы, что сразу пишут рабочий код.
Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты.
|