![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TMemoryStream
Stager © (2004-07-13 15:40:00)Возникла такая задача - нужно накачать TStringList из потока класса TMemoryStream; Проблема: почему-то без всяких сообщений об ошибках накачивается пустой список.
FTemplates.Streams[Result].SaveToFile('c:\test.1');
FStringList.LoadFromStream(FTemplates.Streams[Result]);
FStringList.SaveToFile('c:\test.2');
Вставил две отладочные строчки. Файл test.1 содержит нужные строчки, файл test.2 - пустой. При этом если вместо FStringList.LoadFromStream поставить FStringList.LoadFromFile - все работает.
Подскажите, пожалуйста, откуда такая беда?
Digitman (2004-07-13 15:49:00) [1]
> Вставил две отладочные строчки.
"вставлять" чего-то там куда-то там - удел нерадивых, не владеющих до сих пор изящными встроенными в ИДЕ инструментами отладки Делфи-приложений
"вставлять" то же туда же при наличии исх.текстов класса TStrings - удел тех же
FTemplates.Streams[Result].SaveToFile('c:\test.1');
FTemplates.Streams[Result].Position := 0;
FStringList.LoadFromStream(FTemplates.Streams[Result]);
FStringList.SaveToFile('c:\test.2');
Stager (2004-07-13 15:48:00) [2]Огромное спасибо, все работает. Каюсь за дурацкий вопрос - первый раз в жизни работаю с потоками, еще не разобрался.
Семен Сорокин (2004-07-13 15:46:00) [3]про Stream.Position := 0 перед LoadFromStream не забыл?