Вверх ↑
Ответов: 537
Рейтинг: 14
#1: 2020-04-18 20:11:06 ЛС | профиль | цитата
Сделал программу которая открывает файлы .txt редактирует и сохраняет результат в тот же файл, при сохранении строк добавляется в конце строк переход на новую строку. Сделал удаление этой пустой строки, в Memo ее нет, визуально видно что курсор находится в конце последнего слова всех строк, но при сохранении в файл добавляется пустая строка (переход на новую строку), нужно сохранять без этой пустой строки, это возможно сделать?
Получается несоответствие количества строк, например: сохраняется 5 строк, а в файле их 6

Add(MainForm,2953706,84,231)
{
}
Add(Memo,16112228,266,203)
{
Left=5
Top=5
Width=375
Height=220
Strings=#14:11111111111111|14:22222222222222|14:33333333333333|14:44444444444444|14:55555555555555|
ScrollBars=2
Point(doSave)
}
Add(Button,733943,147,231)
{
Left=165
Top=235
Caption="Save"
link(onClick,961651:doExecute,[])
}
Add(SDialog,961651,210,231)
{
FileName="1.txt"
link(onExecute,16112228:doSave,[])
}

В примере сохранятся текст через Memo, а в программе желательно сохранять через StrList
карма: 4

0