Название: Закрасить линию Ms Word
Отправлено: Eg.Er2022 от Сентябрь 01, 2022, 13:57
Делаю отчет в 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 линии не меняется, в ворде цвета линий остаются черными! Что я делаю неправильно?
|