|
0
Ar-Bus
10.04.12
✎
08:53
|
Доброго времени суток! Господа, суть проблемы: программно создана таблицав OOWriter, добавлено 5 колонок, несколько строк... А вот следующую строку необходимо сделать объединеной, т.е. всего одна колонка на ширину всей таблицы... Как этого добиться? Код приведен ниже:
ServiceManager = СоздатьОбъект("com.sun.star.ServiceManager");
Desktop = ServiceManager.createInstance("com.sun.star.frame.Desktop");
Scr = СоздатьОбъект("MSScriptControl.ScriptControl");
Scr.Language="javascript";
Scr.Eval("Args=new Array()");
Args = Scr.Eval("Args");
Scr.AddObject("ServiceManager", ServiceManager);
ТекстовыйПроцессор = Desktop.LoadComponentFromURL(ПреобразоватьВURL(ИмяФайла), "_blank", 0, Args);
ОбъектТекста=ТекстовыйПроцессор.GetText();
Kursor=ОбъектТекста.CreateTextCursor();
ОбъектТекста.InsertControlCharacter(Kursor,0,0);
ПерваяТаблица=ТекстовыйПроцессор.getTextTables().getByIndex(0);
ПерваяТаблица.getRows().getByIndex(0);
ОбъектТекста=ТекстовыйПроцессор.GetText();
Kursor=ОбъектТекста.CreateTextCursor();
Если ДополнительныхСистем>0 Тогда
Строки= ПерваяТаблица.getRows();
Строки.insertByIndex(Строки.getCount(),1);
oCell = ПерваяТаблица.getCellByPosition(1,3);
oCell.SetString("Дополнительный программный продукт");
КонецЕсли;
т.е. создается таблица, 5 колонок, эти колонки заполняются некоторыми данными, а затем следующую строку таблицы нужно сделать одной колонкой по всей ширине таблицы... Каков должен быть текст кода?
|
|
|
1
Ar-Bus
10.04.12
✎
08:55
|
часть кода, где первоначально заполняется таблица, упущен, оставлена только та часть, где необходимо добавить строку с одной колонкой по всей ширине таблицы... (Если ДополнительныхСистем>0 Тогда)
|
|
