Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.02.02;
Скачать: [xml.tar.bz2];

Вниз

Запись 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 Вам ответил аблосютно правильно.
Подумайте...


 
Ландграф Павел   (2004-01-18 22:58) [5]

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


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

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



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

Форум: "Основная";
Текущий архив: 2004.02.02;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
1-2129
pavlov
2004-01-19 17:17
2004.02.02
утилита командной строки


1-2193
жаба
2004-01-21 08:19
2004.02.02
Drag and drop


1-2171
race1
2004-01-18 17:32
2004.02.02
tpaintbox.onpaint


6-2250
beemaster
2003-11-26 21:08
2004.02.02
Как узнать свой host из cервиса


6-2249
Alek_1
2003-11-29 02:55
2004.02.02
Ошибка в сокетах





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский