如何在qt for windows中用QAxObject创建docx和doc文件？

#include <QAxObject>

QAxObject* wordApp = new QAxObject("Word.Application");

wordApp->setProperty("Visible", true);

QAxObject* documents = wordApp->querySubObject("Documents");

QAxObject* document = documents->querySubObject("Add()");

QAxObject* selection = wordApp->querySubObject("Selection");

selection->dynamicCall("TypeText(const QString&)", "Hello World!");

document->dynamicCall("SaveAs(const QString&)", "C:/path/to/document.docx", 16);

document->dynamicCall("SaveAs(const QString&)", "C:/path/to/document.doc", 0);

document->dynamicCall("Close()");

wordApp->dynamicCall("Quit()");

delete wordApp;