Скачать: CL | DM;

Сохранение списка без символов перевода каретки   Найти похожие ветки 

← →
dreamse ©   (2011-09-22 23:19) [0]

Добрый вечер.

Подскажите пожалуйста ответ на хитрый вопрос.

Пытаюсь сохранить текст (несколько строк)


var
 LogFile: Textfile;
begin
AssignFile(LogFile, LogFileName);
Append(LogFile);
Writeln(LogFile, LogMessage);
Closefile(LogFile);


где LogMessage пердается ему в виде Trim("dddd"); т.е обрезая лишние символы перевода строки и пр.

Но если открыть сохраненый файл в текстовом редакторе то курсор будет стоять на строку ниже ...

Если его путем нажатия BACKPACE перевести назад и сохранить то так текстовый файл сохраняется без перевода каретки.

Как все таки сохранить файл на диск чтобы не подставлялся автоматический перевод на новую строку ?

---

← →
dreamse ©   (2011-09-22 23:20) [1]

При сохранении TStringList и из TMemo результат анологичный.

---

← →
Омлет ©   (2011-09-22 23:25) [2]

Надо Write вместо Writeln.

---

← →
dreamse ©   (2011-09-22 23:30) [3]

> Омлет ©   (22.09.11 23:25) [2]

спасибо ! Очень помогли, уже не первый час бьюсь. А оказалось так просто.

---

← →
Dimka Maslov ©   (2011-09-25 12:02) [4]

Хорошая вещь - мануалы. В них много чего написано и практически в описании любой функции есть раздел "см. также/see also".

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.007 c