![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сохранение списка без символов перевода каретки [D7, XP]
dreamse © (2011-09-22 23:19:00)Добрый вечер.
Подскажите пожалуйста ответ на хитрый вопрос.
Пытаюсь сохранить текст (несколько строк)
var
LogFile: Textfile;
begin
AssignFile(LogFile, LogFileName);
Append(LogFile);
Writeln(LogFile, LogMessage);
Closefile(LogFile);
где LogMessage пердается ему в виде Trim('dddd'); т.е обрезая лишние символы перевода строки и пр.
Но если открыть сохраненый файл в текстовом редакторе то курсор будет стоять на строку ниже ...
Если его путем нажатия BACKPACE перевести назад и сохранить то так текстовый файл сохраняется без перевода каретки.
Как все таки сохранить файл на диск чтобы не подставлялся автоматический перевод на новую строку ?
Dimka Maslov (2011-09-25 12:02:00) [1]Хорошая вещь - мануалы. В них много чего написано и практически в описании любой функции есть раздел "см. также/see also".
dreamse (2011-09-22 23:30:00) [2]> Омлет © (22.09.11 23:25) [2]
спасибо ! Очень помогли, уже не первый час бьюсь. А оказалось так просто.
Омлет (2011-09-22 23:25:00) [3]Надо Write вместо Writeln.
dreamse (2011-09-22 23:20:00) [4]При сохранении TStringList и из TMemo результат анологичный.