Название: Автоматизированный бухгалтерский учет в программном комплексе «1С-М52 Предприятие» (Меркулова Т.А)

Жанр: Информационные системы и технологии

Просмотров: 1296


7.2. работа с текстом

Процедуры работы с Текстом

ОткрытьЩмяФайла)

Процедура Открыть открывает файл с указанным именем ИмяФайла. Пример:

ТекстДок=СоздатьОбьект("Текст"); ТекстДок.Открыть("ргкеЛх1" );

Шаблон (Флаг)

Процедура Шаблон устанавливает флаг, при котором все добавления строк в Текст выполняются с заменой полей, ограниченный квадратными скобками, на значения содержащихся в них выражении.

Значения Флага; 1 —установить, 0 - отменить. Пример: | ТекстДок = СоздатьОбьект("Текст"); ТекстДок.Открыть('pjrice.txt''); ТекстДок.Шаблои(1);

ТекстДок.ЗаменитьСтроку(5 2,«[ТоварНаименование] ,арт: [Товар. Артикул].. ..[ТоварЦена]»); ТекстДок.ФиксШаблои(0);

ТекстДок.ВставитьСтроку(53, «Туфли женские, арт. 456321. 58000 руб»);

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

ВстаъитьСтрокуЩомерСтроки, Строка)

Процедура ВставитьСтроку вставляет в Текст строку с номеромСтроки и

значением Строки.

Пример

ТекстДок = СоздатьСтроку("Текст"), ТекстДок=Открыть(«рпсе.1хг");

ТекстДок.ЗамеиитьСтроку(52/гТуфли мужские, арт 123456.. "+Цена); ТекстДокЛЗста вить

Добавить строку — добавить строку в конец текста.

Процедура ДобавитьСтроку добавляет в конец Текста указанную строку. Пример:

ТекстДок=СоздатьОбьект("Текст"); ТекстДок.Открыть("рпсе.1хг" );

ТеккстДокДобавить строку(«Туфли мужские арт 123456 75000 руб»); ТекстДок. ТолькоПросмотр(1);

Заменить строку (НомерСтроки,Строка)

Процедура Заменить Строку замещает строку Текста с номером

НомерСТроки на указанное значение Строка

Пример:

ТекстДок=СоздатьОбьект(«Текст»); ТекстДокОткрыть(«рпсе.т.х1>>);

ТекстДокЗаменитьСтроку(52, «Туфли мужские, арт 123456^ цена»)-ТекстДок.Толькопромотр(1);

Удалить стуоку(НомерСтррки)

Процедура УдалитьСтроку удаляет строку с номером иомерСтроки Пример:

Текст док = СозддатьОбьект("Текст"); Текст док.Открыть("рпсе.Ш"): Текст,докУдалитьСтроку(53 );

ТолькоПросмотр(<Дшг)

Процедура толькоПросмотр устанавливает флаг возможности изменения^

Текста в окне редактирования .

Устнавливаемые значения флага:

1 - только просмотр ;

0 — допускается редактирование •

Пример:

ТекстДок = СоздатьОбьект("Текст"); ТекстДок.Открыть('pjrice.txt"); ТекстДок.ТолькоПросмотр(1);

ТекстДок.Показать(редактрование прайслиста, "price.txt");

I 150 l

Показать/Заголовок, Имя Файла)

Процедура Показать открывает окно с Текстом для редактирования и просмотра. Если файла с именем ИмяФайла не существует, то будет создан новый файл с таким именем. Если ИмяФайла окажется пустым, то Текст не будет предлагать сохранение при закрытии окон. Это имеет смысл для текстовых документов, которые формируются только для просмотра или печати, и их не нужно обязательно записывать в файл. Разумеется> после открытия окна все равно -можно записать такой Текст в файл^ используя команды меню «файл». Пример:

ТекстДок = СоздатьОбьект(«Текст»); ТекстДок.Открыть(«рг1СеЛх1»);

ТекстДок.Показать(«Редактирование ПрайсЛиста. «price.txt»);

ЗаписатьШмяФайла)

Записвает Текст в файл с указанным именем.

Имя файла - Строковое выражение с именем файла

Пример:

ТекстДок-СоздатьОбьект("Текст"),' Текст Док. OTKpbiTb(«price.txt»); ТекстДокЗаписать(«рпсе.1хЪ>);