Поток.НачатьПолучениеРазмера

Методы · BeginGetSize

Возвращает размер данных в байтах. Если свойство ДоступноИзменениеПозиции установлено в значение Ложь, то при вызове данного метода будет сгенерировано исключение.

Синтаксис

НачатьПолучениеРазмера(<ОписаниеОповещения>)
Полное описание, параметры и ограничения

Поток.НачатьПолучениеРазмера (Stream.BeginGetSize)

Поток (Stream)

НачатьПолучениеРазмера (BeginGetSize)

Доступен, начиная с версии 8.3.9.

Синтаксис:
НачатьПолучениеРазмера(<ОписаниеОповещения>)
Параметры:

<ОписаниеОповещения> (необязательный)
Тип: ОписаниеОповещения.
Содержит описание процедуры, которая будет вызвана после завершения работы метода со следующими параметрами:
<Результат> - тип Число. Размер данных в байтах.

<ДополнительныеПараметры> - значение, которое было указано при создании объекта ОписаниеОповещения.

Описание:

Возвращает размер данных в байтах.
Если свойство ДоступноИзменениеПозиции установлено в значение Ложь, то при вызове данного метода будет сгенерировано исключение.

Доступность:

Тонкий клиент, веб-клиент, мобильный клиент, сервер, толстый клиент, внешнее соединение, мобильное приложение (клиент), мобильное приложение (сервер), мобильный автономный сервер, интеграция.

См. также:
Поток, метод РазмерАсинх
Поток, метод Размер

Использование в версии:

Доступен, начиная с версии 8.3.9.

Описание изменено в версии 8.3.18.

Методическая информация

Практические примеры

Прочитать C1 и скопировать 23 через оповещения потока

Источник — собственные ДвоичныеДанные ABC123 в памяти. Базовый Поток передаёт завершённый результат в экспортные обработчики, не через возврат Начать… .

Где и как запускать

Модуль пустой управляемой формы учебной внешней обработки; тонкий или толстый клиент Windows. Вставьте весь модуль. Это не серверный код.

Подготовка

  1. Создайте учебную внешнюю обработку с пустой управляемой основной формой. Создайте команду УчебныйПример и кнопку этой команды.

  2. В свойстве команды Действие выберите процедуру УчебныйПример. Вставьте полный приведённый модуль формы.

  3. Откройте EPF в тонком или толстом клиенте Windows и нажмите кнопку. Не переносите Ждать и Асинх в серверный общий модуль.

  4. Пример работает только со своими данными в памяти; записи в базу, файлы и сеть нет.

Перем Выполняется;

&НаКлиенте
Процедура УчебныйПример(Команда)
    Если Выполняется = Истина Тогда
        Сообщить("Дождитесь окончания предыдущего примера");
        Возврат;
    КонецЕсли;
    Состояние = Новый Структура("Поток,Копия,Буфер,Прочитанный,ИмяФайла,СвойФайл",
        Неопределено, Неопределено, Неопределено, Неопределено, "", Ложь);
    Попытка
        Данные = ПолучитьДвоичныеДанныеИзСтроки("ABC123", КодировкаТекста.UTF8, Ложь);
        Состояние.Поток = Данные.ОткрытьПотокДляЧтения();
        Состояние.Вставить("Данные", Данные);
        Состояние.Прочитанный = Новый БуферДвоичныхДанных(2);
    Исключение
        ОсвободитьРесурсы(Состояние);
        ВызватьИсключение;
    КонецПопытки;
    Выполняется = Истина;
    Попытка
        Состояние.Поток.НачатьПолучениеРазмера(ОповещениеДля("ПослеРазмера", Состояние));
    Исключение
        ОсвободитьРесурсы(Состояние);
        Выполняется = Ложь;
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

&НаКлиенте
Функция ОповещениеДля(Имя, Состояние)
    Возврат Новый ОписаниеОповещения(Имя, ЭтотОбъект, Состояние,
        "ОшибкаОперации", ЭтотОбъект);
КонецФункции

&НаКлиенте
Процедура ОсвободитьРесурсы(Состояние)
    Если Состояние.Копия <> Неопределено Тогда
        Попытка
            Состояние.Копия.Закрыть();
            Состояние.Копия = Неопределено;
        Исключение
            Сообщить("Не удалось закрыть собственную копию: " + ОписаниеОшибки());
        КонецПопытки;
    КонецЕсли;
    Если Состояние.Поток <> Неопределено Тогда
        Попытка
            Состояние.Поток.Закрыть();
            Состояние.Поток = Неопределено;
        Исключение
            Сообщить("Не удалось закрыть собственный источник: " + ОписаниеОшибки());
        КонецПопытки;
    КонецЕсли;
    Если Состояние.СвойФайл Тогда
        Если Состояние.Поток = Неопределено Тогда
            Попытка
                Файл = Новый Файл(Состояние.ИмяФайла);
                Если Файл.Существует() Тогда
                    УдалитьФайлы(Состояние.ИмяФайла);
                КонецЕсли;
                Сообщить(Не Файл.Существует());
                Состояние.СвойФайл = Ложь;
            Исключение
                Сообщить("Свой временный файл остался: " + Состояние.ИмяФайла);
                Сообщить(ОписаниеОшибки());
            КонецПопытки;
        Иначе
            Сообщить("Источник не закрыт; собственный файл не удаляем: " + Состояние.ИмяФайла);
        КонецЕсли;
    КонецЕсли;
КонецПроцедуры

&НаКлиенте
Процедура ОшибкаОперации(Ошибка, СтандартнаяОбработка, Состояние) Экспорт
    ОсвободитьРесурсы(Состояние);
    Выполняется = Ложь;
    СтандартнаяОбработка = Истина;
КонецПроцедуры

&НаКлиенте
Процедура ПослеРазмера(Размер, Состояние) Экспорт
    Попытка
        Сообщить(Размер = 6);
        Состояние.Поток.НачатьПереход(ОповещениеДля("ПослеПерехода", Состояние), 2, ПозицияВПотоке.Начало);
    Исключение
        ОсвободитьРесурсы(Состояние);
        Выполняется = Ложь;
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

&НаКлиенте
Процедура ПослеПерехода(Позиция, Состояние) Экспорт
    Попытка
        Сообщить(Позиция = 2);
        Состояние.Поток.НачатьЧтение(ОповещениеДля("ПослеЧтения", Состояние), Состояние.Прочитанный, 0, 2);
    Исключение
        ОсвободитьРесурсы(Состояние);
        Выполняется = Ложь;
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

&НаКлиенте
Процедура ПослеЧтения(Количество, Состояние) Экспорт
    Попытка
        Если Количество <> 2 Тогда
            ВызватьИсключение "Не получены два собственных учебных байта";
        КонецЕсли;
        Сообщить(Количество = 2);
        Сообщить(ПолучитьСтрокуИзБуфераДвоичныхДанных(Состояние.Прочитанный, КодировкаТекста.UTF8) = "C1");
        Состояние.Копия = Новый ПотокВПамяти;
        Состояние.Поток.НачатьКопированиеВ(ОповещениеДля("ПослеКопии", Состояние), Состояние.Копия);
    Исключение
        ОсвободитьРесурсы(Состояние);
        Выполняется = Ложь;
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

&НаКлиенте
Процедура ПослеКопии(Количество, Состояние) Экспорт
    Попытка
        Сообщить(Количество = 2);
        Хвост = Состояние.Копия.ЗакрытьИПолучитьДвоичныеДанные();
        Состояние.Копия = Неопределено;
        Сообщить(ПолучитьСтрокуИзДвоичныхДанных(Хвост, КодировкаТекста.UTF8) = "23");
        Состояние.Поток.НачатьЗакрытие(ОповещениеДля("ПослеЗакрытия", Состояние));
    Исключение
        ОсвободитьРесурсы(Состояние);
        Выполняется = Ложь;
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

&НаКлиенте
Процедура ПослеЗакрытия(Состояние) Экспорт
    Попытка
        Состояние.Поток = Неопределено;
        ОсвободитьРесурсы(Состояние);
        Выполняется = Ложь;
        Сообщить("Цепочка чтения завершена");
    Исключение
        ОсвободитьРесурсы(Состояние);
        Выполняется = Ложь;
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

Разбор по шагам

  1. Получаем базовый Поток через ДвоичныеДанные.ОткрытьПотокДляЧтения и сохраняем его в состоянии.

  2. Размер 6 поступает в ПослеРазмера, затем позиция 2 — в ПослеПерехода.

  3. ПослеЧтения проверяет фактические 2 байта перед декодированием C1; курсор теперь 4.

  4. ПослеКопии получает количество 2 и извлекает хвост 23 из собственного ПотокВПамяти.

  5. ПослеЗакрытия вызывается без фиктивного аргумента результата: единственный параметр Состояние.

Как проверить результат

  1. Шесть сравнений Истина: размер 6, позиция 2, чтение 2/C1, копирование 2/23.

  2. Файлы не создавались; повторное нажатие до сообщения завершения не запускает конкурирующую цепочку.

Ожидаемый результат

Завершена цепочка оповещений базового readonly-потока.

На что обратить внимание

  1. Количество чтения/копирования — байты, не символы.

  2. Буфер должен жить до завершения операции: здесь он сохранён в Состояние, а не оставлен без владельца.

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.