Qt 使用QAxObject操作Word
因为最近项中需要生成报表，所以网上查了资料，因为VB看不懂所以总结的也不多，在实现中没有使用标签只是以光标的位置来插入,包括：创建文件，排版方式，添加文字，添加图片，添加表格，表格添加文字（图片），光标移动到尾部，光标跳转（类似tab）等
添加 QT += axcontainer
QAxObject *m_pWord; //指向整个Word应用程序
QAxObject *m_pWorkDocuments; //指向文档集,Word有很多文档
QAxObject *m_pWorkDocument; //指向m_sFile对应的文档，就是要操作的文档
/*
创建word
*/
void MainWindow::open()
{
m_pWord = new QAxObject();
bool flag = m_pWord->setControl( "Word.Application" );
if(!flag)
{
return;
}
m_pWord->setProperty("Visible", true);
QAxObject *document = m_pWord->querySubObject("Documents");
if(!document)
{
return ;
}
//获取当前激活的文档
m_pWorkDocument = m_pWord->querySubObject("ActiveDocument");
}
/*
* 排版方式
* 纵行、横行
*/
void MainWindow::setype(bool type)
{
QAxObject* selection = m_pWord->querySubObject("Selection");
if(!selection)
{
return;
}
if(type)
{
selection->querySubObject("PageSetup")->setProperty("Orientation","wdOrientLandscape");
}else{
selection->querySubObject("PageSetup")->setProperty("Orientation","wdOrientPortrait");
}
}
/*
* 获取页宽
*/
int MainWindow::pageWidth()
{
int width;
QAxObject* selection = m_pWord->querySubObject("Selection");
if(!selection)
{
return;
}
width = selection->querySubObject("PageSetup")->property("PageWidth").toInt();;
return width;
}
/*
*设置字号
*/
void MainWindow::setFontSize(int size)
{
QAxObject* selection = m_pWord->querySubObject("Selection");
if(!selection)
{
return;
}
selection->querySubObject("Font")->setProperty("Size",size);
}
/*
设置对齐方式
*/
void MainWindow::setAlignment(int index)
{
QAxObject *selection = m_pWord->querySubObject("Selection");
if(!selection)
{
return;
}
if(index == 0)
{
selection->querySubObject("ParagraphFormat")->setProperty("Alignment","wdAlignParagraphCenter");
}
if(index == 1)
{
selection->querySubObject("ParagraphFormat")->setProperty("Alignment","wdAlignParagraphJustify");
}
if(index == 2)
{
selection->querySubObject("ParagraphFormat")->setProperty("Alignment","wdAlignParagraphRight");
}
if(index == 3)
{
selection->querySubObject("ParagraphFormat")->setProperty("Alignment","wdAlignParagraphLeft");
}
}
/*
插入文字
*/
void MainWindow::typeText(QString text)
{
QAxObject* selection = m_pWord->querySubObject("Selection");
if(!selection)
{
return;
}
selection->dynamicCall("TypeText(const QString&)",text);
}
/*
插入图片
*/
void MainWindow::AddPicture(QString file)
{
QAxObject* selection = m_pWord->querySubObject("Selection");
if(!selection)
{
return;
}
QString filename = file;
filename.replace("/","\\");
QAxObject *Inlineshapes = selection->querySubObject("InlineShapes");
Inlineshapes->dynamicCall("AddPicture(const QString&)",filename);
delete Inlineshapes;
}
/*
插入回车
*/
void MainWindow::insertEnter()
{
QAxObject* selection = m_pWord->querySubObject("Selection");
if(!selection)
{
return;
}
selection->dynamicCall("TypeParagraph(void)");
}
/*
* 光标移到末尾,跳出单元格
*/
void MainWindow::moveForEnd()
{
QAxObject* selection = m_pWord->querySubObject("Selection");
QVariantList params;
params.append(6);
params.append(0);
selection->dynamicCall("EndOf(QVariant&, QVariant&)", params).toInt();
}
/*
创建表格
QStringList headList 添加表头
*/
QAxObject* MainWindow::createTable(int row, int column,QStringList headList)
{
QAxObject* selection = m_pWord->querySubObject("Selection");
if(!selection)
{
return false;
}
selection->dynamicCall("InsertAfter(QString&)", "\r\n");
QAxObject *range = selection->querySubObject("Range");
QAxObject *tables = m_pWorkDocument->querySubObject("Tables");
QAxObject *table = tables->querySubObject("Add(QVariant,int,int)",range->asVariant(),row,column);
table->setProperty("Style","网格型");
//表格自动拉伸列 0固定 1根据内容调整 2 根据窗口调整
table->dynamicCall("AutoFitBehavior(WdAutoFitBehavior)", 2);
//设置表头
for(int i=0;i
table->querySubObject("Cell(int,int)",1,i+1)->querySubObject("Range")->dynamicCall("SetText(QString)", headList.at(i));
//加粗
table->querySubObject("Cell(int,int)",1,i+1)->querySubObject("Range")->dynamicCall("SetBold(int)", true);
}
return table;
}
/*
填充表格
*/
void MainWindow::setCellText(QAxObject *table, int row, int column, QString text)
{
QAxObject* range = table->querySubObject("Cell(int, int)",row+1,column+1)->querySubObject("Range");
if( range)
{
return;
}
range->dynamicCall("SetText(QString)", text);
}
/*
表格插入图片
*/
void MainWindow::setAddPicture(QAxObject *table, int row, int column, QString picPath)
{
QAxObject* range = table->querySubObject("Cell(int, int)",row+1,column+1)->querySubObject("Range");
if(!range)
{
return;
}
range->querySubObject("InlineShapes")->dynamicCall("AddPicture(const QString&)",picPath);
}
/*
光标跳转，类似表格中的tab
*/
void MainWindow::moveRight()
{
QAxObject* selection = m_pWord->querySubObject("Selection");
if(!selection)
{
return;
}
selection->dynamicCall("MoveRight(int)",1);
}
/*特殊样例*/
void MainWindow::Example()
{
QStringList header;
newTable(1,2,header);//创建表格
typeText(tr("文字1"));//添加文字
insertEnter();//换行
insertText("");
AddPicture("图像1");//插入图片
moveRight();//将光标插入到下个单元格中
typeText(tr("文字2"));
insertEnter();
insertText("");
AddPicture("图像2");
moveForEnd();//光标跳出表格
/*然后，可以做其他操作了*/
}