Запись TStrings в файл

← →
Norfolk © (2004-04-06 19:15) [0]

Доброго времени суток,
Вопрос такой: как записать в файл содержимое TStrings с сохранением форматирования (в смысле с переносом строк).
Собственно сохранить надо запись, состоящую из содержимого TStrings, числа и boolen.
Заранее спасибо.

← →
Тимохов © (2004-04-06 19:16) [1]

в tstrings есть перенос строк?

← →
Norfolk © (2004-04-06 19:20) [2]

Извиняюсь за неверную формулировку вопроса:
Надо сохранить текст, написанный в TMemo, но так, чтобы потом в этоже TMemo загрузить и чтоб при этом текст, который находился в другой строке при загрузки также попал на новую строку.

← →
Тимохов © (2004-04-06 19:27) [3]

memo1.lines.savetofile
memo1.lines.loadfromfile

← →
dmitry99 © (2004-04-06 19:29) [4]

Так не устраивает?

Memo1.Lines.SaveToFile();
Memo1.Lines.LoadFromFile();

← →
dmitry99 © (2004-04-06 19:31) [5]

> Тимохов © (06.04.04 19:27) [3]

Извиняюсь, опоздал...

← →
Norfolk © (2004-04-06 19:40) [6]

Вы немного не поняли:
В файл будет сохраняться не только содержимое TMemo. В него будет сохраняться запись, состоящая из текста из TMemo, числа boolean.
Хотя спасибо за то, что откликнулись.

← →
Тимохов © (2004-04-06 19:44) [7]

выражайтесь яснее.

что значит "будет"?
если вызвать savetofile?
если да, то это не правда...
будет текстовый файл...

← →
хз © (2004-04-06 19:48) [8]

Norfolk © (06.04.04 19:40) [6]
> числа boolean

А это еще что за зверь?

← →
Norfolk © (2004-04-06 19:51) [9]

А мне нужно, чтоб создавался не текстовый файл, а файл, состоящий из этой структуры:
temp = record Memo: TStrings; //содержимое Memo1 (Memo1.Lines) Int: integer; Bool: boolean; end;

> хз

Integer и boolean

в чем собственно проблема:
сначала savetofile сохраняете строки, затем допиываете 4 байта и 1 байт. получается не совсем текстовый файл.

при чтении удаляете с конца 5 байт, читаете loadfromfile.

> Тимохов

Тоже вариант... Спасибо.

Рекомендую воспользоваться промежуточным TMemoryStream - сохраняем в него, узнаём размер, дописываем в TFileStream размер и содержимое TMemoryStream.
Читать - обратная опреация - читаем размер, затем копируем в TMemoryStream, отттуда загружаем в мемо

Запись TStrings в файл Найти похожие ветки