試指南)
簡(jiǎn)介DevExpress VCL Controls v25.2.3 for Delphi 10-13.1 完整源碼包面向需要為最新版 Delphi 構(gòu)建現(xiàn)代化 Windows 桌面應(yīng)用的開(kāi)發(fā)者提供數(shù)據(jù)網(wǎng)格、報(bào)表、圖表、導(dǎo)航與皮膚定制等高級(jí) VCL 組件彌補(bǔ)標(biāo)準(zhǔn)組件庫(kù)在復(fù)雜交互界面上的不足覆蓋從快速原型到發(fā)布級(jí)產(chǎn)品的一體化界面需求。壓縮包約 540MB含 2000 個(gè)文件其中 cpp 與 h 源碼文件占主導(dǎo)配合 png 圖標(biāo)、txt 說(shuō)明、xml 配置、pas 單元以及 pdf/chm 文檔覆蓋示例工程、設(shè)計(jì)期源碼和幫助手冊(cè)目錄結(jié)構(gòu)清晰便于分類(lèi)查閱。目前已有 35 人瀏覽學(xué)習(xí)。整套源碼附帶官方 Demo 與文檔可直接編譯集成也可深入研讀控件實(shí)現(xiàn)細(xì)節(jié)并按需定制預(yù)覽中可見(jiàn) Ribbon 記事本、Office12 視圖、自定義繪制表格、分組控件等典型場(chǎng)景適合希望提升開(kāi)發(fā)效率、實(shí)現(xiàn)高質(zhì)感界面的中高級(jí) Delphi 程序員和需要深度定制控件的團(tuán)隊(duì)。1. 一套能省三個(gè)月開(kāi)發(fā)量的控件包先搞清它到底給了我什么DevExpress VCL Controls v25.2.3 for Delphi 10-13 Florence Full Source.7z 這個(gè)名字拆開(kāi)讀才不嚇人DevExpress VCL Controls 是 Delphi 桌面應(yīng)用里被用得最多的商業(yè)控件集之一v25.2.3 是版本號(hào)for Delphi 10-13 表示它覆蓋了 Delphi 10 到 13 的各大版本Florence 是包內(nèi)對(duì) Delphi 13.x 分支的代號(hào)Full Source 則是說(shuō)壓縮包里不只給了編譯好的 .dcu/.bpl連控件源碼 .pas 一起給了。這套東西解決的是老生常談的問(wèn)題原生 VCL 控件做復(fù)雜表格、現(xiàn)代界面、Excel 交互、PDF 導(dǎo)出工作量極大而用這套控件半個(gè)月能省出兩個(gè)月的開(kāi)發(fā)量。適合做 ERP、MIS、醫(yī)療、工業(yè)上位機(jī)的 Delphi 工程師。反直覺(jué)的結(jié)論是安裝這套控件最大的障礙不是壓縮包本身而是 IDE 版本、包分支和 Library 路徑三者必須完全對(duì)齊錯(cuò)一個(gè)就白折騰一整天。2. 裝對(duì)版本比裝對(duì)控件更重要Delphi 10-13 全系安裝步驟先把結(jié)論放前面解壓、編譯、注冊(cè)組件、配路徑四步做完才能讓控件出現(xiàn)在組件面板上而這四步里路徑配置和版本對(duì)應(yīng)占掉九成報(bào)錯(cuò)原因。別急著雙擊任何 .dpk先把包的結(jié)構(gòu)看清楚。2.1 解壓前先看目錄結(jié)構(gòu)為什么包里會(huì)有 Delphi10 到 Delphi13 好幾份同名庫(kù)用 7-Zip 打開(kāi)壓縮包先看根目錄。這個(gè)包常見(jiàn)的布局是這樣的DevExpressVCL/ ├── Library/ │ ├── Delphi10/ # 對(duì)應(yīng) Delphi 10.x 全系 │ ├── Delphi11/ # 對(duì)應(yīng) Delphi 11.x │ ├── Delphi12/ # 對(duì)應(yīng) Delphi 12.x │ └── Delphi13/ # 包內(nèi)對(duì) Florence 分支的命名 ├── Source/ # 完整 .pas 源碼 ├── Resources/ # 皮膚、圖標(biāo)、字體等資源 ├── Demos/ # 官方示例 └── Readme*.txt # 版本與構(gòu)建說(shuō)明看到這份結(jié)構(gòu)先別急著選目錄。Library 下的每個(gè)分支里放著對(duì)應(yīng) IDE 版本要用到的 .dpk/.dproj 工程、預(yù)編譯的 .dcu 和 .bpl。為什么要按版本拆好幾份因?yàn)?Delphi 不同大版本生成的 .dcu 文件格式不通用10.4 編出來(lái)的 .dcu 塞進(jìn) Delphi 12 里直接報(bào)“不兼容的版本”。這個(gè)包用 Florence 這個(gè)代號(hào)指代 Delphi 13.x 分支說(shuō)明它是按“支持到 13”的口徑整理的你只需要關(guān)心自己 IDE 屬于哪一段。實(shí)際踩過(guò)的坑有人機(jī)器上裝的是 Delphi 11圖省事直接用 Delphi12 分支的庫(kù)文件編譯時(shí)報(bào)錯(cuò)后以為控件壞了其實(shí)只改 Library 路徑就能恢復(fù)正常。所以第一步在你的 IDE 里按 Help About 看準(zhǔn)大版本號(hào)再去 Library 下找對(duì)應(yīng)分支。2.2 設(shè)計(jì)期包與運(yùn)行期包先編譯 dcl 包再 InstallDelphi 組件的安裝分兩類(lèi)設(shè)計(jì)期包dcl 開(kāi)頭和運(yùn)行期包不帶 dcl。運(yùn)行期包提供功能代碼設(shè)計(jì)期包負(fù)責(zé)在 IDE 的組件面板上注冊(cè)控件。要讓控件出現(xiàn)在面板上必須打開(kāi)設(shè)計(jì)期包先 Compile 生成 .bpl再點(diǎn) Install 注冊(cè)。常見(jiàn)做法是這樣假設(shè)你要用網(wǎng)格控件打開(kāi) Library\Delphi12\dclDxGrid.dpk包名以實(shí)際文件為準(zhǔn)前綴 dcl 的就是設(shè)計(jì)期包。在 Package 編輯器里先 Compile看到“Success”后點(diǎn) Install彈窗提示組件已注冊(cè)到面板。注意一個(gè)動(dòng)作差異Compile 只是把包編出來(lái)Install 才會(huì)寫(xiě)進(jìn) IDE 的已安裝包列表很多人用 Build 替代 Compile 后以為裝好了重啟 IDE 發(fā)現(xiàn)面板還是空的。如果嫌 IDE 點(diǎn)擊太慢也可以用命令行走 msbuild 編譯 dcl 包前提是 rsvars.bat 已初始化環(huán)境call C:\Program Files\Embarcadero\Studio\23.0\bin\rsvars.bat msbuild dclDxGrid.dproj /p:ConfigRelease /p:PlatformWin32 /t:Build參數(shù)說(shuō)明Config 用 Release 而不是 Debug設(shè)計(jì)期包平時(shí)不建議加載 Debug 版本避免 IDE 里斷點(diǎn)行為異常Platform 先只編 Win32等你確認(rèn) 32 位可用后再補(bǔ) Win64最后的 /t:Build 會(huì)把編譯和鏈接一起做掉比 IDE 里的 Compile 多一步鏈接。注意 Studio 路徑里的 23.0 是安裝目錄版本號(hào)不同 IDE 可能不同以你的實(shí)際目錄為準(zhǔn)。2.3 Library 路徑與資源目錄不配齊就等著控件畫(huà)不出來(lái)包編譯安裝完下一步是把源碼和資源目錄告訴 IDE。打開(kāi) Tools Options Environment Delphi Options Library在 Library Path 里把下面兩行加進(jìn)去路徑以你的實(shí)際解壓位置為準(zhǔn)D:\DevExVCL\Library\Delphi12 D:\DevExVCL\Source D:\DevExVCL\Resources這里有個(gè)經(jīng)常被忽略的點(diǎn)Library Path 是給編譯器找 .dcu/.pas 用的Resources 為什么也要加因?yàn)?DevExpress 的皮膚和圖標(biāo)資源在運(yùn)行期通過(guò)資源路徑尋找不加的話程序能編譯但運(yùn)行起來(lái)界面可能一片灰、圖標(biāo)缺失。加完路徑后最好用 PowerShell 快速檢查路徑是否真的存在別等 IDE 報(bào)錯(cuò)才發(fā)現(xiàn)路徑寫(xiě)錯(cuò)$paths (D:\DevExVCL\Library\Delphi12, D:\DevExVCL\Source, D:\DevExVCL\Resources) $paths | ForEach-Object { if (Test-Path $_) { OK $_ } else { MISS $_ } }這段腳本把三個(gè)路徑逐個(gè)測(cè)一遍輸出 OK 或 MISS。建議把它存成一個(gè) check.ps1每臺(tái)新機(jī)器配完環(huán)境就跑一次能省下不少排查時(shí)間。2.4 多版本 IDE 共存的注意點(diǎn)bpl 不通用不少工程師一臺(tái)機(jī)器上同時(shí)裝 Delphi 10.4、11、12 甚至 13 預(yù)覽版用于對(duì)比項(xiàng)目。這時(shí)最容易翻車(chē)的是在 Delphi 12 里編譯好的 .bpl拿到 Delphi 11 里 InstallIDE 直接報(bào)錯(cuò)誤。原因還是版本編譯產(chǎn)物不通用。常見(jiàn)做法是每個(gè) IDE 版本各自打開(kāi)對(duì)應(yīng)分支的 dcl 包重新編譯注冊(cè)互不借用。Debug 與 Release 也按相同邏輯處理不要把 64 位的運(yùn)行期包混進(jìn) 32 位工程里Delphi 的 IDE 本身是 32 位但設(shè)計(jì)期包要跟隨 IDE 位數(shù)來(lái)編運(yùn)行期包才按目標(biāo)平臺(tái)分 Win32/Win64。這一節(jié)最后給一個(gè)總順序解壓到純英文短路徑不要中文、不要空格→ 確認(rèn) IDE 大版本 → 打開(kāi)對(duì)應(yīng) Library 分支 → 逐個(gè)編譯 dcl 包并 Install → 配置 Library Path → 重啟 IDE → 新建項(xiàng)目驗(yàn)證面板。按這個(gè)順序走九成安裝問(wèn)題都能繞開(kāi)。3. Full Source 不是擺件把源碼編譯、斷點(diǎn)調(diào)試和定制串起來(lái)標(biāo)題里 Full Source 四個(gè)字很多人當(dāng)成“完整版”的象征裝完就忘了。這個(gè)包真正的價(jià)值是給了 .pas 源碼可以把斷點(diǎn)打進(jìn)控件內(nèi)部、改默認(rèn)行為、裁剪不需要的包。這一章講怎么把這層價(jià)值用起來(lái)。3.1 從 .dcu 換成 .pas讓斷點(diǎn)能進(jìn) DevExpress 內(nèi)部平時(shí)用控件斷點(diǎn)只能進(jìn)你自己寫(xiě)的代碼按 F7 進(jìn)到控件方法里時(shí)看到的是一片灰色或者直接跳過(guò)。原因編譯器加載的是 .dcu沒(méi)有對(duì)應(yīng) .pas 的源碼路徑。Full Source 包存在后只要把 Source 目錄放到 Library Path 的最前面編譯器會(huì)優(yōu)先找到源代碼并按需重新編譯斷點(diǎn)就能停進(jìn)控件實(shí)現(xiàn)里。做法打開(kāi) Tools Options Library把 D:\DevExVCL\Source 這一行移動(dòng)到最頂部點(diǎn)擊 Add 后保持原路徑不變。然后關(guān)閉當(dāng)前工程重新編譯一次讓所有引用控件的單元按新路徑刷新。接著在調(diào)用網(wǎng)格方法的那一行設(shè)斷點(diǎn)按 F7 跟進(jìn)去如果 IDE 彈出“Source not found”手動(dòng)選一次 dx 源碼里的對(duì)應(yīng) .pas 文件之后它就會(huì)記住映射。// 在調(diào)用方設(shè)置斷點(diǎn)按 F7 進(jìn)入 DevExpress 內(nèi)部實(shí)現(xiàn) procedure TForm1.btnRefreshClick(Sender: TObject); begin cxGrid1DBTableView1.DataController.Refresh; // 斷點(diǎn)先停在這里 cxGrid1DBTableView1.DataController.FocusedRecordIndex : 0; end;這里的邏輯說(shuō)明DataController.Refresh 會(huì)觸發(fā) DevExpress 內(nèi)部一批方法是觀察源碼執(zhí)行順序最好的入口。參數(shù)說(shuō)明FocusedRecordIndex 賦值 -1 表示取消焦點(diǎn)0 表示回到第一行調(diào)試時(shí)用這兩個(gè)值配合斷點(diǎn)能看到焦點(diǎn)維護(hù)的內(nèi)部狀態(tài)。新手在這一步可能會(huì)發(fā)現(xiàn) IDE 突然變慢因?yàn)閯?dòng)態(tài)編譯源碼并加載調(diào)試符號(hào)后內(nèi)存占用變高屬正?，F(xiàn)象。3.2 改一個(gè)控件的默認(rèn)行為從改源碼到重新編譯源碼在手最常見(jiàn)的訴求是改默認(rèn)值。比如 cxGrid 默認(rèn)行高偏小、默認(rèn)邊框顏色難看、某些彈窗默認(rèn)不居中。找源碼里對(duì)應(yīng)屬性全局搜索默認(rèn)值賦值處修改。以行高為例打開(kāi) Source 里的 cxGrid.pas搜索 DefaultRowHeight找到默認(rèn)值賦值處改成你期望的像素值。保存源碼后如果你的工程是靜態(tài)鏈接運(yùn)行包不勾選 Runtime Packages直接重新編譯工程即可如果勾了 Runtime Packages需要重新編譯對(duì)應(yīng)運(yùn)行期 bpl并把新 bpl 覆蓋到 IDE 的搜索路徑里。// 源碼默認(rèn)值調(diào)整示例示意具體文件按版本結(jié)構(gòu)打開(kāi) // cxGrid.pas 中搜索 DefaultRowHeight property DefaultRowHeight: Integer read FDefaultRowHeight write SetDefaultRowHeight default 24; // 原默認(rèn)值 24改成 28注意一個(gè)細(xì)節(jié)改完源碼后IDE 里舊的設(shè)計(jì)期包可能還緩存著老 dcu。建議對(duì)運(yùn)行期包做一次 Rebuild再重啟 IDE。血淚經(jīng)驗(yàn)只 Compile 不 Rebuild 時(shí)緩存 dcu 沒(méi)刷新改了半天運(yùn)行沒(méi)變化誤以為改錯(cuò)文件。3.3 用 overlay 目錄管理自己的改動(dòng)別把官方源碼改花有人拿到源碼后直接在 Source 目錄里到處改改完很爽等到官方升級(jí)新版本時(shí)崩潰源碼被覆蓋之前的定制全沒(méi)了。常見(jiàn)做法是把所有改動(dòng)文件復(fù)制到一個(gè)獨(dú)立的 overlay 目錄構(gòu)建腳本先把 overlay 覆蓋到 Source再統(tǒng)一編譯# 將團(tuán)隊(duì)維護(hù)的改動(dòng)文件先同步到源碼目錄再執(zhí)行編譯 cp -r overlay/Source/* DevExVCL/Source/ cd DevExVCL # 此處按團(tuán)隊(duì)腳本執(zhí)行對(duì)應(yīng)版本的完整構(gòu)建邏輯說(shuō)明overlay 目錄只放改動(dòng)過(guò)的文件保持和官方 Source 相同的相對(duì)路徑覆蓋時(shí)不會(huì)誤傷未改動(dòng)的文件。升級(jí)新版本時(shí)先對(duì)比 overlay 與官方新源碼的差異把改動(dòng)逐個(gè)遷移。這個(gè)習(xí)慣救過(guò)我一次有一次亂改源碼后沒(méi)記錄升級(jí)版本時(shí)直接把幾個(gè)月的人性化改動(dòng)弄丟了從頭排查浪費(fèi)兩天。4. 安裝與使用避坑五個(gè)高頻翻車(chē)現(xiàn)場(chǎng)與排查路徑這一章寫(xiě)實(shí)際操作中踩過(guò)的五個(gè)典型問(wèn)題按“現(xiàn)象 → 原因 → 解決”的順序來(lái)遇到問(wèn)題可以直接對(duì)號(hào)入座。4.1 現(xiàn)象組件面板是空的Install Packages 列表里也沒(méi)有新項(xiàng)裝完包重啟 IDE按 F2 調(diào)出組件面板翻遍找不到 DevExpress 頁(yè)面。原因基本是安裝時(shí)只打開(kāi)了運(yùn)行期包或者沒(méi)有點(diǎn) Install。解決重新打開(kāi) dcl 前綴的包在 Package 編輯器里先 Compile 成功再點(diǎn) Install看到“Package installed”字樣才算注冊(cè)完成。如果文件列表里找不到 dcl 包去 Library 對(duì)應(yīng)分支目錄下按文件名篩選 dcl*.dpk許多安裝包把它放在單獨(dú)子目錄里不要只看根目錄。4.2 現(xiàn)象把控件拖到窗體IDE 報(bào) DCU 版本不符或 BPI 找不到常見(jiàn)場(chǎng)景項(xiàng)目里同時(shí)配置了 Delphi10 和 Delphi12 兩個(gè) Library 分支編譯器按路徑順序找到舊版 dcu。原因Library Path 加了多個(gè)版本的目錄且順序不對(duì)。解決在 Library Path 里只保留當(dāng)前 IDE 對(duì)應(yīng)分支并把 Source 與 Resources 固定到同一版本刪除項(xiàng)目 Options 里緩存的搜索路徑重新編譯。這里有個(gè)判斷技巧報(bào)錯(cuò)文件名帶 dcu 后綴是路徑?jīng)_突帶 bpl 后綴是運(yùn)行期包沒(méi)裝上。處理前先把當(dāng)前 IDE 右下角的版本信息截圖再對(duì)照包內(nèi) Readme 文件確認(rèn)支持范圍。4.3 現(xiàn)象程序跑起來(lái)界面是灰的皮膚完全沒(méi)生效DevExpress VCL 的皮膚功能需要主動(dòng)初始化。常見(jiàn)做法是在工程主模塊里調(diào)用皮膚單元或者在主窗體 OnCreate 里加載外部皮膚文件。原因只拖了控件沒(méi)調(diào)初始化函數(shù)或者 Resources 路徑?jīng)]配上導(dǎo)致皮膚資源加載失敗。解決在主窗體創(chuàng)建時(shí)加一段初始化代碼uses dxSkins, dxSkinsDefaultPainters, dxSkinsUserSkin; procedure TMainForm.FormCreate(Sender: TObject); begin // 加載內(nèi)置默認(rèn)皮膚 dxSkinsDefaultPainters.UseDefaultSkins : True; // 或加載外部皮膚文件路徑先寫(xiě)絕對(duì)路徑便于排查 dxSkinsUserSkinLoadFromFile(C:\App\skin.dxskin); end;參數(shù)說(shuō)明UseDefaultSkins 為 True 時(shí)使用內(nèi)置皮膚集合dxSkinsUserSkinLoadFromFile 則加載外部風(fēng)格文件適合皮膚交給美術(shù)團(tuán)隊(duì)維護(hù)的場(chǎng)景。注意 dxSkins 系列單元必須在 uses 里顯式列出少列一個(gè)編譯能過(guò)但運(yùn)行期功能缺失。4.4 現(xiàn)象切到 Win64 平臺(tái)后報(bào) Unit not found32 位卻好好的原因很簡(jiǎn)單只編譯了 Win32 的 dcu/bpl。DevExpress VCL 的源碼包是按平臺(tái)分別產(chǎn)出物的Win64 需要走一次獨(dú)立的編譯。解決在項(xiàng)目管理器里把目標(biāo)平臺(tái)列表勾上 Win64對(duì)運(yùn)行期包和設(shè)計(jì)期包分別 Build如果項(xiàng)目勾選了 Runtime Packages還要確保運(yùn)行期 bpl 的 Win64 版本存在并位于搜索路徑中。常見(jiàn)誤區(qū)是以為 64 位能自動(dòng)兼容 32 位 dcu實(shí)際 Delphi 編譯器不會(huì)跨平臺(tái)復(fù)用任何二進(jìn)制產(chǎn)物兩個(gè)平臺(tái)必須分別編譯。4.5 現(xiàn)象裝完包 IDE 啟動(dòng)極慢甚至卡死在啟動(dòng)畫(huà)面原因重復(fù)安裝了多個(gè)版本的 dcl 包或同一個(gè)包被注冊(cè)進(jìn)多個(gè) IDE 版本導(dǎo)致 IDE 啟動(dòng)時(shí)反復(fù)加載沖突單元。解決在 Install Packages 列表里逐一排查刪除非當(dāng)前 IDE 對(duì)應(yīng)的項(xiàng)如果 IDE 已經(jīng)打不開(kāi)備份注冊(cè)表后清理對(duì)應(yīng) BDS 緩存鍵再重新啟動(dòng)。備份優(yōu)先動(dòng)手前先導(dǎo)出注冊(cè)表不要憑感覺(jué)刪鍵。問(wèn)題通常不是包本身有 bug而是環(huán)境里塞了太多版本殘留。5. 高頻場(chǎng)景落地Excel 操作、PDF 導(dǎo)出和 PPT 查看不再求人安裝和調(diào)試折騰完這章說(shuō)正事。下面幾個(gè)場(chǎng)景是 Delphi 開(kāi)發(fā)者搜索最多的訴求剛好都能用這套控件收掉。5.1 用 dxSpreadSheet 讀寫(xiě) xlsx不裝 Office 也能操作 Excel以前 Excel 操作多半靠 OLE 調(diào) Excel.Application客戶機(jī)器沒(méi)裝 Office 就整個(gè)廢掉。用 dxSpreadSheet 可以不依賴本機(jī) Office 直接讀寫(xiě) xlsx/xls/csv。常見(jiàn)做法在窗體上放一個(gè) TdxSpreadSheet或者用代碼動(dòng)態(tài)創(chuàng)建uses dxSpreadSheet, dxSpreadSheetCore; procedure ExportXlsx; var ASheet: TdxSpreadSheet; begin ASheet : TdxSpreadSheet.Create(nil); try // 加載已有文件參數(shù)為文件路徑支持 xlsx,xls,csv ASheet.LoadFromFile(D:\data\input.xlsx); // 行列都從 1 開(kāi)始Cells[1,1] 是 Excel 的 A1 ASheet.Cells[1, 1].AsString : Delphi Excel 操作示例; ASheet.Cells[2, 1].AsFloat : 100; // 保存時(shí)按擴(kuò)展名自動(dòng)推斷格式 ASheet.SaveToFile(D:\data\output.xlsx); finally ASheet.Free; end; end;邏輯說(shuō)明LoadFromFile 負(fù)責(zé)解析文件解析結(jié)果在內(nèi)存中不啟動(dòng)任何外部進(jìn)程Cells 下標(biāo)從 1 開(kāi)始對(duì)應(yīng) Excel 的 A1 格式初學(xué)者容易按 Delphi 慣例從 0 開(kāi)始導(dǎo)致第一行留白。參數(shù)說(shuō)明AsString 和 AsFloat 是單元格值的兩個(gè)典型入口日期建議用 AsDateTime 并配套顯示格式。大數(shù)據(jù)量導(dǎo)出時(shí)注意關(guān)閉界面刷新否則十萬(wàn)行寫(xiě)完后界面卡頓明顯。5.2 導(dǎo)出 PDF別再糾結(jié) iText for Delphi 下載哪一家很多人在網(wǎng)上找 iText for Delphi下載回來(lái)發(fā)現(xiàn)依賴一堆 jar/dll異常處理還麻煩。用 dxSpreadSheet 的導(dǎo)出能力可以繞開(kāi)這些直接把表格或網(wǎng)格內(nèi)容輸出成 PDF 文件// 導(dǎo)出當(dāng)前工作簿為 PDF第二個(gè)參數(shù)是導(dǎo)出格式枚舉 ASheet.ExportToFile(D:\report\summary.pdf, dxSpreadSheetExportPDF);參數(shù)說(shuō)明第一個(gè)參數(shù)給輸出路徑第二個(gè)參數(shù)是導(dǎo)出格式枚舉dxSpreadSheetExportPDF 表示 PDF有的版本枚舉名略有出入以當(dāng)前 IDE 自動(dòng)補(bǔ)全列表為準(zhǔn)。中文亂碼時(shí)檢查字體嵌入設(shè)置PDF 導(dǎo)出默認(rèn)使用系統(tǒng)字體客戶機(jī)器缺對(duì)應(yīng)字體時(shí)會(huì)出現(xiàn)方塊。這一招做完RBuilder 導(dǎo)出還要配打印機(jī)驅(qū)動(dòng)的方案基本可以閑置了。5.3 cxGrid 扛十萬(wàn)行大數(shù)據(jù)量不要用全量加載cxGrid 本身很快但快的前提是不做無(wú)謂的全量刷新。常見(jiàn)錯(cuò)誤是把十萬(wàn)行數(shù)據(jù)一次性塞進(jìn)內(nèi)存再賦給網(wǎng)格界面滾動(dòng)卡到心態(tài)崩。常見(jiàn)做法是啟用 ServerMode 或按頁(yè)加載讓網(wǎng)格只持有當(dāng)前可視范圍的數(shù)據(jù)// 開(kāi)啟 ServerMode 后數(shù)據(jù)控制器只處理當(dāng)前頁(yè) cxGrid1DBTableView1.DataController.Options : cxGrid1DBTableView1.DataController.Options [dcoServerMode];邏輯說(shuō)明dcoServerMode 讓 DataController 切換成分頁(yè)讀取模式配合數(shù)據(jù)庫(kù)層的分頁(yè)查詢網(wǎng)格滾動(dòng)時(shí)按需拉數(shù)據(jù)。參數(shù)說(shuō)明如果當(dāng)前版本沒(méi)有 dcoServerMode 枚舉說(shuō)明它走的是獨(dú)立 ServerMode 數(shù)據(jù)源去 DataSource 屬性處掛對(duì)應(yīng)的服務(wù)端數(shù)據(jù)源即可原理一樣。開(kāi)啟后不再用循環(huán)逐行刷新整表那會(huì)把分頁(yè)優(yōu)勢(shì)全抵消。5.4 客戶要在線看 PPT別用 TWebBrowser 去嵌 OfficeTWebBrowser 播放 PPT 的老方案依賴本機(jī) Office 和 IE 內(nèi)核Office 升級(jí)就彈窗瀏覽器版本一變就白屏。常見(jiàn)做法是把 PPT 轉(zhuǎn)成 PDF 后交給 dxPdfViewer 顯示轉(zhuǎn)換可以預(yù)先離線完成運(yùn)行時(shí)完全不依賴 Office// 顯示 PDF 文件替代 WebBrowser 嵌 PPT 的舊方案 dxPdfViewer1.LoadFromFile(D:\slides\deck.pdf);參數(shù)說(shuō)明LoadFromFile 加載 PDF 后內(nèi)部做頁(yè)面渲染翻頁(yè)和縮放都走控件自身邏輯不調(diào)系統(tǒng)瀏覽器。注意這個(gè)方案適合展示型場(chǎng)景如果客戶還需要編輯 PPT 內(nèi)容保留原文件的編輯鏈路不要硬塞給 PDF 查看器。6. 把源碼包變成團(tuán)隊(duì)資產(chǎn)按需裁剪與版本固化最后說(shuō)點(diǎn)只有把源碼版用久了才會(huì)明白的事。Full Source 帶來(lái)的不只是調(diào)試能力還有一個(gè)容易被忽略的好處團(tuán)隊(duì)可以按需裁剪。把用不到的包從 dcl 注冊(cè)列表里去掉IDE 啟動(dòng)快不少編譯工程時(shí)也不用反復(fù)加載無(wú)關(guān)單元。判斷依據(jù)是項(xiàng)目實(shí)際上用了哪些控件常見(jiàn)做法是建一個(gè)“必裝清單”新同事入職照著清單勾選而不是整套全裝。驗(yàn)證源碼是否真的生效有個(gè)土辦法但很有效在某個(gè)源碼文件里把一個(gè)默認(rèn)值改成一個(gè)肉眼能識(shí)別的怪值重新編譯運(yùn)行如果界面上出現(xiàn)了怪值說(shuō)明代碼路徑走對(duì)了如果沒(méi)變化多半是緩存 dcu 沒(méi)清干凈。這套驗(yàn)證法比單純看版本號(hào)可靠版本號(hào)只證明你裝了某個(gè)包不證明你改的源碼參與了運(yùn)行。版本固化方面我的習(xí)慣是把整個(gè) DevExVCL 目錄納入 Git但官方源碼目錄保持只讀所有改動(dòng)放進(jìn)一個(gè) overlay 目錄構(gòu)建前用腳本覆蓋過(guò)去。這樣官方包升級(jí)時(shí)只要對(duì)比 overlay 目錄就能知道改過(guò)哪些文件不至于升級(jí)完發(fā)現(xiàn)幾個(gè)月的定制全部白填。每臺(tái)新機(jī)器裝完我都會(huì)把 Library 分支、編譯順序和必裝包清單寫(xiě)進(jìn)團(tuán)隊(duì) Wiki這樣十分鐘能恢復(fù)一套可用環(huán)境不用靠記憶從報(bào)錯(cuò)里重新摸一遍。希望幫到你。下次拿到類(lèi)似“Delphi 13.1 控件之 DevExpress VCL Controls v25.2.3 for Delphi 10-13 Florence Full Source.7z”這種長(zhǎng)名字包先拆名字再對(duì)版本最后動(dòng)編譯順序?qū)α司晚樍恕１疚倪€有配套的精品資源點(diǎn)擊獲取 DevExpress VCL Controls v25.2.3 全系安裝與源碼調(diào)試指南
簡(jiǎn)介DevExpress VCL Controls v25.2.3 for Delphi 10-13.1 完整源碼包面向需要為最新版 Delphi 構(gòu)建現(xiàn)代化 Windows 桌面應(yīng)用的開(kāi)發(fā)者提供數(shù)據(jù)網(wǎng)格、報(bào)表、圖表、導(dǎo)航與皮膚定制等高級(jí) VCL 組件彌補(bǔ)標(biāo)準(zhǔn)組件庫(kù)在復(fù)雜交互界面上的不足覆蓋從快速原型到發(fā)布級(jí)產(chǎn)品的一體化界面需求。壓縮包約 540MB含 2000 個(gè)文件其中 cpp 與 h 源碼文件占主導(dǎo)配合 png 圖標(biāo)、txt 說(shuō)明、xml 配置、pas 單元以及 pdf/chm 文檔覆蓋示例工程、設(shè)計(jì)期源碼和幫助手冊(cè)目錄結(jié)構(gòu)清晰便于分類(lèi)查閱。目前已有 35 人瀏覽學(xué)習(xí)。整套源碼附帶官方 Demo 與文檔可直接編譯集成也可深入研讀控件實(shí)現(xiàn)細(xì)節(jié)并按需定制預(yù)覽中可見(jiàn) Ribbon 記事本、Office12 視圖、自定義繪制表格、分組控件等典型場(chǎng)景適合希望提升開(kāi)發(fā)效率、實(shí)現(xiàn)高質(zhì)感界面的中高級(jí) Delphi 程序員和需要深度定制控件的團(tuán)隊(duì)。1. 一套能省三個(gè)月開(kāi)發(fā)量的控件包先搞清它到底給了我什么DevExpress VCL Controls v25.2.3 for Delphi 10-13 Florence Full Source.7z 這個(gè)名字拆開(kāi)讀才不嚇人DevExpress VCL Controls 是 Delphi 桌面應(yīng)用里被用得最多的商業(yè)控件集之一v25.2.3 是版本號(hào)for Delphi 10-13 表示它覆蓋了 Delphi 10 到 13 的各大版本Florence 是包內(nèi)對(duì) Delphi 13.x 分支的代號(hào)Full Source 則是說(shuō)壓縮包里不只給了編譯好的 .dcu/.bpl連控件源碼 .pas 一起給了。這套東西解決的是老生常談的問(wèn)題原生 VCL 控件做復(fù)雜表格、現(xiàn)代界面、Excel 交互、PDF 導(dǎo)出工作量極大而用這套控件半個(gè)月能省出兩個(gè)月的開(kāi)發(fā)量。適合做 ERP、MIS、醫(yī)療、工業(yè)上位機(jī)的 Delphi 工程師。反直覺(jué)的結(jié)論是安裝這套控件最大的障礙不是壓縮包本身而是 IDE 版本、包分支和 Library 路徑三者必須完全對(duì)齊錯(cuò)一個(gè)就白折騰一整天。2. 裝對(duì)版本比裝對(duì)控件更重要Delphi 10-13 全系安裝步驟先把結(jié)論放前面解壓、編譯、注冊(cè)組件、配路徑四步做完才能讓控件出現(xiàn)在組件面板上而這四步里路徑配置和版本對(duì)應(yīng)占掉九成報(bào)錯(cuò)原因。別急著雙擊任何 .dpk先把包的結(jié)構(gòu)看清楚。2.1 解壓前先看目錄結(jié)構(gòu)為什么包里會(huì)有 Delphi10 到 Delphi13 好幾份同名庫(kù)用 7-Zip 打開(kāi)壓縮包先看根目錄。這個(gè)包常見(jiàn)的布局是這樣的DevExpressVCL/ ├── Library/ │ ├── Delphi10/ # 對(duì)應(yīng) Delphi 10.x 全系 │ ├── Delphi11/ # 對(duì)應(yīng) Delphi 11.x │ ├── Delphi12/ # 對(duì)應(yīng) Delphi 12.x │ └── Delphi13/ # 包內(nèi)對(duì) Florence 分支的命名 ├── Source/ # 完整 .pas 源碼 ├── Resources/ # 皮膚、圖標(biāo)、字體等資源 ├── Demos/ # 官方示例 └── Readme*.txt # 版本與構(gòu)建說(shuō)明看到這份結(jié)構(gòu)先別急著選目錄。Library 下的每個(gè)分支里放著對(duì)應(yīng) IDE 版本要用到的 .dpk/.dproj 工程、預(yù)編譯的 .dcu 和 .bpl。為什么要按版本拆好幾份因?yàn)?Delphi 不同大版本生成的 .dcu 文件格式不通用10.4 編出來(lái)的 .dcu 塞進(jìn) Delphi 12 里直接報(bào)“不兼容的版本”。這個(gè)包用 Florence 這個(gè)代號(hào)指代 Delphi 13.x 分支說(shuō)明它是按“支持到 13”的口徑整理的你只需要關(guān)心自己 IDE 屬于哪一段。實(shí)際踩過(guò)的坑有人機(jī)器上裝的是 Delphi 11圖省事直接用 Delphi12 分支的庫(kù)文件編譯時(shí)報(bào)錯(cuò)后以為控件壞了其實(shí)只改 Library 路徑就能恢復(fù)正常。所以第一步在你的 IDE 里按 Help About 看準(zhǔn)大版本號(hào)再去 Library 下找對(duì)應(yīng)分支。2.2 設(shè)計(jì)期包與運(yùn)行期包先編譯 dcl 包再 InstallDelphi 組件的安裝分兩類(lèi)設(shè)計(jì)期包dcl 開(kāi)頭和運(yùn)行期包不帶 dcl。運(yùn)行期包提供功能代碼設(shè)計(jì)期包負(fù)責(zé)在 IDE 的組件面板上注冊(cè)控件。要讓控件出現(xiàn)在面板上必須打開(kāi)設(shè)計(jì)期包先 Compile 生成 .bpl再點(diǎn) Install 注冊(cè)。常見(jiàn)做法是這樣假設(shè)你要用網(wǎng)格控件打開(kāi) Library\Delphi12\dclDxGrid.dpk包名以實(shí)際文件為準(zhǔn)前綴 dcl 的就是設(shè)計(jì)期包。在 Package 編輯器里先 Compile看到“Success”后點(diǎn) Install彈窗提示組件已注冊(cè)到面板。注意一個(gè)動(dòng)作差異Compile 只是把包編出來(lái)Install 才會(huì)寫(xiě)進(jìn) IDE 的已安裝包列表很多人用 Build 替代 Compile 后以為裝好了重啟 IDE 發(fā)現(xiàn)面板還是空的。如果嫌 IDE 點(diǎn)擊太慢也可以用命令行走 msbuild 編譯 dcl 包前提是 rsvars.bat 已初始化環(huán)境call C:\Program Files\Embarcadero\Studio\23.0\bin\rsvars.bat msbuild dclDxGrid.dproj /p:ConfigRelease /p:PlatformWin32 /t:Build參數(shù)說(shuō)明Config 用 Release 而不是 Debug設(shè)計(jì)期包平時(shí)不建議加載 Debug 版本避免 IDE 里斷點(diǎn)行為異常Platform 先只編 Win32等你確認(rèn) 32 位可用后再補(bǔ) Win64最后的 /t:Build 會(huì)把編譯和鏈接一起做掉比 IDE 里的 Compile 多一步鏈接。注意 Studio 路徑里的 23.0 是安裝目錄版本號(hào)不同 IDE 可能不同以你的實(shí)際目錄為準(zhǔn)。2.3 Library 路徑與資源目錄不配齊就等著控件畫(huà)不出來(lái)包編譯安裝完下一步是把源碼和資源目錄告訴 IDE。打開(kāi) Tools Options Environment Delphi Options Library在 Library Path 里把下面兩行加進(jìn)去路徑以你的實(shí)際解壓位置為準(zhǔn)D:\DevExVCL\Library\Delphi12 D:\DevExVCL\Source D:\DevExVCL\Resources這里有個(gè)經(jīng)常被忽略的點(diǎn)Library Path 是給編譯器找 .dcu/.pas 用的Resources 為什么也要加因?yàn)?DevExpress 的皮膚和圖標(biāo)資源在運(yùn)行期通過(guò)資源路徑尋找不加的話程序能編譯但運(yùn)行起來(lái)界面可能一片灰、圖標(biāo)缺失。加完路徑后最好用 PowerShell 快速檢查路徑是否真的存在別等 IDE 報(bào)錯(cuò)才發(fā)現(xiàn)路徑寫(xiě)錯(cuò)$paths (D:\DevExVCL\Library\Delphi12, D:\DevExVCL\Source, D:\DevExVCL\Resources) $paths | ForEach-Object { if (Test-Path $_) { OK $_ } else { MISS $_ } }這段腳本把三個(gè)路徑逐個(gè)測(cè)一遍輸出 OK 或 MISS。建議把它存成一個(gè) check.ps1每臺(tái)新機(jī)器配完環(huán)境就跑一次能省下不少排查時(shí)間。2.4 多版本 IDE 共存的注意點(diǎn)bpl 不通用不少工程師一臺(tái)機(jī)器上同時(shí)裝 Delphi 10.4、11、12 甚至 13 預(yù)覽版用于對(duì)比項(xiàng)目。這時(shí)最容易翻車(chē)的是在 Delphi 12 里編譯好的 .bpl拿到 Delphi 11 里 InstallIDE 直接報(bào)錯(cuò)誤。原因還是版本編譯產(chǎn)物不通用。常見(jiàn)做法是每個(gè) IDE 版本各自打開(kāi)對(duì)應(yīng)分支的 dcl 包重新編譯注冊(cè)互不借用。Debug 與 Release 也按相同邏輯處理不要把 64 位的運(yùn)行期包混進(jìn) 32 位工程里Delphi 的 IDE 本身是 32 位但設(shè)計(jì)期包要跟隨 IDE 位數(shù)來(lái)編運(yùn)行期包才按目標(biāo)平臺(tái)分 Win32/Win64。這一節(jié)最后給一個(gè)總順序解壓到純英文短路徑不要中文、不要空格→ 確認(rèn) IDE 大版本 → 打開(kāi)對(duì)應(yīng) Library 分支 → 逐個(gè)編譯 dcl 包并 Install → 配置 Library Path → 重啟 IDE → 新建項(xiàng)目驗(yàn)證面板。按這個(gè)順序走九成安裝問(wèn)題都能繞開(kāi)。3. Full Source 不是擺件把源碼編譯、斷點(diǎn)調(diào)試和定制串起來(lái)標(biāo)題里 Full Source 四個(gè)字很多人當(dāng)成“完整版”的象征裝完就忘了。這個(gè)包真正的價(jià)值是給了 .pas 源碼可以把斷點(diǎn)打進(jìn)控件內(nèi)部、改默認(rèn)行為、裁剪不需要的包。這一章講怎么把這層價(jià)值用起來(lái)。3.1 從 .dcu 換成 .pas讓斷點(diǎn)能進(jìn) DevExpress 內(nèi)部平時(shí)用控件斷點(diǎn)只能進(jìn)你自己寫(xiě)的代碼按 F7 進(jìn)到控件方法里時(shí)看到的是一片灰色或者直接跳過(guò)。原因編譯器加載的是 .dcu沒(méi)有對(duì)應(yīng) .pas 的源碼路徑。Full Source 包存在后只要把 Source 目錄放到 Library Path 的最前面編譯器會(huì)優(yōu)先找到源代碼并按需重新編譯斷點(diǎn)就能停進(jìn)控件實(shí)現(xiàn)里。做法打開(kāi) Tools Options Library把 D:\DevExVCL\Source 這一行移動(dòng)到最頂部點(diǎn)擊 Add 后保持原路徑不變。然后關(guān)閉當(dāng)前工程重新編譯一次讓所有引用控件的單元按新路徑刷新。接著在調(diào)用網(wǎng)格方法的那一行設(shè)斷點(diǎn)按 F7 跟進(jìn)去如果 IDE 彈出“Source not found”手動(dòng)選一次 dx 源碼里的對(duì)應(yīng) .pas 文件之后它就會(huì)記住映射。// 在調(diào)用方設(shè)置斷點(diǎn)按 F7 進(jìn)入 DevExpress 內(nèi)部實(shí)現(xiàn) procedure TForm1.btnRefreshClick(Sender: TObject); begin cxGrid1DBTableView1.DataController.Refresh; // 斷點(diǎn)先停在這里 cxGrid1DBTableView1.DataController.FocusedRecordIndex : 0; end;這里的邏輯說(shuō)明DataController.Refresh 會(huì)觸發(fā) DevExpress 內(nèi)部一批方法是觀察源碼執(zhí)行順序最好的入口。參數(shù)說(shuō)明FocusedRecordIndex 賦值 -1 表示取消焦點(diǎn)0 表示回到第一行調(diào)試時(shí)用這兩個(gè)值配合斷點(diǎn)能看到焦點(diǎn)維護(hù)的內(nèi)部狀態(tài)。新手在這一步可能會(huì)發(fā)現(xiàn) IDE 突然變慢因?yàn)閯?dòng)態(tài)編譯源碼并加載調(diào)試符號(hào)后內(nèi)存占用變高屬正?，F(xiàn)象。3.2 改一個(gè)控件的默認(rèn)行為從改源碼到重新編譯源碼在手最常見(jiàn)的訴求是改默認(rèn)值。比如 cxGrid 默認(rèn)行高偏小、默認(rèn)邊框顏色難看、某些彈窗默認(rèn)不居中。找源碼里對(duì)應(yīng)屬性全局搜索默認(rèn)值賦值處修改。以行高為例打開(kāi) Source 里的 cxGrid.pas搜索 DefaultRowHeight找到默認(rèn)值賦值處改成你期望的像素值。保存源碼后如果你的工程是靜態(tài)鏈接運(yùn)行包不勾選 Runtime Packages直接重新編譯工程即可如果勾了 Runtime Packages需要重新編譯對(duì)應(yīng)運(yùn)行期 bpl并把新 bpl 覆蓋到 IDE 的搜索路徑里。// 源碼默認(rèn)值調(diào)整示例示意具體文件按版本結(jié)構(gòu)打開(kāi) // cxGrid.pas 中搜索 DefaultRowHeight property DefaultRowHeight: Integer read FDefaultRowHeight write SetDefaultRowHeight default 24; // 原默認(rèn)值 24改成 28注意一個(gè)細(xì)節(jié)改完源碼后IDE 里舊的設(shè)計(jì)期包可能還緩存著老 dcu。建議對(duì)運(yùn)行期包做一次 Rebuild再重啟 IDE。血淚經(jīng)驗(yàn)只 Compile 不 Rebuild 時(shí)緩存 dcu 沒(méi)刷新改了半天運(yùn)行沒(méi)變化誤以為改錯(cuò)文件。3.3 用 overlay 目錄管理自己的改動(dòng)別把官方源碼改花有人拿到源碼后直接在 Source 目錄里到處改改完很爽等到官方升級(jí)新版本時(shí)崩潰源碼被覆蓋之前的定制全沒(méi)了。常見(jiàn)做法是把所有改動(dòng)文件復(fù)制到一個(gè)獨(dú)立的 overlay 目錄構(gòu)建腳本先把 overlay 覆蓋到 Source再統(tǒng)一編譯# 將團(tuán)隊(duì)維護(hù)的改動(dòng)文件先同步到源碼目錄再執(zhí)行編譯 cp -r overlay/Source/* DevExVCL/Source/ cd DevExVCL # 此處按團(tuán)隊(duì)腳本執(zhí)行對(duì)應(yīng)版本的完整構(gòu)建邏輯說(shuō)明overlay 目錄只放改動(dòng)過(guò)的文件保持和官方 Source 相同的相對(duì)路徑覆蓋時(shí)不會(huì)誤傷未改動(dòng)的文件。升級(jí)新版本時(shí)先對(duì)比 overlay 與官方新源碼的差異把改動(dòng)逐個(gè)遷移。這個(gè)習(xí)慣救過(guò)我一次有一次亂改源碼后沒(méi)記錄升級(jí)版本時(shí)直接把幾個(gè)月的人性化改動(dòng)弄丟了從頭排查浪費(fèi)兩天。4. 安裝與使用避坑五個(gè)高頻翻車(chē)現(xiàn)場(chǎng)與排查路徑這一章寫(xiě)實(shí)際操作中踩過(guò)的五個(gè)典型問(wèn)題按“現(xiàn)象 → 原因 → 解決”的順序來(lái)遇到問(wèn)題可以直接對(duì)號(hào)入座。4.1 現(xiàn)象組件面板是空的Install Packages 列表里也沒(méi)有新項(xiàng)裝完包重啟 IDE按 F2 調(diào)出組件面板翻遍找不到 DevExpress 頁(yè)面。原因基本是安裝時(shí)只打開(kāi)了運(yùn)行期包或者沒(méi)有點(diǎn) Install。解決重新打開(kāi) dcl 前綴的包在 Package 編輯器里先 Compile 成功再點(diǎn) Install看到“Package installed”字樣才算注冊(cè)完成。如果文件列表里找不到 dcl 包去 Library 對(duì)應(yīng)分支目錄下按文件名篩選 dcl*.dpk許多安裝包把它放在單獨(dú)子目錄里不要只看根目錄。4.2 現(xiàn)象把控件拖到窗體IDE 報(bào) DCU 版本不符或 BPI 找不到常見(jiàn)場(chǎng)景項(xiàng)目里同時(shí)配置了 Delphi10 和 Delphi12 兩個(gè) Library 分支編譯器按路徑順序找到舊版 dcu。原因Library Path 加了多個(gè)版本的目錄且順序不對(duì)。解決在 Library Path 里只保留當(dāng)前 IDE 對(duì)應(yīng)分支并把 Source 與 Resources 固定到同一版本刪除項(xiàng)目 Options 里緩存的搜索路徑重新編譯。這里有個(gè)判斷技巧報(bào)錯(cuò)文件名帶 dcu 后綴是路徑?jīng)_突帶 bpl 后綴是運(yùn)行期包沒(méi)裝上。處理前先把當(dāng)前 IDE 右下角的版本信息截圖再對(duì)照包內(nèi) Readme 文件確認(rèn)支持范圍。4.3 現(xiàn)象程序跑起來(lái)界面是灰的皮膚完全沒(méi)生效DevExpress VCL 的皮膚功能需要主動(dòng)初始化。常見(jiàn)做法是在工程主模塊里調(diào)用皮膚單元或者在主窗體 OnCreate 里加載外部皮膚文件。原因只拖了控件沒(méi)調(diào)初始化函數(shù)或者 Resources 路徑?jīng)]配上導(dǎo)致皮膚資源加載失敗。解決在主窗體創(chuàng)建時(shí)加一段初始化代碼uses dxSkins, dxSkinsDefaultPainters, dxSkinsUserSkin; procedure TMainForm.FormCreate(Sender: TObject); begin // 加載內(nèi)置默認(rèn)皮膚 dxSkinsDefaultPainters.UseDefaultSkins : True; // 或加載外部皮膚文件路徑先寫(xiě)絕對(duì)路徑便于排查 dxSkinsUserSkinLoadFromFile(C:\App\skin.dxskin); end;參數(shù)說(shuō)明UseDefaultSkins 為 True 時(shí)使用內(nèi)置皮膚集合dxSkinsUserSkinLoadFromFile 則加載外部風(fēng)格文件適合皮膚交給美術(shù)團(tuán)隊(duì)維護(hù)的場(chǎng)景。注意 dxSkins 系列單元必須在 uses 里顯式列出少列一個(gè)編譯能過(guò)但運(yùn)行期功能缺失。4.4 現(xiàn)象切到 Win64 平臺(tái)后報(bào) Unit not found32 位卻好好的原因很簡(jiǎn)單只編譯了 Win32 的 dcu/bpl。DevExpress VCL 的源碼包是按平臺(tái)分別產(chǎn)出物的Win64 需要走一次獨(dú)立的編譯。解決在項(xiàng)目管理器里把目標(biāo)平臺(tái)列表勾上 Win64對(duì)運(yùn)行期包和設(shè)計(jì)期包分別 Build如果項(xiàng)目勾選了 Runtime Packages還要確保運(yùn)行期 bpl 的 Win64 版本存在并位于搜索路徑中。常見(jiàn)誤區(qū)是以為 64 位能自動(dòng)兼容 32 位 dcu實(shí)際 Delphi 編譯器不會(huì)跨平臺(tái)復(fù)用任何二進(jìn)制產(chǎn)物兩個(gè)平臺(tái)必須分別編譯。4.5 現(xiàn)象裝完包 IDE 啟動(dòng)極慢甚至卡死在啟動(dòng)畫(huà)面原因重復(fù)安裝了多個(gè)版本的 dcl 包或同一個(gè)包被注冊(cè)進(jìn)多個(gè) IDE 版本導(dǎo)致 IDE 啟動(dòng)時(shí)反復(fù)加載沖突單元。解決在 Install Packages 列表里逐一排查刪除非當(dāng)前 IDE 對(duì)應(yīng)的項(xiàng)如果 IDE 已經(jīng)打不開(kāi)備份注冊(cè)表后清理對(duì)應(yīng) BDS 緩存鍵再重新啟動(dòng)。備份優(yōu)先動(dòng)手前先導(dǎo)出注冊(cè)表不要憑感覺(jué)刪鍵。問(wèn)題通常不是包本身有 bug而是環(huán)境里塞了太多版本殘留。5. 高頻場(chǎng)景落地Excel 操作、PDF 導(dǎo)出和 PPT 查看不再求人安裝和調(diào)試折騰完這章說(shuō)正事。下面幾個(gè)場(chǎng)景是 Delphi 開(kāi)發(fā)者搜索最多的訴求剛好都能用這套控件收掉。5.1 用 dxSpreadSheet 讀寫(xiě) xlsx不裝 Office 也能操作 Excel以前 Excel 操作多半靠 OLE 調(diào) Excel.Application客戶機(jī)器沒(méi)裝 Office 就整個(gè)廢掉。用 dxSpreadSheet 可以不依賴本機(jī) Office 直接讀寫(xiě) xlsx/xls/csv。常見(jiàn)做法在窗體上放一個(gè) TdxSpreadSheet或者用代碼動(dòng)態(tài)創(chuàng)建uses dxSpreadSheet, dxSpreadSheetCore; procedure ExportXlsx; var ASheet: TdxSpreadSheet; begin ASheet : TdxSpreadSheet.Create(nil); try // 加載已有文件參數(shù)為文件路徑支持 xlsx,xls,csv ASheet.LoadFromFile(D:\data\input.xlsx); // 行列都從 1 開(kāi)始Cells[1,1] 是 Excel 的 A1 ASheet.Cells[1, 1].AsString : Delphi Excel 操作示例; ASheet.Cells[2, 1].AsFloat : 100; // 保存時(shí)按擴(kuò)展名自動(dòng)推斷格式 ASheet.SaveToFile(D:\data\output.xlsx); finally ASheet.Free; end; end;邏輯說(shuō)明LoadFromFile 負(fù)責(zé)解析文件解析結(jié)果在內(nèi)存中不啟動(dòng)任何外部進(jìn)程Cells 下標(biāo)從 1 開(kāi)始對(duì)應(yīng) Excel 的 A1 格式初學(xué)者容易按 Delphi 慣例從 0 開(kāi)始導(dǎo)致第一行留白。參數(shù)說(shuō)明AsString 和 AsFloat 是單元格值的兩個(gè)典型入口日期建議用 AsDateTime 并配套顯示格式。大數(shù)據(jù)量導(dǎo)出時(shí)注意關(guān)閉界面刷新否則十萬(wàn)行寫(xiě)完后界面卡頓明顯。5.2 導(dǎo)出 PDF別再糾結(jié) iText for Delphi 下載哪一家很多人在網(wǎng)上找 iText for Delphi下載回來(lái)發(fā)現(xiàn)依賴一堆 jar/dll異常處理還麻煩。用 dxSpreadSheet 的導(dǎo)出能力可以繞開(kāi)這些直接把表格或網(wǎng)格內(nèi)容輸出成 PDF 文件// 導(dǎo)出當(dāng)前工作簿為 PDF第二個(gè)參數(shù)是導(dǎo)出格式枚舉 ASheet.ExportToFile(D:\report\summary.pdf, dxSpreadSheetExportPDF);參數(shù)說(shuō)明第一個(gè)參數(shù)給輸出路徑第二個(gè)參數(shù)是導(dǎo)出格式枚舉dxSpreadSheetExportPDF 表示 PDF有的版本枚舉名略有出入以當(dāng)前 IDE 自動(dòng)補(bǔ)全列表為準(zhǔn)。中文亂碼時(shí)檢查字體嵌入設(shè)置PDF 導(dǎo)出默認(rèn)使用系統(tǒng)字體客戶機(jī)器缺對(duì)應(yīng)字體時(shí)會(huì)出現(xiàn)方塊。這一招做完RBuilder 導(dǎo)出還要配打印機(jī)驅(qū)動(dòng)的方案基本可以閑置了。5.3 cxGrid 扛十萬(wàn)行大數(shù)據(jù)量不要用全量加載cxGrid 本身很快但快的前提是不做無(wú)謂的全量刷新。常見(jiàn)錯(cuò)誤是把十萬(wàn)行數(shù)據(jù)一次性塞進(jìn)內(nèi)存再賦給網(wǎng)格界面滾動(dòng)卡到心態(tài)崩。常見(jiàn)做法是啟用 ServerMode 或按頁(yè)加載讓網(wǎng)格只持有當(dāng)前可視范圍的數(shù)據(jù)// 開(kāi)啟 ServerMode 后數(shù)據(jù)控制器只處理當(dāng)前頁(yè) cxGrid1DBTableView1.DataController.Options : cxGrid1DBTableView1.DataController.Options [dcoServerMode];邏輯說(shuō)明dcoServerMode 讓 DataController 切換成分頁(yè)讀取模式配合數(shù)據(jù)庫(kù)層的分頁(yè)查詢網(wǎng)格滾動(dòng)時(shí)按需拉數(shù)據(jù)。參數(shù)說(shuō)明如果當(dāng)前版本沒(méi)有 dcoServerMode 枚舉說(shuō)明它走的是獨(dú)立 ServerMode 數(shù)據(jù)源去 DataSource 屬性處掛對(duì)應(yīng)的服務(wù)端數(shù)據(jù)源即可原理一樣。開(kāi)啟后不再用循環(huán)逐行刷新整表那會(huì)把分頁(yè)優(yōu)勢(shì)全抵消。5.4 客戶要在線看 PPT別用 TWebBrowser 去嵌 OfficeTWebBrowser 播放 PPT 的老方案依賴本機(jī) Office 和 IE 內(nèi)核Office 升級(jí)就彈窗瀏覽器版本一變就白屏。常見(jiàn)做法是把 PPT 轉(zhuǎn)成 PDF 后交給 dxPdfViewer 顯示轉(zhuǎn)換可以預(yù)先離線完成運(yùn)行時(shí)完全不依賴 Office// 顯示 PDF 文件替代 WebBrowser 嵌 PPT 的舊方案 dxPdfViewer1.LoadFromFile(D:\slides\deck.pdf);參數(shù)說(shuō)明LoadFromFile 加載 PDF 后內(nèi)部做頁(yè)面渲染翻頁(yè)和縮放都走控件自身邏輯不調(diào)系統(tǒng)瀏覽器。注意這個(gè)方案適合展示型場(chǎng)景如果客戶還需要編輯 PPT 內(nèi)容保留原文件的編輯鏈路不要硬塞給 PDF 查看器。6. 把源碼包變成團(tuán)隊(duì)資產(chǎn)按需裁剪與版本固化最后說(shuō)點(diǎn)只有把源碼版用久了才會(huì)明白的事。Full Source 帶來(lái)的不只是調(diào)試能力還有一個(gè)容易被忽略的好處團(tuán)隊(duì)可以按需裁剪。把用不到的包從 dcl 注冊(cè)列表里去掉IDE 啟動(dòng)快不少編譯工程時(shí)也不用反復(fù)加載無(wú)關(guān)單元。判斷依據(jù)是項(xiàng)目實(shí)際上用了哪些控件常見(jiàn)做法是建一個(gè)“必裝清單”新同事入職照著清單勾選而不是整套全裝。驗(yàn)證源碼是否真的生效有個(gè)土辦法但很有效在某個(gè)源碼文件里把一個(gè)默認(rèn)值改成一個(gè)肉眼能識(shí)別的怪值重新編譯運(yùn)行如果界面上出現(xiàn)了怪值說(shuō)明代碼路徑走對(duì)了如果沒(méi)變化多半是緩存 dcu 沒(méi)清干凈。這套驗(yàn)證法比單純看版本號(hào)可靠版本號(hào)只證明你裝了某個(gè)包不證明你改的源碼參與了運(yùn)行。版本固化方面我的習(xí)慣是把整個(gè) DevExVCL 目錄納入 Git但官方源碼目錄保持只讀所有改動(dòng)放進(jìn)一個(gè) overlay 目錄構(gòu)建前用腳本覆蓋過(guò)去。這樣官方包升級(jí)時(shí)只要對(duì)比 overlay 目錄就能知道改過(guò)哪些文件不至于升級(jí)完發(fā)現(xiàn)幾個(gè)月的定制全部白填。每臺(tái)新機(jī)器裝完我都會(huì)把 Library 分支、編譯順序和必裝包清單寫(xiě)進(jìn)團(tuán)隊(duì) Wiki這樣十分鐘能恢復(fù)一套可用環(huán)境不用靠記憶從報(bào)錯(cuò)里重新摸一遍。希望幫到你。下次拿到類(lèi)似“Delphi 13.1 控件之 DevExpress VCL Controls v25.2.3 for Delphi 10-13 Florence Full Source.7z”這種長(zhǎng)名字包先拆名字再對(duì)版本最后動(dòng)編譯順序?qū)α司晚樍恕１疚倪€有配套的精品資源點(diǎn)擊獲取