Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TStringList не хочет грузится из TStringStream [D5]


lipskiy ©   (2002-04-07 00:15:00) 

Почему так не работает:
StringStream.WriteBuffer(addr^,BlockSize);
StringList.LoadFromStream(StringStream);


А так работает:
StringStream.WriteBuffer(addr^,BlockSize);
Num:= 1;
for i:= 1 to StringStream.Size-1 do
if (StringStream.DataString[i] = #13) and (StringStream.DataString[i+1] = #10) then
begin
StringList.Add(Copy(StringStream.DataString,Num,i-Num));
Num:= i+2;
end;


Второй вариант - просто ручная загрузка строки в массив строк по кодам #10#13.
Но ведь не хочется каждый раз писать эту бодягу.
Почему нормальный первый вариант возвращает пустой StringList?


lipskiy   (2002-04-07 13:32:00) [1]

Пошло!
Спасибо, как это я сам не допер :)


MBo   (2002-04-07 01:08:00) [2]

а
StringList.Text:=StringStream.DataString;
не пойдет?


Наверх

Титульная страница Поиск, карта сайта Написать письмо