Последние ответы: Eg.Er2022

Делаю отчет в Word c помощью стандартных средств без генераторов отчетов, вывожу линии, хочу поменять их цвет.
Добавляю канвас, добавляю в этот канвас линию, меняю свойство ForeColor:

Код:

  QAxObject *shapes = doc->querySubObject("Shapes");
    if (!shapes) return;
    QAxObject *canv = shapes->querySubObject("AddCanvas(Left, Top, Width, Height)", 130, 30, 140, 40);
    if (!canv) return;
    QAxObject *canvItems = canv->querySubObject("CanvasItems");
    if (!canvItems) return;
    QAxObject *line1 = canvItems->querySubObject("AddLine(double, double, double, double)", 25.0, 25.0, 50.0, 25.0)
                               ->querySubObject("Line");
    QAxObject *line2 = canvItems->querySubObject("AddLine(double, double, double, double)", 55.0, 25.0, 70.0, 25.0)
                               ->querySubObject("Line");

    line1->querySubObject("ForeColor")->setProperty("RGB", "RGB(29,21,86)");
    line2->setProperty("ForeColor", QColor().red());

Но цвет ни 1, ни 2 линии не меняется, в ворде цвета линий остаются черными!

Что я делаю неправильно?