Форум вопросов и ответов

Форум вопросов и ответов (https://www.otvetnemail.ru/)
-   Новый архив 2 (https://www.otvetnemail.ru/novyj-arhiv-2-812/)
-   -   Как объединить ячейки таблицы во Writer из Дельфи (https://www.otvetnemail.ru/novyj-arhiv-2-812/kak-ob-edinit-yachejki-tablicy-vo-writer-iz-del-fi-308302/)

Guest 30.09.2011 00:04

Как объединить ячейки таблицы во Writer из Дельфи
 
Доброе время!Как объединить ячейки таблицы во Writer, а не в Calc из Дельфи?var StarDesktop,Document,oText,oCursor: Variant; Table: Variant;begin StarDesktop := StarOffice.createInstance('com.sun.star. frame.Desktop'); Document := StarDesktop.LoadComponentFromURL( 'private:factory/swriter', '_blank', 0, VarArrayCreate([0, -1], varVariant)); oText := Document.GetText; oCursor := oText.CreateTextCursor; Table:=Document.createInstance('com.sun. star.text.TextTable'); Table.initialize(10, 10); oText.insertTextContent(oCursor, Table, False); Table.getCellRangeByPosition(0,2,3,3).Me rge(true); //или Table.getCellRangeByName('A3:D4').Merge( true); //не проходят - ругается. MergeCells тоже не проходитend;Может кто-нибудь откликнется, подскажет, или намекнет, а! Спасибо!


Часовой пояс GMT, время: 03:42.


© www.otvetnemail.ru - Форум вопросов и ответов.