1С Режим Конфигуратор



Пример


ТекстДок = СоздатьОбъект("Текст");

ТекстДок.Открыть("catalog.txt");

ТекстДок.ЗаменитьСтроку(52, "Установка оборудования......" + Стоимость);

ТекстДок.ВставитьСтроку(53, "Замена оборудования... ");

ТекстДок.УдалитьСтроку(10);

ТекстДок.ДобавитьСтроку("Конец файла");

ТекстДок2 = СоздатьОбъект("Текст");

ТекстДок2.Шаблон(1);

Для н = 1 По ТекстДок.КоличествоСтрок(1) Цикл

..........стр = ТекстДок.ПолучитьСтроку(н);

..........стр2 = "[н]" + стр;

.........ТекстДок2.ДобавитьСтроку(стр2);

КонецЦикла;

ТекстДок2.Записать("catalog2.txt");

ТекстДок2.ТолькоПросмотр(1);

ТекстДок2.Показать();




Содержание  Назад  Вперед