Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.25;
Скачать: CL | DM;

Вниз

TMemoryStream   Найти похожие ветки 

 
Stager   (2004-07-13 15:40) [0]

Возникла такая задача - нужно накачать 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 - все работает.

Подскажите, пожалуйста, откуда такая беда?


 
Семен Сорокин ©   (2004-07-13 15:46) [1]

про Stream.Position := 0 перед LoadFromStream не забыл?


 
Stager   (2004-07-13 15:48) [2]

Огромное спасибо, все работает. Каюсь за дурацкий вопрос - первый раз в жизни работаю с потоками, еще не разобрался.


 
Digitman ©   (2004-07-13 15:49) [3]


> Вставил две отладочные строчки.


"вставлять" чего-то там куда-то там - удел нерадивых, не владеющих до сих пор изящными встроенными в ИДЕ инструментами отладки Делфи-приложений

"вставлять" то же туда же при наличии исх.текстов класса TStrings - удел тех же

FTemplates.Streams[Result].SaveToFile("c:\test.1");
FTemplates.Streams[Result].Position := 0;
FStringList.LoadFromStream(FTemplates.Streams[Result]);
FStringList.SaveToFile("c:\test.2");



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

Текущий архив: 2004.07.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.037 c
1-1089271062
Term
2004-07-08 11:17
2004.07.25
TToolButton


4-1086833436
James Bond
2004-06-10 06:10
2004.07.25
Монстры API! Подскажите все же как вставить в MaskEdit картинку


1-1089705993
Jakut
2004-07-13 12:06
2004.07.25
ListView + Gauge


14-1089057420
miwa
2004-07-05 23:57
2004.07.25
Где найти драйвера под linux для soft-modem а Conexant?


4-1086848119
(AD)acid
2004-06-10 10:15
2004.07.25
Получение имени устройства в win2k/xp (например CD-ROMa)