ВвестиТекст полностью заменяет прежнее содержимое текстового документа.
Где и как запускать
Тонкий или толстый клиент в режиме менеджера тестирования, собственный тестируемый тонкий клиент.
Подготовка
Только свои учебные сеансы: вручную запустите тонкий клиент с /TESTCLIENT -TPort15419, другой клиент — с /TESTMANAGER. Соединение использует 127.0.0.1:15419. В тестируемом клиенте заранее откройте собственную управляемую форму с заголовком Учебный стенд. Код вставьте в клиентский модуль формы менеджера тестирования, первую процедуру вызовите своей кнопкой. Здесь сеансы не запускаются.
В своей форме создайте реквизит ТекстовыйДокумент и поле УчебныйТекст вида ПолеТекстовогоДокумента, разрешите редактирование. Это собственный документ без ценных исходных данных; сохранение только в новый учебный файл через диалог.
&НаКлиенте
Процедура ВыполнитьУчебныйТест()
Тест = Новый ТестируемоеПриложение("127.0.0.1", 15419);
Тест.УстановитьСоединение();
Форма = Тест.ПолучитьОбъект(Тип("ТестируемаяФорма"), "Учебный стенд", , 2);
Документ = Форма.ПолучитьОбъект(Тип("ТестируемоеПолеФормы"), , "УчебныйТекст", 2);
Документ.ВвестиТекст("Слагаемое 1: 50" + Символы.ПС + "Слагаемое 2: 75");
Сообщить("Представление: " + Документ.ПолучитьПредставлениеДанных());
Документ.ЗаписатьСодержимоеВФайл(Истина);
Тест.РазорватьСоединение();
КонецПроцедурыРазбор по шагам
Получите реальное поле текстового документа.
Введите две собственные строки.
Покажите представление и откройте Сохранить как.
Как проверить результат
Не выдумывается конструктор тестируемого расширения.
Старый текст действительно заменяется, а не дописывается.
Ожидаемый результат
Поле содержит учебный текст; сохранение предлагается пользователю отдельно.
На что обратить внимание
Ввод заменяет весь текст. Запрос сохранения не возвращает Булево и не гарантирует запись при отмене диалога.
Разрыв соединения показан только на нормальном пути, не как гарантированная аварийная очистка.
Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.