ЧтениеФайлаАрхива.Формирование неинициализированного объекта

Конструкторы

Формирует неинициализированный объект ЧтениеФайлаАрхива.

Синтаксис

Новый ЧтениеФайлаАрхива()
Полное описание, параметры и ограничения

ЧтениеФайлаАрхива.Формирование неинициализированного объекта

ЧтениеФайлаАрхива (ArchiveFileReader)

Формирование неинициализированного объекта

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

Синтаксис:
Новый ЧтениеФайлаАрхива()
Описание:

Формирует неинициализированный объект ЧтениеФайлаАрхива.

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

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

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

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

Сформировать архив как ДвоичныеДанные и прочитать его из потока

Упаковываем свой временный текст в двоичные данные, открываем поток архива и проверяем список файлов без распаковки.

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

Учебная база: создайте серверный общий модуль УчебныеЗадачи (флаг Сервер). Код без директив вставьте в тело процедуры ВыполнитьПример() Экспорт. Вызовите её из серверного обработчика команды учебной обработки. Не запускайте в рабочей базе.

Подготовка

  1. Современные объекты доступны с 8.3.26; пример предназначен для вашей платформы 8.5.1.1343.

  2. Добавить принимает путь к файлу, поэтому создаётся один уникальный временный источник. Сам архив остаётся в памяти.

  3. Для ПолучитьДвоичныеДанные создавайте запись без параметров и не вызывайте перед этим Открыть.


ИсходныйФайл = ПолучитьИмяВременногоФайла("txt");
Поток = Неопределено;
Чтение = Неопределено;
Попытка
    Документ = Новый ТекстовыйДокумент;
    Документ.УстановитьТекст("Учебный пакет");
    Документ.Записать(ИсходныйФайл, КодировкаТекста.UTF8);
    Запись = Новый ЗаписьФайлаАрхива;
    Запись.Добавить(ИсходныйФайл);
    ДанныеАрхива = Запись.ПолучитьДвоичныеДанные();
    Сообщить(ДанныеАрхива.Размер());
    Поток = ДанныеАрхива.ОткрытьПотокДляЧтения();
    Чтение = Новый ЧтениеФайлаАрхива(Поток);
    Сообщить(Чтение.Элементы.Количество());
    Для Каждого Элемент Из Чтение.Элементы Цикл
        Сообщить(Элемент.Имя);
    КонецЦикла;
    Чтение.Закрыть();
    Чтение = Неопределено;
    Поток.Закрыть();
    Поток = Неопределено;
    // Второе открытие того же пакета через неинициализированное чтение.
    Поток = ДанныеАрхива.ОткрытьПотокДляЧтения();
    Чтение = Новый ЧтениеФайлаАрхива;
    Чтение.Открыть(Поток);
    Если Чтение.Элементы.Количество() <> 1 Тогда
        ВызватьИсключение "Повторное чтение пакета не совпало";
    КонецЕсли;
    Чтение.Закрыть();
    Чтение = Неопределено;
    Поток.Закрыть();
    Поток = Неопределено;
    УдалитьФайлы(ИсходныйФайл);
Исключение
    Если Чтение <> Неопределено Тогда
        Чтение.Закрыть();
    КонецЕсли;
    Если Поток <> Неопределено Тогда
        Поток.Закрыть();
    КонецЕсли;
    УчебныйФайл = Новый Файл(ИсходныйФайл);
    Если УчебныйФайл.Существует() Тогда
        УдалитьФайлы(ИсходныйФайл);
    КонецЕсли;
    ВызватьИсключение;
КонецПопытки;

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

  1. Сохраняем исходный текст в один собственный временный файл.

  2. Неинициализированная запись собирает пакет; ПолучитьДвоичныеДанные возвращает готовый архив и завершает запись.

  3. Открываем новый поток чтения двоичных данных и передаём его конструктору чтения архива.

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

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

  1. Размер пакета больше нуля; в коллекции ровно один элемент с расширением txt.

  2. Оба открытия возвращают количество 1. Исходный временный файл удалён.

  3. Не вызывайте ПолучитьДвоичныеДанные после конструктора записи по имени файла: это другой способ работы, запрещённый описанием данного метода.

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

Готовый архив хранится в ДвоичныеДанные; файловый архив не создаётся.

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

  1. Современные объекты доступны с 8.3.26; пример предназначен для вашей платформы 8.5.1.1343.

  2. Не закрывайте поток раньше объекта чтения архива. После завершения не используйте закрытые объекты.

  3. Для больших пакетов память ограничена; потоковый или файловый вариант выбирается исходя из объёма данных.

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

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

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

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

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