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
Стабільний хостинг, на якому розміщується соціальна мережа EVILEG. Для проектів на Django радимо VDS хостинг.Вам це подобається? Поділіться в соціальних мережах!
sf
- sdfsdfkp fgskpgokspdog
- 14 жовтня 2024 р. 15:09
C++ - Тест 004. Указатели, Массивы и Циклы
- Результат:90бали,
- Рейтинг балів8
МВ
- Максим Васильев
- 02 жовтня 2024 р. 04:14
Qt - Тест 001. Сигналы и слоты
- Результат:68бали,
- Рейтинг балів-1
ЛС
- Лев Семенов
- 30 вересня 2024 р. 11:04
C++ - Тест 001. Первая программа и типы данных
- Результат:53бали,
- Рейтинг балів-4
Останні коментарі
Читалка файлів fb3 на Qt Creator Подскажите как это запустить? Я не шарю в программировании и кодинге. Скачал и установаил Qt, но куча ошибок выдается и не запустить. А очень надо fb3 переконвертировать в html
ИМ
Django - Урок 064. Як написати розширення для Python Markdown Приветствую Евгений! У меня вопрос. Можно ли вставлять свои классы в разметку редактора markdown? Допустим имея стандартную разметку: <ul> <li></li> <li></l…
Игорь Максимов05 жовтня 2024 р. 07:51
QML - Урок 016. База даних SQLite та робота з нею в QML Qt Здравствуйте, возникает такая проблема (я новичок): ApplicationWindow неизвестный элемент. (М300) для TextField и Button аналогично. Могу предположить, что из-за более новой верси…
Qt Linux - Урок 001. Автозапуск програми Qt під Linux как сделать автозапуск для флэтпака, который не даёт создавать файлы в ~/.config - вот это вопрос ))
АК
Qt WinAPI - Урок 007. Робота з ICMP Ping в Qt Без строки #include <QRegularExpressionValidator> в заголовочном файле не работает валидатор.
Анатолий Кононенко05 лютого 2024 р. 01:50
Тепер обговоріть на форумі
добавить qlineseries в функции Пользователь может получить любые разъяснения по интересующим вопросам, касающимся обработки его персональных данных, обратившись к Оператору с помощью электронной почты https://topdecorpro.ru…
ИМ
Реализация навигации по разделам Спасибо Евгений!
Игорь Максимов03 жовтня 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 вересня 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
Действительно, в выводе я тоже самое получаю. Раньше не обращал внимание. А теперь стало интересно из-за чего. Может кто из форумчан сможет подсказать