VPF::Чтение строки из потока. - Форум программистов

ErManDir

Дата 8.6.2004, 15:19 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 61
Регистрация: 11.12.2003

Репутация: нет
Всего: нет

Значит так, пишу стринг в stream:

Код


  S.Write(T0[I,J].Size,1); {Сохраняю размер строки}
  for K := 1 to Length(T0[I,J].Value) do S.Write(T0[I,J].Value[K],1);
  S.Write(T0[I,J].Value,T0[I,J].Size); {Сохраняю строку}

Value - описан как string.
Если я описываю Value как string[50], То S.Write(T0[I,J].Value,50); все прекрасно записывается.

Что посоветуете?

Guest

Дата 8.6.2004, 15:27 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

А что говорит то? Ну на что ругается?

<Spawn>

Дата 8.6.2004, 16:14 (ссылка)

(нет голосов)

Загрузка ...

Око кары:)

Профиль
Группа: Экс. модератор
Сообщений: 2776
Регистрация: 29.1.2003
Где: Екатеринбург

Репутация: 44
Всего: 64

S.Write(T0[I,J].Value[1],T0[I,J].Size);

Это сообщение отредактировал(а) <Spawn> - 8.6.2004, 16:15

--------------------

"Для некоторых людей программирование является такой же внутренней потребностью, подобно тому, как коровы дают молоко, или писатели стремятся писать" - Николай Безруков.

ErManDir

Дата 8.6.2004, 17:32 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 61
Регистрация: 11.12.2003

Репутация: нет
Всего: нет

Цитата

S.Write(T0[I,J].Value[1],T0[I,J].Size);

Не работает, я уже пробовал это... Выдает AV.
Знаете, как оно работает?

Код


var  CH:Char;

      for K := 1 to T0[I,J].Size do
      begin
        S.Read(CH,1);
        T0[I,J].Value:=T0[I,J].Value+CH;
      end;

Нет, вы только вникните в это...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »