Запись TStringList в TFileStream

← →
Ландграф Павел © (2004-01-18 14:53) [0]

Как можно записать TStringList в TFileStream, а потом считать, я пробывал так:
Str:=StringList.Text;
b:=length(Str);
fs.Write(b,sizeof(b));
for x:=0 to b-1 do
begin
c:=Str[x];
fs.Write(c,sizeof(c));
end;
Но как потом это опять загрузить, там ведь простая строка + символы перевода $0D и $0A - требуется загрузить опять в TStringList

← →
div (2004-01-18 14:55) [1]

F1 - TStringList.SaveToStream, TStringList.LoadFromStream

← →
Ландграф Павел © (2004-01-18 20:12) [2]

div> ты прикалываешься? а же ясно написал в TFileStream, незнаешь как - лучше не пиши...

← →
Ландграф Павел © (2004-01-18 20:14) [3]

блин, извини, не прочитал внимательно, я думал ты написал SaveToFile...:)

← →
Тимохов © (2004-01-18 20:15) [4]

Ландграф Павел © (18.01.04 20:12) [2]
Как нехорошо...
Ведь div Вам ответил аблосютно правильно.
Подумайте...

Тимохов> дык я ж извенился уже, неправ был, быстро прочитал... я полностью согласен с ним!
div>, извини еще раз...

← →
div (2004-01-19 15:47) [6]

да ничего страшного - я тут сам пару раз в форуме так же ошибался )))))))))

Запись TStringList в TFileStream Найти похожие ветки