ActiveQt. Вставка формул в word.
Добрый день. Возник вопрос по заполнению документа .doc из Qt. Хочу добавить в таблицу формулу (например "е" с верхним и нижним индексом), но совершенно не понимаю как это сделать. Привожу код ниже:
#include "mainwindow.h" #include "ui_mainwindow.h" MainWindow::MainWindow(QWidget *parent) : QMainWindow(parent), ui(new Ui::MainWindow) { ui->setupUi(this); workWord(); } MainWindow::~MainWindow() { delete ui; } void MainWindow::workWord() { //интерфейс к MSWord QAxObject *wordApp = new QAxObject("Word.Application"); //интерфейс к подобъекту - коллекция скрытых документов QAxObject *wordDoc = wordApp->querySubObject("Documents()"); //создаем новый документ QAxObject *newDoc = wordDoc->querySubObject("Add()"); ///Заголовок для входных данных QAxObject *rangeInputData = newDoc->querySubObject("Range()"); rangeInputData->dynamicCall("SetRange(int, int)", 0, 100); rangeInputData->setProperty("Text", "Исходные данные."); //размер, шрифт, выравнивание QAxObject *font_rangeInputData = rangeInputData->querySubObject("Font"); font_rangeInputData->setProperty("Size", 12); font_rangeInputData->setProperty("Name", "Arial"); QAxObject *alignment_rangeInputData = rangeInputData->querySubObject("ParagraphFormat"); alignment_rangeInputData->setProperty("Alignment", "wdAlignParagraphCenter"); alignment_rangeInputData->setProperty("SpaceAfter", 0); //отступ rangeInputData->dynamicCall("InsertParagraphAfter()"); rangeInputData->dynamicCall("InsertParagraphAfter()"); ///Заголовок для 1 таблицы QAxObject *rangeNameT1 = newDoc->querySubObject("Range()"); rangeNameT1->dynamicCall("SetRange(int, int)", 101, 200); rangeNameT1->setProperty("Text", "Таблица 1."); //выравнивание QAxObject *alignment_rangeNameT1 = rangeNameT1->querySubObject("ParagraphFormat"); alignment_rangeNameT1->setProperty("Alignment", "wdAlignParagraphLeft"); //таблица 1 QAxObject *tables = newDoc->querySubObject("Tables()"); QAxObject *rangeTable1 = newDoc->querySubObject("Range()"); rangeTable1->dynamicCall("SetRange(int, int)", 201, 300); QAxObject* table1 = tables->querySubObject("Add(Range, NumRows, NumColumns, DefaultTableBehavior, AutoFitBehavior)", rangeTable1->asVariant(), 4, 3, 1, 1); //Заполняем таблицу //горизонтальные заголовки QAxObject *currentCell = table1->querySubObject("Cell(Row, Column)", 1, 1); QAxObject *rangeCurrentCell = currentCell->querySubObject("Range()"); rangeCurrentCell->dynamicCall("InsertAfter(Text)", "Наименование"); currentCell = table1->querySubObject("Cell(Row, Column)", 1, 2); rangeCurrentCell = currentCell->querySubObject("Range()"); rangeCurrentCell->dynamicCall("InsertAfter(Text)", "Формула"); currentCell = table1->querySubObject("Cell(Row, Column)", 1, 3); rangeCurrentCell = currentCell->querySubObject("Range()"); rangeCurrentCell->dynamicCall("InsertAfter(Text)", "Значение"); //вертикальные заголовки for (int i = 0; i < 3; i++) { currentCell = table1->querySubObject("Cell(Row, Column)", i+2, 1); rangeCurrentCell = currentCell->querySubObject("Range()"); QString temp = "Переменная" + QString::number(i); rangeCurrentCell->dynamicCall("InsertAfter(Text)", temp); } //формулы //делаем ворд видимым wordApp->setProperty("Visible", true); delete rangeCurrentCell; delete currentCell; delete table1; delete rangeTable1; delete tables; delete alignment_rangeNameT1; delete rangeNameT1; delete alignment_rangeInputData; delete font_rangeInputData; delete rangeInputData; delete newDoc; delete wordDoc; delete wordApp; }
Рекомендуємо хостинг TIMEWEB
Stabiles Hosting des sozialen Netzwerks EVILEG. Wir empfehlen VDS-Hosting für Django-Projekte.Magst du es? In sozialen Netzwerken teilen!
Kommentare
sf
- sdfsdfkp fgskpgokspdog
- 14. Oktober 2024 15:09
C++ - Тест 004. Указатели, Массивы и Циклы
- Ergebnis:90punkte,
- Bewertungspunkte8
МВ
- Максим Васильев
- 2. Oktober 2024 04:14
Qt - Тест 001. Сигналы и слоты
- Ergebnis:68punkte,
- Bewertungspunkte-1
ЛС
- Лев Семенов
- 30. September 2024 11:04
C++ - Тест 001. Первая программа и типы данных
- Ergebnis:53punkte,
- Bewertungspunkte-4
Letzte Kommentare
Fb3-Dateileser auf Qt Creator Подскажите как это запустить? Я не шарю в программировании и кодинге. Скачал и установаил Qt, но куча ошибок выдается и не запустить. А очень надо fb3 переконвертировать в html
ИМ
Django – Lektion 064. So schreiben Sie eine Python-Markdown-Erweiterung Приветствую Евгений! У меня вопрос. Можно ли вставлять свои классы в разметку редактора markdown? Допустим имея стандартную разметку: <ul> <li></li> <li></l…
Игорь Максимов5. Oktober 2024 07:51
QML - Lektion 016. SQLite-Datenbank und das Arbeiten damit in QML Qt Здравствуйте, возникает такая проблема (я новичок): ApplicationWindow неизвестный элемент. (М300) для TextField и Button аналогично. Могу предположить, что из-за более новой верси…
Qt Linux - Lektion 001. Autorun Qt-Anwendung unter Linux как сделать автозапуск для флэтпака, который не даёт создавать файлы в ~/.config - вот это вопрос ))
АК
Qt WinAPI - Lektion 007. Arbeiten mit ICMP-Ping in Qt Без строки #include <QRegularExpressionValidator> в заголовочном файле не работает валидатор.
Анатолий Кононенко5. Februar 2024 01:50
Jetzt im Forum diskutieren
добавить qlineseries в функции Пользователь может получить любые разъяснения по интересующим вопросам, касающимся обработки его персональных данных, обратившись к Оператору с помощью электронной почты https://topdecorpro.ru…
ИМ
Реализация навигации по разделам Спасибо Евгений!
Игорь Максимов3. Oktober 2024 04:05
Indian Food Restaurant In Columbus OH| Layla’s Kitchen Indian Restaurant If you're looking for a truly authentic https://www.laylaskitchenrestaurantohio.com/ , Layla’s Kitchen Indian Restaurant is your go-to destination. Located at 6152 Cleveland Ave, Colu…
КГ
Не запускается программа на Qt: точка входа в процедуру не найдена в библиотеке DLL Написал программу на C++ Qt в Qt Creator, сбилдил Release с помощью MinGW 64-bit, бинарнику напихал dll-ки с помощью windeployqt.exe. При попытке запуска моей сбилженной программы выдаёт три оши…
Кирилл Гусарев27. September 2024 09:09
при создании qml проекта Kits есть но недоступны для выбора Поставил Qt Creator 11.0.2. Qt 6.4.3 При создании проекта Qml не могу выбрать Kits, они все недоступны, хотя настроены и при создании обычного Qt Widget приложения их можно выбрать. В чем может …
После некоторого поиска информации об этом вопросе я наткнулся вот на такой кусок кода, который используется для установки верхнего индекса
Судя по всему.. это или бейсик, или паскаль.. не важно.
За полную актуальность этого решения не ручаюсь, это догадки, но путь примерно такой может быть
Подскажите, пожалуйста, как сделать объединение ячеек в таблице?
Если продолжить приведенный в вопросе мой код, то вот так можно объеденить две строки в первом столбце:
В случае такого объединения в выводе приложения имеем такое сообщение: "QAxBase::querySubObject: Merge(MergeTo): Error calling function or property in (unknown)"
Странно, у меня все работало, выложите ваш код может найдем в чем причина.
Вот моя функция:
void mergeCells(int nStartRow,int nStartCol,int nEndRow,int nEndCol)
{
QAxObject StartCell =_tableDoc->querySubObject("Cell(int, int)",nStartRow,nStartCol);
QAxObject EndCell = _tableDoc->querySubObject("Cell(int, int)",nEndRow,nEndCol);
StartCell->querySubObject("Merge(MergeTo)",EndCell->asVariant());
}
Попробовал у себя дома. Все работает. Вот прикладлываю проект. использовал QT5.14, MinGW5.3.0, но объединение работало и на более ранних версиях
TestWowdTable.rar
Спасибо большое за проект. Само объединение у меня тоже работает. Но при выводе приложения получает следующее: QAxBase::querySubObject: Merge(MergeTo): Error calling function or property in (unknown). И поскольку объединение вызывается не один раз, хотелось от этого избавиться.
Image_11.png
Действительно, в выводе я тоже самое получаю. Раньше не обращал внимание. А теперь стало интересно из-за чего. Может кто из форумчан сможет подсказать