OpenOffice форматирование

[belugin]

Процедуры и функции для работы с OpenOffice

[PT]

примеры хорошие, но у меня ни в какую не получается нарисовать рамку ячейкам.
Устала тупить самостоятельно. Подскажите где собака зарыта..

static void oo_1(Args _args)
{
    COM OpenOffice;
    COM oDeskTop;
    COM oDocument;
    COM oscr;
    COM oSheets;
    COM oRange;
    COM oSheet;
    COM MyStruct;
    COMVariant arg;
    Array arr = new Array(Types::String);
    //Создание экземпляра OpenOffice.org
    OpenOffice = new Com("com.sun.star.ServiceManager");
    oDeskTop = OpenOffice.CreateInstance("com.sun.star.frame.Desktop");
    // create and initialize a COMVariant object
    arg = COMVariant::createFromArray(arr);
    //Создание документа
    oDocument = oDeskTop.LoadComponentFromURL("private:factory/scalc", "_blank", 0, arg);
    oSheets   = oDocument.getSheets();
    oSheet    = oSheets.getByIndex(0);

    oRange = oSheet.getCellRangeByPosition(2,3,5,7);
    oRange.setPropertyValue("CellBackColor", 1300003);
    MyStruct =OpenOffice.Bridge_GetStruct("com.sun.star.table.BorderLine");
    MyStruct.color(13047173);
    MyStruct.lineDistance(0);
    MyStruct.innerLineWidth(0);
    MyStruct.outerLineWidth(1);
    oRange.leftBorder(MyStruct);
    oRange.rightBorder(MyStruct);
    oRange.topBorder(MyStruct);
    oRange.bottomBorder(MyStruct);
}

[c_makarov]

Цитата:

Сообщение от PT

примеры хорошие, но у меня ни в какую не получается
нарисовать рамку ячейкам.

Вот часть кода, которая предназначена для отрисовки рамки:

void setBorder(str _borderName = "", int color = 0, int innerLineWidth = 0, int outerLineWidth = 10, int lineDistance = 0)
{
    COM MyStruct;
    ComDispFunction func;
    COMVariant varArg1 = new COMVariant();


    MyStruct = OpenOffice.Bridge_GetStruct("com.sun.star.table.BorderLine");

    func = new COMDispFunction(MyStruct, "Color",  COMDispContext::PropertyPut);
    varArg1.int(color);
    func.call(varArg1);

    func = new COMDispFunction(MyStruct, "OuterLineWidth",  COMDispContext::PropertyPut);
    varArg1.int(outerLineWidth);
    func.call(varArg1);

    func = new COMDispFunction(MyStruct, "InnerLineWidth",  COMDispContext::PropertyPut);
    varArg1.int(innerLineWidth);
    func.call(varArg1);

    func = new COMDispFunction(MyStruct, "LineDistance",  COMDispContext::PropertyPut);
    varArg1.int(lineDistance);
    func.call(varArg1);

    Cell.SetPropertyValue(_borderName, MyStruct);
}

Cell - это ячейка
OpenOffice - это объект OpenOffice



Передаваемые параметры:
_borderName - имя линии - например "LeftBorder", "RightBorder", "TopBorder", "BottomBorder"
_color - цвет _blue + (_green * 256) + (_red * 65536)
_innerLineWidth - толщина внутренней линии в сотых долях миллиметра
_outerLineWidth - толщина внешней линии в сотых долях миллиметра
_lineDistance - расстояние между внутренней и внешней линиями