1. 為什么項(xiàng)目里總會冒出Qt輸出Word的需求做了幾年Qt桌面端開發(fā)你會發(fā)現(xiàn)一個(gè)規(guī)律凡是涉及業(yè)務(wù)系統(tǒng)、辦公自動化的項(xiàng)目十有八九會碰到在程序里生成Word文檔這種需求。比如項(xiàng)目里要定期輸出月度報(bào)告、按模板生成合同文書、導(dǎo)出帶格式的評審表或者批量生成錄用通知——產(chǎn)品經(jīng)理的語言永遠(yuǎn)是一句你就把數(shù)據(jù)填進(jìn)Word里嘛但落到技術(shù)側(cè)這并不是一個(gè)CtrlC/CtrlV能解決的問題。我第一次被安排這個(gè)任務(wù)時(shí)第一反應(yīng)是去翻Qt的幫助文檔看有沒有自帶的Word模塊。答案是沒有。Qt本身對Office文檔的支持非常有限沒有原生的docx解析器也不內(nèi)置任何文檔導(dǎo)出接口。有人可能會說QTextDocument不是能寫富文本嗎能用啊但真要交付到客戶手里要求是打開能正常排版的.docxQTextDocument導(dǎo)出的格式Word打開問題一大堆樣式也控制不住。于是主流的可行路線只剩兩條直接生成符合OOXML規(guī)范的docx文件本質(zhì)是打ZIP包手寫document.xml等內(nèi)部結(jié)構(gòu)通過COM組件控制本機(jī)安裝的Word應(yīng)用程序讓W(xué)ord替我們把文檔拼出來。這兩條路線我在不同項(xiàng)目里都試過。方案1看起來更純Qt不依賴Office環(huán)境但要做復(fù)雜的表格合并、分頁、頁眉頁腳、樣式繼承時(shí)手寫XML的工作量會暴漲調(diào)試起來特別痛苦尤其嵌套表格的結(jié)構(gòu)稍有偏差Word打開就報(bào)文件損壞是否要恢復(fù)。方案2則走了另一個(gè)極端完全的外部依賴要求目標(biāo)機(jī)器必須裝有Microsoft Word但帶來的好處是——你只需要會調(diào)用Word的接口排版邏輯全部交給Word自己所見即所得客戶驗(yàn)收時(shí)基本挑不出文件層面的毛病。實(shí)際項(xiàng)目里絕大多數(shù)業(yè)務(wù)場景的目標(biāo)機(jī)器都預(yù)裝Office所以方案2成了我長期在用的主方案。這篇就把我在Windows平臺上用Qt通過COM組件操作Word的完整套路整理出來從環(huán)境配置、初始化寫法、套用模板填充數(shù)據(jù)到批量替換文本、插入表格和圖片、設(shè)置格式再到讓W(xué)ord靜默駐留后臺的注意事項(xiàng)和性能優(yōu)化每一步都附可跑的代碼。內(nèi)容基于我在實(shí)際項(xiàng)目里反復(fù)踩坑、驗(yàn)證過的經(jīng)驗(yàn)適合剛接到類似需求、想少走彎路的Qt開發(fā)者參考。需要先說清楚一個(gè)大前提這套方案只適用于Windows平臺底層依賴是Qt的QAxContainer模塊也就是ActiveQt框架?？缙脚_項(xiàng)目別指望它Linux/macOS上如果想要同樣效果只能回到方案1或者另找別的路子比如用LibreOffice的UNO接口。我下面說的所有東西都默認(rèn)你的開發(fā)環(huán)境和部署環(huán)境都是Windows。2. 技術(shù)底座QAxObject與Word的COM自動化模型2.1 為什么是COM而不是什么原生Qt庫其實(shí)初看Qt的模塊列表很多人會以為ActiveQt是給Windows控件開發(fā)用的老古董但在文檔自動化這個(gè)場景里QAxObject是最趁手的工具。它做的事簡單說就是在Qt和Windows COM組件之間搭橋讓你的C代碼能像調(diào)用本地對象一樣調(diào)用Word暴露出來的自動化接口。Word本身作為一個(gè)COM服務(wù)器暴露了一整套自動化模型結(jié)構(gòu)是這樣一條鏈ApplicationWord應(yīng)用本體→Documents當(dāng)前打開的所有文檔集合→Document單篇文檔→Paragraphs/Tables/InlineShapes等文檔內(nèi)容對象。在Qt側(cè)你只需要?jiǎng)?chuàng)建幾個(gè)QAxObject指針一層層往下拿而要調(diào)用某個(gè)方法或設(shè)置某個(gè)屬性則通過dynamicCall和setProperty完成。用生活類比來講QAxObject就像一把萬能遙控器Word就是那臺被遙控的電視。你不需要拆開電視研究內(nèi)部電路X不關(guān)心OOXML內(nèi)部結(jié)構(gòu)只需要按遙控器上的按鈕調(diào)接口電視就會自己播放出你想要的畫面。2.2 環(huán)境與工程配置先讓項(xiàng)目跑起來Qt版本我這邊一直在用Qt 5.12~5.15的MSVC套件這套代碼在Qt 6.x上也能編譯但QAxContainer模塊在Qt 6里從Qt庫中剝離成了獨(dú)立模塊。如果你用的是Qt 6需要額外安裝Active Qt組件否則#include QAxObject會直接報(bào)找不到頭文件。編譯器建議用MSVCMinGW雖然也能編但COM支持的細(xì)節(jié)上坑更多。Word版本的話Office 2010到Office 365我都測過核心接口一致基本都能通。最關(guān)鍵的是工程文件.pro里的一行配置QT axcontainer加上這一行之后Qt Creator會自動鏈接相關(guān)的COM庫代碼里就可以正常寫#include QAxObject有個(gè)容易忽略的點(diǎn)Release版本的程序也要保留Word的COM注冊信息如果你在純凈的部署環(huán)境比如剛裝好系統(tǒng)的客戶機(jī)器上運(yùn)行發(fā)現(xiàn)QAxObject創(chuàng)建失敗先檢查機(jī)器上有沒有正常安裝Office。Office沒裝或者裝的是商店版UWP版COM接口大概率是注冊不全的這是環(huán)境問題代碼怎么寫都沒用。2.3 初始化Word應(yīng)用程序的幾種寫法初始化Word的接口網(wǎng)上能找到的寫法五花八門有一種很常見但容易出問題的快速寫法QAxObject* word new QAxObject(Word.Application);這種寫法不推薦。因?yàn)樗粰z查COM組件是否正確創(chuàng)建一旦本機(jī)Word環(huán)境有問題返回的就是空指針后面再調(diào)用指針方法程序就會在不知道哪個(gè)角落崩潰。我自己的固定寫法是QAxObject* word nullptr; QAxObject* docs nullptr; QAxObject* doc nullptr; word new QAxObject(); if (!word-setControl(Word.Application)) { // 創(chuàng)建失敗這里可以拋出異?；蛴涗浫罩?delete word; word nullptr; }setControl返回bool能準(zhǔn)確判斷是否拿到了Word.Application這個(gè)COM對象。創(chuàng)建成功之后再拿文檔集合if (word nullptr) { // 做錯(cuò)誤處理或者直接返回失敗 return false; } docs word-querySubObject(Documents);一個(gè)關(guān)鍵的補(bǔ)充點(diǎn)程序初始化時(shí)有一步不該省的設(shè)置——QApplication::setAttribute(Qt::AA_EnableHighDpiScaling)。如果你的電腦開了顯示縮放比如125%、150%而程序沒啟用高DPI感知Word自動化操作時(shí)窗口坐標(biāo)會出現(xiàn)偏移某些情況下會影響獲取表格行列位置的接口結(jié)果。我在這上面栽過一次加上之后現(xiàn)象就消失了。這一步的完整寫法放在main函數(shù)開頭int main(int argc, char *argv[]) { QApplication::setAttribute(Qt::AA_EnableHighDpiScaling); QApplication app(argc, argv); // 其余初始化 }3. 核心操作打開文檔、寫內(nèi)容、控制格式3.1 創(chuàng)建新文檔與打開已有文檔拿到docs集合之后兩條路新建空文檔或者打開已有文件。// 新建文檔 doc docs-querySubObject(Add()); // 打開已有文檔 doc docs-querySubObject(Open(const QString), QString(D:/templates/report.docx));Open接口的第一個(gè)參數(shù)是文件全路徑注意必須是絕對路徑相對路徑大概率打不開。目錄分隔符用兩種都可以但建議統(tǒng)一寫成/比如D:/templates/report.docxQt層會做轉(zhuǎn)換Windows COM也認(rèn)這個(gè)分隔符避免在字符串里寫\\轉(zhuǎn)義把自己繞暈。打開已有模板文檔后向其中替換占位符是高頻操作。我會在模板里預(yù)留形如{{姓名}}、{{日期}}這樣的文本然后程序里用查找替換的方式填充。需要特別留個(gè)心眼Word的COM接口里Selection.Find.Execute是能用的主力替換手段但它有副作用——一次Execute只替換第一個(gè)匹配項(xiàng)。要替換全文所有占位符必須套循環(huán)循環(huán)里每次查找到之后繼續(xù)執(zhí)行Execute直到Execute返回false為止。Execute的返回值在COM自動化里是bool可以通過dynamicCall的返回值拿到。3.2 用查找替換批量填充模板數(shù)據(jù)下面這段是我實(shí)際項(xiàng)目里提煉出來的全篇替換函數(shù)骨架改一改就能用bool replaceInWordDocument(QAxObject* doc, const QString findText, const QString replaceText) { if (!doc || findText.isEmpty()) { qWarning() Invalid doc or findText; return false; } QAxObject* content doc-querySubObject(Content); if (!content) { qWarning() Failed to query Content; return false; } QAxObject* find content-querySubObject(Find); if (!find) { qWarning() Failed to query Find; return false; } // 執(zhí)行查找替換 bool ok find-dynamicCall(Execute(const QString), findText).toBool(); while (ok) { QAxObject* textObj content-querySubObject(Text); QString currentText textObj ? textObj-toString() : QString(); if (currentText findText) // 用文本內(nèi)容判等確定確實(shí)找對了 { // 替換選中后直接修改文本 // 簡便做法使用 Find.Execute 的 ReplaceWith 參數(shù) find-dynamicCall(Execute(const QString, bool, bool, bool, bool, bool, bool, int, int, const QString, int), QVariantList{ findText, // FindText false, // MatchCase false, // MatchWholeWord false, // MatchWildcards false, // MatchSoundsLike false, // MatchAllWordForms true, // Forward 1, // Wrap (1 wdFindContinue) 0, // Format replaceText, // ReplaceWith 2 // Replace (2 wdReplaceAll) }); } else { break; } } return true; }不過上面這段有個(gè)細(xì)節(jié)要注意Content.Find.Execute配合Replace參數(shù)使用時(shí)如果把Replace設(shè)為2即wdReplaceAll它會在一次調(diào)用內(nèi)部自動把所有匹配項(xiàng)替換完不會只替換一個(gè)。我之前踩過坑以為Execute一次只替換一處結(jié)果循環(huán)里不停地執(zhí)行導(dǎo)致同一個(gè)占位符被替換了好幾遍。實(shí)際上更穩(wěn)的做法是直接用一次ReplaceAll完成整篇替換把Replace參數(shù)傳2即可。核心代碼可以精簡成bool ok find-dynamicCall( Execute(const QString, bool, bool, bool, bool, bool, bool, int, int, const QString, int), QVariantList{ findText, // 查找內(nèi)容 false, // MatchCase false, // MatchWholeWord false, // MatchWildcards false, // MatchSoundsLike false, // MatchAllWordForms true, // Forward 1, // Wrap 0, // Format replaceText, // 替換內(nèi)容 2 // Replace - wdReplaceAll }).toBool();dynamicCall的參數(shù)字符串里每個(gè)const QString對應(yīng)一個(gè)QVariant參數(shù)。參數(shù)的順序、個(gè)數(shù)都必須和Word的VBA接口簽名完全一致少了多了都會調(diào)用失敗。這一點(diǎn)只能對照VBA文檔來沒有捷徑不過對于常用替換場景上面這份參數(shù)模板可以一直套用。3.3 用Range對象寫入大段文字如果業(yè)務(wù)場景不是套模板而是憑空生成一段帶格式的Word文檔比如把各系統(tǒng)的數(shù)據(jù)匯總成純文本文檔那需要用到Range對象。QAxObject* content doc-querySubObject(Content); content-dynamicCall(InsertAfter(const QString), QString(這是第一段內(nèi)容。\n));但I(xiàn)nsertAfter追加的內(nèi)容在末尾想控制段落的對齊、字號、顏色就必須在插入之后獲取段落范圍然后對Font對象設(shè)置屬性。QAxObject* paragraphs doc-querySubObject(Paragraphs); int count paragraphs-property(Count).toInt(); QAxObject* lastParagraph doc-querySubObject(Paragraphs(int), count); // 設(shè)置居中 lastParagraph-dynamicCall(set_Alignment, 1); // 1 表示居中 // 設(shè)置該段落的字體 QAxObject* range lastParagraph-querySubObject(Range); QAxObject* font range-querySubObject(Font); font-setProperty(Bold, true); font-setProperty(Size, 14); font-dynamicCall(set_Name, QString(微軟雅黑));注意set_Alignment這個(gè)名字是VBA屬性Alignment的setter自動化寫法。直接用setProperty(Alignment, 1)在某些場景也能生效但遇到Word個(gè)別屬性時(shí)不如set_xxx穩(wěn)定。我個(gè)人的習(xí)慣是屬性賦值優(yōu)先用setProperty如果發(fā)現(xiàn)某些版本W(wǎng)ord不生效再換dynamicCall(set_Alignment, value)。Range對象的語義要解釋一下它不像Word里你眼睛看到的那段文本那么明確它更像是文檔中一段連續(xù)的區(qū)間你可以把它理解為Word世界里的選區(qū)。操作Range就是操作選區(qū)后面插入表格和圖片都逃不開這個(gè)思路。4. 表格與圖片讓數(shù)據(jù)真正排版起來4.1 插入表格并填充單元格數(shù)據(jù)模板數(shù)據(jù)里最常出現(xiàn)的場景是把數(shù)據(jù)庫查出來的多行記錄放進(jìn)一個(gè)規(guī)整的表格。插入表格的接口是Documents下的Tables.Add但必須先有一個(gè)Range作為插入位置。最常見的做法是把光標(biāo)先放到文檔末尾取末尾Range再以它為錨點(diǎn)插入表格。// 1. 先取文檔內(nèi)容末尾的Range QAxObject* content doc-querySubObject(Content); QVariant endPos content-property(End); QAxObject* range doc-querySubObject(Range(int, int), endPos.toInt(), endPos.toInt()); // 2. 調(diào)用Tables集合 QAxObject* tables doc-querySubObject(Tables); QAxObject* table tables-querySubObject( Add(QAxObject*, int, int), QVariantList{ range-asVariant(), rowCount, colCount }); // 3. 設(shè)置表格樣式可選 table-setProperty(Style, 網(wǎng)格型); // 給一個(gè)內(nèi)置樣式名Tables.Add的第一個(gè)參數(shù)是Range對象傳法有點(diǎn)特別需要用QVariantList把多個(gè)參數(shù)包起來其中第一個(gè)參數(shù)直接傳QAxObject指針。如果你漏掉了這個(gè)參數(shù)表格想插到當(dāng)前位置就插不到指定位置Word會在最前面插——這經(jīng)常導(dǎo)致表格跑到模板文字前面去初次寫的人很容易被坑到。表格建好之后往單元格填數(shù)據(jù)是這樣// 逐行逐列賦值i從1開始行/列索引不越界 for (int i 1; i rowCount; i) { for (int j 1; j colCount; j) { QAxObject* cell table-querySubObject(Cell(int, int), i, j); QAxObject* cellRange cell-querySubObject(Range); cellRange-dynamicCall(set_Text, QString(第%1行第%2列).arg(i).arg(j)); } }這里的索引從1開始是VBA的習(xí)慣和C數(shù)組從0開始不一樣循環(huán)邊界容易搞錯(cuò)導(dǎo)致最后一列數(shù)據(jù)沒填上。另一種常見情況你往Cell里設(shè)置文本后整個(gè)單元格文字默認(rèn)靠左對齊、字號跟隨模板如果想要統(tǒng)一格式需要對每個(gè)cellRange再操作一次ParagraphFormatQAxObject* paraFmt cellRange-querySubObject(ParagraphFormat); paraFmt-setProperty(Alignment, 1); // 居中4.2 插入圖片并控制尺寸和位置報(bào)告類文檔里插Logo、插截圖是常事。在Word的COM自動化里插入圖片的方法是InlineShapes.AddPicture——注意是InlineShapes嵌入型圖片不是Shapes浮動圖形。嵌入型圖片的好處是它跟著文字走插入到當(dāng)前Range所在位置排版不容易亂。QAxObject* inlineShapes doc-querySubObject(InlineShapes); QAxObject* inlineShape inlineShapes-querySubObject( AddPicture(const QString, bool, bool, QAxObject*), QVariantList{ QString(D:/images/logo.png), false, true, range-asVariant() });AddPicture的參數(shù)第一個(gè)是文件完整路徑第二個(gè)是LinkToFile我們傳false表示嵌入文檔不鏈接外部文件第三個(gè)是SaveWithDocument傳true保存文檔時(shí)圖片一起存第四個(gè)是插入的Range位置。圖片插入后默認(rèn)大小是圖片原始像素大小如果原圖是高清大圖Word文檔會被撐得非常大或者顯示面積過寬。需要手動縮放到統(tǒng)一寬度// 鎖定寬高比僅設(shè)置寬度高度自動按比例調(diào)整 inlineShape-setProperty(LockAspectRatio, true); inlineShape-setProperty(Width, 120); // 單位是磅120磅約4.2厘米Width的單位是磅point1磅≈0.035厘米。插圖寬度設(shè)為多少取決于你的文檔頁面大小。A4紙去掉左右邊距的正文寬度大約在432磅左右設(shè)120磅就是約占正文寬度四分之一可作為參考比例。4.3 表格里插圖片和普通Range插圖片還有一個(gè)差別如果想把圖片放進(jìn)某個(gè)表格單元格里你得先把Range設(shè)為那個(gè)單元格再調(diào)AddPicture參數(shù)里的Range換成單元格Range。直接對一個(gè)Cell對象調(diào)用InlineShapes是找不到集合的這個(gè)細(xì)節(jié)我當(dāng)時(shí)調(diào)了半天。5. 文檔保存與關(guān)閉別忘了這一哆嗦5.1 保存格式的選擇與坑操作完文檔到了收尾階段。保存接口有兩種寫法// 方式1直接保存 doc-dynamicCall(Save()); // 方式2另存為 doc-dynamicCall(SaveAs2(const QString, int), QString(D:/output/report.docx), 16);SaveAs2的第二個(gè)參數(shù)是文件格式編號。常用值記幾個(gè)格式值對應(yīng)格式12.docWord 97-2003二進(jìn)制格式16.docxOffice 2007及以上默認(rèn)XML格式17.docm啟用宏的文檔24.dotx模板文件我個(gè)人的教訓(xùn)是新版本Office用SaveAs2老版本用SaveAs。辦公室里裝Office 2007的老機(jī)器識別不了SaveAs2會報(bào)方法不存在。解決方案是在代碼里先探測一下QAxObject* save doc-querySubObject(SaveAs2(const QString, int), path, 16); if (!save) { doc-dynamicCall(SaveAs(const QString, int), path, 16); }不過說實(shí)在的現(xiàn)在部署環(huán)境基本都Office 2016以上了直接用SaveAs2問題也不大。只是桌面端軟件這東西客戶那邊保不齊有什么老古董環(huán)境留個(gè)退路穩(wěn)一點(diǎn)。5.2 關(guān)閉文檔和退出Word保存之后最容易被忽略的是釋放COM資源。如果不主動調(diào)用文檔的Close和Word的Quit每次程序跑完后臺都會留一個(gè)WINWORD.EXE進(jìn)程第二次運(yùn)行再新開一個(gè)越積越多。時(shí)間久了用戶打開任務(wù)管理器發(fā)現(xiàn)十來個(gè)Word進(jìn)程掛著會直接懷疑你這軟件有病。正確的關(guān)閉順序是先關(guān)文檔再退Wordif (doc) { doc-dynamicCall(Close(bool), false); // false不保存更改我們已保存過 delete doc; doc nullptr; } if (word) { word-dynamicCall(Quit()); delete word; word nullptr; }注意這里有個(gè)先后問題必須先關(guān)掉文檔再Q(mào)uit Word。如果你先Quit再Cloce文檔Word會彈一個(gè)是否保存更改的對話框。更危險(xiǎn)的是如果程序里用了doc-dynamicCall(Save())但某個(gè)文檔被只讀打開Save會失敗Quit的時(shí)候Word發(fā)現(xiàn)未保存又會彈模態(tài)對話框這會卡住你的自動化流程程序像死了一樣掛在那里。真機(jī)測試時(shí)這種彈窗很煩所以有能力的話應(yīng)該在打開文檔前先把Word設(shè)置成不彈窗word-setProperty(DisplayAlerts, 0); // wdAlertsNone屏蔽所有提示DisplayAlerts設(shè)為0之后Word遇到保存沖突、格式不兼容這類問題會采取默認(rèn)動作不再彈窗詢問。部署到生產(chǎn)環(huán)境后這行代碼能幫你省掉無數(shù)遠(yuǎn)程排查。6. 性能優(yōu)化與常見問題那些必須繞開的坑6.1 全篇替換為什么那么慢有段時(shí)間我處理一個(gè)80頁的合同模板里面占位符接近一百個(gè)逐個(gè)用查找替換跑耗時(shí)能達(dá)到幾十秒用戶等無可忍。排查下來原因是一個(gè)特別容易犯的錯(cuò)誤每次替換時(shí)都從文檔開頭重新Find導(dǎo)致替換第100個(gè)占位符時(shí)Find還要從頭把前面99個(gè)位置掃一遍累積復(fù)雜度是O(n2)。優(yōu)化手段有兩個(gè)方向第一個(gè)方向是**用ReplaceAll一次替換**上文的3.2節(jié)已經(jīng)講過了不再贅述。第二個(gè)方向是**用FixFind批量替換同名單個(gè)占位符**如果模板里同一個(gè)占位符出現(xiàn)多次比如每頁頁腳都有{{公司名}}用一次ReplaceAll配合Replace2也能一把梭實(shí)測速度比單次替換循環(huán)快十倍以上。第二個(gè)方向是關(guān)掉后臺拼寫檢查。Word在編輯長文檔時(shí)后臺會不斷做拼寫和語法檢查拖慢所有自動化操作。在初始化時(shí)關(guān)掉能明顯提速word-setProperty(Options/CheckSpellingAsYouType, false); word-setProperty(Options/CheckGrammarAsYouType, false);6.2 死鎖和假死自動化操作的定時(shí)炸彈QAxObject調(diào)用本身是同步的但Word處理某些操作時(shí)尤其是涉及大量樣式重排的文檔會臨時(shí)無響應(yīng)。這時(shí)如果你在一個(gè)UI線程里同步等待程序界面會假死用戶點(diǎn)哪兒都沒反應(yīng)體驗(yàn)極差。我的處理方式是把耗時(shí)操作全丟到工作線程里只在開始和結(jié)束時(shí)用信號通知進(jìn)度。但這里必須提醒一個(gè)雷區(qū)QAxObject內(nèi)部直接操作COM它不能在普通的非主線程里隨便創(chuàng)建和使用——COM的初始化規(guī)則是使用COM的線程必須主動調(diào)用CoInitialize。Qt的工作線程默認(rèn)沒有調(diào)用所以要在工作線程的run()開頭手動加一行CoInitializeEx(nullptr, COINIT_MULTITHREADED);線程結(jié)束時(shí)再調(diào)用CoUninitialize()。否則高頻的COM調(diào)用偶爾會崩且偶發(fā)性極強(qiáng)復(fù)現(xiàn)全靠運(yùn)氣非常折磨。為了避免這種玄學(xué)bug我后來干脆把文檔自動化操作**全部放在進(jìn)程啟動時(shí)初始化好的專用工作線程**里這個(gè)線程內(nèi)只跑有關(guān)Word的邏輯絕不挪到別的線程。6.3 Word進(jìn)程殘留的排查手段如果用戶反饋軟件用完后電腦變卡打開任務(wù)管理器發(fā)現(xiàn)多個(gè)WINWORD.EXE多半是異常分支里沒釋放。比如程序中途用戶點(diǎn)了取消或者某個(gè)dynamicCall拋了異常函數(shù)直接return資源沒走到清理代碼。我給你推薦一個(gè)兜底思路在程序退出時(shí)不要依賴doc和word對象一個(gè)個(gè)Close/Quit而是直接用任務(wù)管理命令把殘留的Word結(jié)束掉。當(dāng)然前提是確認(rèn)這些Word進(jìn)程是我們創(chuàng)建的而不是用戶自己開著文檔。做法是啟動Word時(shí)記錄PID退出時(shí)拿著PID去結(jié)束。具體實(shí)現(xiàn)不細(xì)寫了用QAxObject的Application屬性可以拿到PID// 拿到Word的進(jìn)程ID QAxObject* app word-querySubObject(Application); int pid app-property(Hwnd).toInt(); // 實(shí)際上拿不到PIDHwnd是句柄這里其實(shí)有個(gè)問題Word的COM接口暴露的句柄是窗口句柄不是真正意義上的進(jìn)程ID。要拿PID正規(guī)路徑是用GetWindowThreadProcessId(HWND, pid)通過窗口句柄反查進(jìn)程ID。實(shí)際工程里我最后就是這么做的關(guān)閉時(shí)會先正常調(diào)用Quit等1秒后檢查進(jìn)程是否還在還在再用TerminateProcess兜底。這個(gè)方法不優(yōu)雅但對付頑固的WORD進(jìn)程非常有效。6.4 表格交錯(cuò)和樣式失真的排查一旦你往模板中間插入表格插完又往文檔末尾繼續(xù)加段落表格后面必須加一個(gè)空段落否則新內(nèi)容可能會被Word并進(jìn)表格內(nèi)出現(xiàn)你寫在表格后面的標(biāo)題實(shí)際變成了表格的最后一行格式全亂。這個(gè)是Word排版的老規(guī)矩COM自動化也逃不掉。排查思路很簡單插入表格之后馬上在表格下方加一個(gè)空白段落// 獲取表格末尾Range QAxObject* tableRange table-querySubObject(Range); int tableEnd tableRange-property(End).toInt(); QAxObject* afterTableRange doc-querySubObject(Range(int, int), tableEnd, tableEnd); afterTableRange-dynamicCall(InsertParagraphAfter());類似這種和排版習(xí)慣相關(guān)的小問題沒有文檔會替你寫全靠一次一次在真機(jī)里試。7. 一個(gè)可直接套用的文檔生成Demo最后給一個(gè)從初始化到保存退出的完整流程示例也就是我上面的內(nèi)容濃縮成的一個(gè)能跑的最小骨架。全部代碼基于實(shí)際工程簡化而來去掉業(yè)務(wù)邏輯只保留Word操作主干。假設(shè)場景是接到一個(gè)需求程序讀取數(shù)據(jù)庫里的某條記錄生成一份包含標(biāo)題、正文、數(shù)據(jù)表格和一張圖片的Word報(bào)告另存到指定路徑。#include QAxObject #include QApplication #include QDebug bool createWordReport(const QString outputPath) { QAxObject* word new QAxObject(); if (!word-setControl(Word.Application)) { delete word; qWarning() Word.Application 啟動失敗; return false; } // 屏蔽彈窗 word-setProperty(DisplayAlerts, 0); // 關(guān)閉拼寫檢查提速 word-setProperty(Options/CheckSpellingAsYouType, false); word-setProperty(Options/CheckGrammarAsYouType, false); QAxObject* docs word-querySubObject(Documents); QAxObject* doc docs-querySubObject(Add()); // 1. 寫入標(biāo)題 QAxObject* content doc-querySubObject(Content); content-dynamicCall(InsertAfter(const QString), QString(2025年度項(xiàng)目總結(jié)報(bào)告)); int titleEnd content-property(End).toInt(); QAxObject* titleRange doc-querySubObject(Range(int, int), titleEnd - 1, titleEnd); if (titleRange) { QAxObject* fmt titleRange-querySubObject(ParagraphFormat); fmt-setProperty(Alignment, 1); // 居中 QAxObject* font titleRange-querySubObject(Font); font-setProperty(Bold, true); font-setProperty(Size, 18); } // 2. 寫一段正文 content-dynamicCall(InsertAfter(const QString), QString(\n本項(xiàng)目圍繞辦公自動化展開核心目標(biāo)是把重復(fù)性的文檔生成工作交給程序完成。)); content-dynamicCall(InsertAfter(const QString), QString(\n\n關(guān)鍵指標(biāo)如下表所示)); // 3. 插入表格 int pos content-property(End).toInt(); QAxObject* tableRange doc-querySubObject(Range(int, int), pos, pos); QAxObject* tables doc-querySubObject(Tables); QAxObject* table tables-querySubObject( Add(QAxObject*, int, int), QVariantList{ tableRange-asVariant(), 3, 4 }); // 表格填數(shù) QStringList rowData; rowData 指標(biāo) 數(shù)值 同期 結(jié)論; for (int i 1; i 3; i) { for (int j 1; j 4; j) { QAxObject* cell table-querySubObject(Cell(int, int), i, j); QAxObject* r cell-querySubObject(Range); QString val (i 1) ? rowData[j-1] : QString(內(nèi)容%1%2).arg(i).arg(j); r-dynamicCall(set_Text, val); } } // 表格后加空段落 int tableEnd table-querySubObject(Range)-property(End).toInt(); QAxObject* afterRange doc-querySubObject(Range(int, int), tableEnd, tableEnd); afterRange-dynamicCall(InsertParagraphAfter()); // 4. 插入圖片 QAxObject* inlineShapes doc-querySubObject(InlineShapes); int picPos content-property(End).toInt(); QAxObject* picRange doc-querySubObject(Range(int, int), picPos, picPos); QAxObject* shape inlineShapes-querySubObject( AddPicture(const QString, bool, bool, QAxObject*), QVariantList{ QString(D:/images/chart.png), false, true, picRange-asVariant() }); if (shape) { shape-setProperty(LockAspectRatio, true); shape-setProperty(Width, 300); } // 5. 保存并退出 doc-dynamicCall(SaveAs2(const QString, int), outputPath, 16); doc-dynamicCall(Close(bool), false); delete doc; delete docs; // docs 由 querySubObject 返回也需要釋放 word-dynamicCall(Quit()); delete word; return true; }這個(gè)Demo里需要說清楚的是querySubObject的釋放規(guī)則每次調(diào)用querySubObject返回的對象是你new出來的對象的子對象。父對象銷毀時(shí)子指針是否自動釋放取決于QObject父子關(guān)系有沒有建立。QAxContainer的機(jī)制下我實(shí)測是不一定要顯式delete但為了不碰運(yùn)氣凡是querySubObject出來的我都在用完、確認(rèn)不再需要后手動delete寧可多刪不能漏刪避免COM資源懸掛。如果把整段代碼按上面的思路跑一遍你在目標(biāo)路徑下會得到一個(gè)包含標(biāo)題、正文、表格和圖片的報(bào)告打開就是規(guī)整排版的Word頁面。這個(gè)骨架可以應(yīng)對大部分生成報(bào)告/導(dǎo)出文檔的場景剩下的業(yè)務(wù)改動基本都是往里面填數(shù)據(jù)、改樣式參數(shù)。最后再分享一個(gè)實(shí)際工作里的心得凡是涉及QAxObject調(diào)用的地方不管是dynamicCall還是querySubObject返回前都先判空。我在大規(guī)模重構(gòu)這個(gè)模塊時(shí)加了一堆判空邏輯把以前偶發(fā)的崩潰問題基本都擋在了外面——COM這玩意就算接口文檔寫得再清楚Word版本差異仍會帶來各種這里少了個(gè)對象的奇葩反饋防御性編程在這套方案里不是潔癖是剛需。