戰(zhàn)：Delphi 連接 MySQL 的編譯、分層與避坑指南)
簡(jiǎn)介這份資源是 MyDAC v5.00.1.7 的完整源碼包面向使用 Delphi、CBuilder 或 Kylix 開(kāi)發(fā) MySQL 數(shù)據(jù)庫(kù)應(yīng)用的工程師。MyDAC 組件庫(kù)支持直連 MySQL 服務(wù)器或通過(guò)客戶端庫(kù)通信可作為標(biāo)準(zhǔn) MySQL 連接方案與 BDE 的高效替代幫助開(kāi)發(fā)者寫出更簡(jiǎn)潔、更快速的數(shù)據(jù)庫(kù)程序。壓縮包共 1297 個(gè)文件約 2.1MB以 348 個(gè) pas 源碼、134 個(gè) dpk 包定義、128 個(gè) res 資源、105 個(gè) dfm 窗體、84 個(gè) bdsproj 工程及 83 個(gè) cfg 配置為主另含 cpp、dpr、bpk、inc、sql、dll 等覆蓋組件源碼、示例工程與編譯腳本便于二次開(kāi)發(fā)與移植。目前已有 117 人學(xué)習(xí)下載。讀者可借此研究 MyDAC 的底層實(shí)現(xiàn)、連接機(jī)制與組件設(shè)計(jì)對(duì)照示例工程快速集成到自有項(xiàng)目中并參考源碼排查兼容性與性能問(wèn)題。1. 從一份源碼包說(shuō)起MyDAC 到底解決了什么連接問(wèn)題如果你手里拿到一個(gè)名為mydac.v5.00.1.7.src.rar的壓縮包里面躺著MYSQL、MyDAC、MySql.Data src、The Client這些目錄或文件第一反應(yīng)大概率是這是一套 Delphi/CBuilder 環(huán)境下用來(lái)連 MySQL 的組件源碼。MyDAC 是 Devart 系數(shù)據(jù)訪問(wèn)組件里專門針對(duì) MySQL 的一支和MySql.Data官方 .NET 連接器不是一回事但很多人會(huì)把它們混著搜因?yàn)殛P(guān)鍵詞都落在“MySQL 客戶端驅(qū)動(dòng)”上。這個(gè)包真正值錢的地方不是“能連數(shù)據(jù)庫(kù)”而是它把客戶端協(xié)議、數(shù)據(jù)集映射、連接池、事務(wù)控制這些臟活封裝成了 VCL 組件讓你在 RAD 環(huán)境里拖幾個(gè)控件就能跑通 CRUD。適合誰(shuí)適合還在維護(hù) Delphi 老系統(tǒng)、又必須接 MySQL 5.7/8.0 的團(tuán)隊(duì)以及想研究數(shù)據(jù)庫(kù)客戶端源碼怎么分層的人。下面我按“先跑通、再拆結(jié)構(gòu)、最后避坑”的順序講。2. 把源碼包跑起來(lái)環(huán)境、編譯與最小連接2.1 先確認(rèn)你拿到的是源碼還是安裝包mydac.v5.00.1.7.src.rar從命名看是源碼分發(fā)版不是帶 IDE 向?qū)У?exe 安裝包。源碼版通常包含Source、Lib、Demos、Packages幾類目錄The Client很可能對(duì)應(yīng)客戶端協(xié)議實(shí)現(xiàn)層MySql.Data src可能是對(duì)官方連接器某些行為的參考或兼容層。第一步不是急著編譯而是解壓后先看目錄樹(shù)確認(rèn)有沒(méi)有*.dpk、*.dproj、*.inc這些工程文件。如果沒(méi)有說(shuō)明它可能只是單元文件集合需要你自己建包。# 解壓后先看兩層目錄別一上來(lái)就全量編譯 unzip -l mydac.v5.00.1.7.src.rar | head -60 # 重點(diǎn)找 dpk/dproj/inc確認(rèn)包結(jié)構(gòu) unzip -l mydac.v5.00.1.7.src.rar | grep -Ei \.(dpk|dproj|inc|pas)$ | head -40邏輯說(shuō)明unzip -l只列清單不解壓避免污染工作區(qū)grep過(guò)濾出工程文件和 Pascal 單元判斷這套源碼是“開(kāi)箱可編譯”還是“需要手工組包”。參數(shù)上head限制輸出行數(shù)防止刷屏。如果你用的是 7z把unzip -l換成7z l即可過(guò)濾邏輯不變。2.2 編譯順序先 Client 層再 Dataset 層最后 IDE 包MyDAC 這類組件的依賴方向通常是底層客戶端協(xié)議 → 連接與命令對(duì)象 → 數(shù)據(jù)集適配 → IDE 注冊(cè)包。The Client目錄如果存在優(yōu)先編譯它因?yàn)樯蠈訂卧獣?huì)引用它的接口。常見(jiàn)做法是先在 IDE 里打開(kāi)運(yùn)行期包Runtime Package編譯通過(guò)后再裝設(shè)計(jì)期包Design Package。如果你跳過(guò)運(yùn)行期包直接裝設(shè)計(jì)期包IDE 會(huì)報(bào)“找不到某某單元”這就是依賴順序翻車的典型表現(xiàn)。// 最小連接示例假設(shè)運(yùn)行期包已編譯并加入搜索路徑 uses MyDAC.Provider, MyDAC.Connection; // 實(shí)際單元名以源碼為準(zhǔn)這里示意分層 var Conn: TMyConnection; begin Conn : TMyConnection.Create(nil); try Conn.Server : 127.0.0.1; Conn.Port : 3306; Conn.Username : app_user; Conn.Password : app_pass; Conn.Database : demo_db; Conn.LoginPrompt : False; // 不彈登錄框適合服務(wù)端或自動(dòng)化 Conn.Connect; // 真正建立連接 // 到這里只驗(yàn)證握手和認(rèn)證不涉及查詢 finally Conn.Free; end; end;邏輯說(shuō)明這段代碼只做“連接建立”這一件事目的是把認(rèn)證、字符集協(xié)商、端口連通性先隔離出來(lái)。參數(shù)上LoginPrompt : False很關(guān)鍵很多新手在服務(wù)里跑卻彈出登錄框就是因?yàn)闆](méi)關(guān)它Port顯式寫 3306 而不是依賴默認(rèn)值方便后面換端口排查。如果Connect拋異常先看錯(cuò)誤碼是 1045認(rèn)證失敗還是 2003連不上兩者排查方向完全不同。2.3 用 Demos 做冒煙測(cè)試別自己先寫業(yè)務(wù)源碼包里的Demos目錄是最被低估的資產(chǎn)。它通常包含連接、查詢、事務(wù)、Blob 讀寫這幾類最小示例。我的習(xí)慣是先編譯一個(gè)最簡(jiǎn)單的Demo把連接參數(shù)改成自己的測(cè)試庫(kù)跑通SELECT 1再動(dòng)自己的業(yè)務(wù)代碼。這樣能把“組件本身有問(wèn)題”和“我的代碼有問(wèn)題”分開(kāi)。如果 Demo 都跑不通別懷疑業(yè)務(wù)邏輯直接查環(huán)境。-- 在測(cè)試庫(kù)里先建一張最小表避免拿業(yè)務(wù)表做實(shí)驗(yàn) CREATE TABLE t_smoke ( id INT PRIMARY KEY AUTO_INCREMENT, note VARCHAR(64) NOT NULL DEFAULT ) ENGINEInnoDB DEFAULT CHARSETutf8mb4; INSERT INTO t_smoke(note) VALUES (first); SELECT id, note FROM t_smoke;邏輯說(shuō)明utf8mb4是現(xiàn)在 MySQL 的推薦字符集能存 emoji 和四字節(jié)字符InnoDB保證事務(wù)和行鎖行為可預(yù)期。先建獨(dú)立測(cè)試表是為了后面驗(yàn)證數(shù)據(jù)集組件的增刪改查時(shí)不污染真實(shí)數(shù)據(jù)。這一步看起來(lái)簡(jiǎn)單但很多人跳過(guò)結(jié)果在業(yè)務(wù)表上測(cè)出“更新丟失”其實(shí)是自己事務(wù)沒(méi)提交。3. 拆開(kāi)看結(jié)構(gòu)MyDAC 的分層與 MySql.Data 的差異3.1 客戶端協(xié)議層到底在做什么The Client這個(gè)命名很直白它對(duì)應(yīng)的是 MySQL 客戶端/服務(wù)端協(xié)議實(shí)現(xiàn)。這一層要處理握手包、認(rèn)證插件、字符集、預(yù)處理語(yǔ)句、結(jié)果集編碼。MySQL 8.0 默認(rèn)認(rèn)證插件換成了caching_sha2_password老版本客戶端庫(kù)如果不支持就會(huì)在連接階段直接失敗報(bào)“Authentication plugin cannot be loaded”。MyDAC 源碼里如果有認(rèn)證插件相關(guān)單元重點(diǎn)看它支持哪些插件、是否允許降級(jí)到mysql_native_password。這不是玄學(xué)是協(xié)議版本匹配問(wèn)題。// 偽代碼觀察認(rèn)證插件協(xié)商的切入點(diǎn) // 實(shí)際單元名和類名以源碼為準(zhǔn)這里只表達(dá)排查思路 function NegotiateAuth(ServerCaps: Cardinal): TAuthMethod; begin if (ServerCaps and CLIENT_PLUGIN_AUTH) 0 then Result : ReadAuthPluginName() // 讀服務(wù)端要求的插件名 else Result : amNative; // 老服務(wù)端回退 end;邏輯說(shuō)明這段不是讓你照抄而是告訴你讀源碼時(shí)盯哪里。CLIENT_PLUGIN_AUTH是能力位服務(wù)端和客戶端都要聲明支持才會(huì)走插件認(rèn)證流程。如果你在源碼里找不到對(duì)caching_sha2_password的處理那這套老版本 MyDAC 連 MySQL 8.0 就會(huì)翻車解決辦法要么升級(jí)組件要么在服務(wù)端給該用戶單獨(dú)改認(rèn)證插件。3.2 MySql.Data src 和 MyDAC 不是替代關(guān)系很多人搜MySql.Data src是因?yàn)樵?.NET 項(xiàng)目里用過(guò)官方連接器看到 MyDAC 源碼包里也有類似名字就以為可以混用。實(shí)際上MySql.Data是 .NET 生態(tài)的MyDAC 是 Delphi/CBuilder 生態(tài)的兩者 API 風(fēng)格、異常體系、連接字符串格式都不同。MyDAC 的連接參數(shù)是屬性式Server、Port、Username官方 .NET 連接器是連接字符串式Server...;Port...;Uid...。如果你把 .NET 的連接字符串直接塞給 MyDAC它不會(huì)報(bào)“格式錯(cuò)誤”而是某些屬性為空最后表現(xiàn)為連到了 localhost 或默認(rèn)庫(kù)。對(duì)比項(xiàng)MyDACDelphi/CBuilderMySql.Data.NET配置方式組件屬性逐個(gè)賦值連接字符串異常類型組件自定義異常MySqlException認(rèn)證插件支持取決于組件版本取決于連接器版本適用場(chǎng)景VCL 桌面/服務(wù)端.NET 應(yīng)用邏輯說(shuō)明這張表不是讓你背而是幫你判斷“我到底該用哪套”。如果你在 Delphi 里就別去翻MySql.Data的文檔如果你在 .NET 里MyDAC 源碼對(duì)你幫助有限?；煊米畹湫偷姆囀沁B接字符串里寫了SslModeRequired但 MyDAC 對(duì)應(yīng)屬性沒(méi)設(shè)結(jié)果以為加密了其實(shí)沒(méi)加密。3.3 數(shù)據(jù)集組件與連接池的配合MyDAC 的數(shù)據(jù)集組件類似TMyQuery、TMyTable不是孤立工作的它們背后共享連接或使用獨(dú)立連接。連接池的行為直接影響“為什么我改了數(shù)據(jù)但另一個(gè)查詢看不到”。常見(jiàn)做法是短連接場(chǎng)景開(kāi)池長(zhǎng)事務(wù)場(chǎng)景關(guān)池或顯式控制事務(wù)邊界。如果你在源碼里看到Pooling、MaxPoolSize這類屬性說(shuō)明它支持池化。池化的坑在于連接歸還時(shí)如果沒(méi)有回滾未提交事務(wù)下一個(gè)拿到該連接的人會(huì)看到臟數(shù)據(jù)。// 事務(wù)邊界要顯式別依賴組件自動(dòng)提交 Conn.StartTransaction; try Qry.SQL.Text : UPDATE t_smoke SET note :n WHERE id :id; Qry.ParamByName(n).AsString : updated; Qry.ParamByName(id).AsInteger : 1; Qry.ExecSQL; Conn.Commit; // 不 Commit池化連接歸還后事務(wù)仍掛著 except Conn.Rollback; raise; end;邏輯說(shuō)明StartTransaction和Commit/Rollback必須成對(duì)出現(xiàn)try...except保證異常時(shí)回滾。參數(shù)化查詢用ParamByName而不是拼字符串避免 SQL 注入和引號(hào)轉(zhuǎn)義問(wèn)題。如果你用池化又忘了回滾下一個(gè)請(qǐng)求可能讀到未提交數(shù)據(jù)這種問(wèn)題在測(cè)試環(huán)境很難復(fù)現(xiàn)因?yàn)椴l(fā)不夠。4. 避坑與排查連接失敗、亂碼、事務(wù)不生效4.1 現(xiàn)象連接報(bào)“Authentication plugin cannot be loaded”原因MySQL 8.0 用戶默認(rèn)用caching_sha2_password而老版本 MyDAC 客戶端庫(kù)只認(rèn)mysql_native_password。解決要么升級(jí) MyDAC 到支持新插件的版本要么在服務(wù)端執(zhí)行ALTER USER app_user% IDENTIFIED WITH mysql_native_password BY app_pass;。注意改插件后要FLUSH PRIVILEGES。這不是長(zhǎng)久之計(jì)但能讓你先把系統(tǒng)跑起來(lái)。4.2 現(xiàn)象中文存進(jìn)去變成問(wèn)號(hào)原因連接字符集沒(méi)設(shè)對(duì)或者表/列字符集不是utf8mb4。解決連接屬性里顯式設(shè)Charset : utf8mb4同時(shí)確認(rèn)表定義。如果源碼里字符集是硬編碼的latin1那就得改源碼或找配置項(xiàng)。排查時(shí)用SHOW VARIABLES LIKE character_set%;看服務(wù)端用SELECT HEX(note) FROM t_smoke;看實(shí)際存儲(chǔ)字節(jié)。4.3 現(xiàn)象更新后查詢看不到變化原因事務(wù)沒(méi)提交或者連接池復(fù)用了帶未提交事務(wù)的連接。解決檢查代碼里有沒(méi)有漏掉Commit如果用了池化在歸還連接前確保事務(wù)已結(jié)束?？梢栽跍y(cè)試時(shí)臨時(shí)關(guān)掉池化看問(wèn)題是否消失以此定位。4.4 現(xiàn)象編譯時(shí)報(bào)“Unit not found”原因源碼包的搜索路徑?jīng)]配全或者運(yùn)行期包沒(méi)先編譯。解決在 IDE 的 Library Path 里把Source下所有子目錄加進(jìn)去先編譯運(yùn)行期包再裝設(shè)計(jì)期包。如果還不行看報(bào)錯(cuò)的具體單元名去目錄里搜它在哪個(gè)子目錄單獨(dú)把那個(gè)目錄加進(jìn)搜索路徑。4.5 現(xiàn)象Demo 能跑自己的項(xiàng)目連不上原因Demo 用的連接參數(shù)和你的不同或者你的項(xiàng)目引用了不同版本的單元。解決把 Demo 的連接參數(shù)逐項(xiàng)抄過(guò)來(lái)先跑通再改。檢查項(xiàng)目里有沒(méi)有重復(fù)引用舊版單元Delphi 的單元搜索順序有時(shí)會(huì)讓人抓狂用Project Options Delphi Compiler Search Path確認(rèn)順序。5. 進(jìn)階用法從源碼里挖出可復(fù)用的連接管理技巧源碼包最大的價(jià)值不是“能用”而是“能改”。當(dāng)你把The Client層的連接建立流程讀一遍會(huì)發(fā)現(xiàn)它把“解析服務(wù)端能力位 → 選擇認(rèn)證方式 → 協(xié)商字符集 → 建立會(huì)話”拆得很清楚。你可以把這套流程抽出來(lái)做成自己的輕量連接工廠不依賴 IDE 組件方便在控制臺(tái)程序或服務(wù)里復(fù)用。我一般會(huì)先找連接類的Connect方法順著調(diào)用鏈看它做了哪幾件事然后寫一個(gè)最小復(fù)現(xiàn)把每一步的返回值打日志。這樣即使以后換組件排查思路還在。// 偽代碼把連接建立的關(guān)鍵節(jié)點(diǎn)打日志方便定位卡在哪一步 procedure TConnTrace.Connect; begin Log(1. resolve host); ResolveHost; Log(2. tcp connect); OpenSocket; Log(3. read handshake); ReadHandshake; Log(4. send auth); SendAuth; Log(5. read auth result); ReadAuthResult; Log(6. set charset); SetCharset; Log(connected); end;邏輯說(shuō)明這段偽代碼的重點(diǎn)是“分步日志”。真實(shí)源碼里這些步驟可能揉在一個(gè)方法里但你可以通過(guò)斷點(diǎn)或日志把它們分開(kāi)。參數(shù)上每一步的耗時(shí)和返回值都值得記錄尤其是ReadAuthResult返回的錯(cuò)誤碼。這樣下次再遇到連接問(wèn)題你一眼就能看出是網(wǎng)絡(luò)層、認(rèn)證層還是字符集層。另一個(gè)進(jìn)階點(diǎn)是連接池的健康檢查。池化連接放久了可能被服務(wù)端wait_timeout斷開(kāi)下次取出來(lái)用就報(bào)“MySQL server has gone away”。常見(jiàn)做法是在取出連接時(shí)先執(zhí)行一次輕量SELECT 1失敗就重建。這個(gè)邏輯如果源碼里沒(méi)有你可以自己在封裝層加。檢查項(xiàng)建議值說(shuō)明連接超時(shí)510 秒太短易誤判太長(zhǎng)卡界面命令超時(shí)30 秒按業(yè)務(wù)查詢復(fù)雜度調(diào)池大小520按并發(fā)量調(diào)別盲目開(kāi)大空閑回收60300 秒小于服務(wù)端 wait_timeout邏輯說(shuō)明這張表是我在多個(gè)項(xiàng)目里試出來(lái)的經(jīng)驗(yàn)值不是標(biāo)準(zhǔn)答案。連接超時(shí)設(shè)太短網(wǎng)絡(luò)抖動(dòng)就失敗池大小開(kāi)太大數(shù)據(jù)庫(kù)連接數(shù)爆掉?？臻e回收一定要小于服務(wù)端的wait_timeout否則池里全是死連接。最后說(shuō)一個(gè)我踩過(guò)的坑有次為了省事直接把源碼包里某個(gè)單元的初始化代碼復(fù)制到自己的項(xiàng)目結(jié)果它依賴另一個(gè)單元的全局變量編譯能過(guò)運(yùn)行時(shí)卻隨機(jī)崩潰。后來(lái)老老實(shí)實(shí)按依賴順序引單元問(wèn)題消失。所以讀源碼可以抄代碼要連依賴一起看。希望幫到你。本文還有配套的精品資源點(diǎn)擊獲取 MyDAC 源碼包實(shí)戰(zhàn)：Delphi 連接 MySQL 的編譯、分層與避坑指南
簡(jiǎn)介這份資源是 MyDAC v5.00.1.7 的完整源碼包面向使用 Delphi、CBuilder 或 Kylix 開(kāi)發(fā) MySQL 數(shù)據(jù)庫(kù)應(yīng)用的工程師。MyDAC 組件庫(kù)支持直連 MySQL 服務(wù)器或通過(guò)客戶端庫(kù)通信可作為標(biāo)準(zhǔn) MySQL 連接方案與 BDE 的高效替代幫助開(kāi)發(fā)者寫出更簡(jiǎn)潔、更快速的數(shù)據(jù)庫(kù)程序。壓縮包共 1297 個(gè)文件約 2.1MB以 348 個(gè) pas 源碼、134 個(gè) dpk 包定義、128 個(gè) res 資源、105 個(gè) dfm 窗體、84 個(gè) bdsproj 工程及 83 個(gè) cfg 配置為主另含 cpp、dpr、bpk、inc、sql、dll 等覆蓋組件源碼、示例工程與編譯腳本便于二次開(kāi)發(fā)與移植。目前已有 117 人學(xué)習(xí)下載。讀者可借此研究 MyDAC 的底層實(shí)現(xiàn)、連接機(jī)制與組件設(shè)計(jì)對(duì)照示例工程快速集成到自有項(xiàng)目中并參考源碼排查兼容性與性能問(wèn)題。1. 從一份源碼包說(shuō)起MyDAC 到底解決了什么連接問(wèn)題如果你手里拿到一個(gè)名為mydac.v5.00.1.7.src.rar的壓縮包里面躺著MYSQL、MyDAC、MySql.Data src、The Client這些目錄或文件第一反應(yīng)大概率是這是一套 Delphi/CBuilder 環(huán)境下用來(lái)連 MySQL 的組件源碼。MyDAC 是 Devart 系數(shù)據(jù)訪問(wèn)組件里專門針對(duì) MySQL 的一支和MySql.Data官方 .NET 連接器不是一回事但很多人會(huì)把它們混著搜因?yàn)殛P(guān)鍵詞都落在“MySQL 客戶端驅(qū)動(dòng)”上。這個(gè)包真正值錢的地方不是“能連數(shù)據(jù)庫(kù)”而是它把客戶端協(xié)議、數(shù)據(jù)集映射、連接池、事務(wù)控制這些臟活封裝成了 VCL 組件讓你在 RAD 環(huán)境里拖幾個(gè)控件就能跑通 CRUD。適合誰(shuí)適合還在維護(hù) Delphi 老系統(tǒng)、又必須接 MySQL 5.7/8.0 的團(tuán)隊(duì)以及想研究數(shù)據(jù)庫(kù)客戶端源碼怎么分層的人。下面我按“先跑通、再拆結(jié)構(gòu)、最后避坑”的順序講。2. 把源碼包跑起來(lái)環(huán)境、編譯與最小連接2.1 先確認(rèn)你拿到的是源碼還是安裝包mydac.v5.00.1.7.src.rar從命名看是源碼分發(fā)版不是帶 IDE 向?qū)У?exe 安裝包。源碼版通常包含Source、Lib、Demos、Packages幾類目錄The Client很可能對(duì)應(yīng)客戶端協(xié)議實(shí)現(xiàn)層MySql.Data src可能是對(duì)官方連接器某些行為的參考或兼容層。第一步不是急著編譯而是解壓后先看目錄樹(shù)確認(rèn)有沒(méi)有*.dpk、*.dproj、*.inc這些工程文件。如果沒(méi)有說(shuō)明它可能只是單元文件集合需要你自己建包。# 解壓后先看兩層目錄別一上來(lái)就全量編譯 unzip -l mydac.v5.00.1.7.src.rar | head -60 # 重點(diǎn)找 dpk/dproj/inc確認(rèn)包結(jié)構(gòu) unzip -l mydac.v5.00.1.7.src.rar | grep -Ei \.(dpk|dproj|inc|pas)$ | head -40邏輯說(shuō)明unzip -l只列清單不解壓避免污染工作區(qū)grep過(guò)濾出工程文件和 Pascal 單元判斷這套源碼是“開(kāi)箱可編譯”還是“需要手工組包”。參數(shù)上head限制輸出行數(shù)防止刷屏。如果你用的是 7z把unzip -l換成7z l即可過(guò)濾邏輯不變。2.2 編譯順序先 Client 層再 Dataset 層最后 IDE 包MyDAC 這類組件的依賴方向通常是底層客戶端協(xié)議 → 連接與命令對(duì)象 → 數(shù)據(jù)集適配 → IDE 注冊(cè)包。The Client目錄如果存在優(yōu)先編譯它因?yàn)樯蠈訂卧獣?huì)引用它的接口。常見(jiàn)做法是先在 IDE 里打開(kāi)運(yùn)行期包Runtime Package編譯通過(guò)后再裝設(shè)計(jì)期包Design Package。如果你跳過(guò)運(yùn)行期包直接裝設(shè)計(jì)期包IDE 會(huì)報(bào)“找不到某某單元”這就是依賴順序翻車的典型表現(xiàn)。// 最小連接示例假設(shè)運(yùn)行期包已編譯并加入搜索路徑 uses MyDAC.Provider, MyDAC.Connection; // 實(shí)際單元名以源碼為準(zhǔn)這里示意分層 var Conn: TMyConnection; begin Conn : TMyConnection.Create(nil); try Conn.Server : 127.0.0.1; Conn.Port : 3306; Conn.Username : app_user; Conn.Password : app_pass; Conn.Database : demo_db; Conn.LoginPrompt : False; // 不彈登錄框適合服務(wù)端或自動(dòng)化 Conn.Connect; // 真正建立連接 // 到這里只驗(yàn)證握手和認(rèn)證不涉及查詢 finally Conn.Free; end; end;邏輯說(shuō)明這段代碼只做“連接建立”這一件事目的是把認(rèn)證、字符集協(xié)商、端口連通性先隔離出來(lái)。參數(shù)上LoginPrompt : False很關(guān)鍵很多新手在服務(wù)里跑卻彈出登錄框就是因?yàn)闆](méi)關(guān)它Port顯式寫 3306 而不是依賴默認(rèn)值方便后面換端口排查。如果Connect拋異常先看錯(cuò)誤碼是 1045認(rèn)證失敗還是 2003連不上兩者排查方向完全不同。2.3 用 Demos 做冒煙測(cè)試別自己先寫業(yè)務(wù)源碼包里的Demos目錄是最被低估的資產(chǎn)。它通常包含連接、查詢、事務(wù)、Blob 讀寫這幾類最小示例。我的習(xí)慣是先編譯一個(gè)最簡(jiǎn)單的Demo把連接參數(shù)改成自己的測(cè)試庫(kù)跑通SELECT 1再動(dòng)自己的業(yè)務(wù)代碼。這樣能把“組件本身有問(wèn)題”和“我的代碼有問(wèn)題”分開(kāi)。如果 Demo 都跑不通別懷疑業(yè)務(wù)邏輯直接查環(huán)境。-- 在測(cè)試庫(kù)里先建一張最小表避免拿業(yè)務(wù)表做實(shí)驗(yàn) CREATE TABLE t_smoke ( id INT PRIMARY KEY AUTO_INCREMENT, note VARCHAR(64) NOT NULL DEFAULT ) ENGINEInnoDB DEFAULT CHARSETutf8mb4; INSERT INTO t_smoke(note) VALUES (first); SELECT id, note FROM t_smoke;邏輯說(shuō)明utf8mb4是現(xiàn)在 MySQL 的推薦字符集能存 emoji 和四字節(jié)字符InnoDB保證事務(wù)和行鎖行為可預(yù)期。先建獨(dú)立測(cè)試表是為了后面驗(yàn)證數(shù)據(jù)集組件的增刪改查時(shí)不污染真實(shí)數(shù)據(jù)。這一步看起來(lái)簡(jiǎn)單但很多人跳過(guò)結(jié)果在業(yè)務(wù)表上測(cè)出“更新丟失”其實(shí)是自己事務(wù)沒(méi)提交。3. 拆開(kāi)看結(jié)構(gòu)MyDAC 的分層與 MySql.Data 的差異3.1 客戶端協(xié)議層到底在做什么The Client這個(gè)命名很直白它對(duì)應(yīng)的是 MySQL 客戶端/服務(wù)端協(xié)議實(shí)現(xiàn)。這一層要處理握手包、認(rèn)證插件、字符集、預(yù)處理語(yǔ)句、結(jié)果集編碼。MySQL 8.0 默認(rèn)認(rèn)證插件換成了caching_sha2_password老版本客戶端庫(kù)如果不支持就會(huì)在連接階段直接失敗報(bào)“Authentication plugin cannot be loaded”。MyDAC 源碼里如果有認(rèn)證插件相關(guān)單元重點(diǎn)看它支持哪些插件、是否允許降級(jí)到mysql_native_password。這不是玄學(xué)是協(xié)議版本匹配問(wèn)題。// 偽代碼觀察認(rèn)證插件協(xié)商的切入點(diǎn) // 實(shí)際單元名和類名以源碼為準(zhǔn)這里只表達(dá)排查思路 function NegotiateAuth(ServerCaps: Cardinal): TAuthMethod; begin if (ServerCaps and CLIENT_PLUGIN_AUTH) 0 then Result : ReadAuthPluginName() // 讀服務(wù)端要求的插件名 else Result : amNative; // 老服務(wù)端回退 end;邏輯說(shuō)明這段不是讓你照抄而是告訴你讀源碼時(shí)盯哪里。CLIENT_PLUGIN_AUTH是能力位服務(wù)端和客戶端都要聲明支持才會(huì)走插件認(rèn)證流程。如果你在源碼里找不到對(duì)caching_sha2_password的處理那這套老版本 MyDAC 連 MySQL 8.0 就會(huì)翻車解決辦法要么升級(jí)組件要么在服務(wù)端給該用戶單獨(dú)改認(rèn)證插件。3.2 MySql.Data src 和 MyDAC 不是替代關(guān)系很多人搜MySql.Data src是因?yàn)樵?.NET 項(xiàng)目里用過(guò)官方連接器看到 MyDAC 源碼包里也有類似名字就以為可以混用。實(shí)際上MySql.Data是 .NET 生態(tài)的MyDAC 是 Delphi/CBuilder 生態(tài)的兩者 API 風(fēng)格、異常體系、連接字符串格式都不同。MyDAC 的連接參數(shù)是屬性式Server、Port、Username官方 .NET 連接器是連接字符串式Server...;Port...;Uid...。如果你把 .NET 的連接字符串直接塞給 MyDAC它不會(huì)報(bào)“格式錯(cuò)誤”而是某些屬性為空最后表現(xiàn)為連到了 localhost 或默認(rèn)庫(kù)。對(duì)比項(xiàng)MyDACDelphi/CBuilderMySql.Data.NET配置方式組件屬性逐個(gè)賦值連接字符串異常類型組件自定義異常MySqlException認(rèn)證插件支持取決于組件版本取決于連接器版本適用場(chǎng)景VCL 桌面/服務(wù)端.NET 應(yīng)用邏輯說(shuō)明這張表不是讓你背而是幫你判斷“我到底該用哪套”。如果你在 Delphi 里就別去翻MySql.Data的文檔如果你在 .NET 里MyDAC 源碼對(duì)你幫助有限?；煊米畹湫偷姆囀沁B接字符串里寫了SslModeRequired但 MyDAC 對(duì)應(yīng)屬性沒(méi)設(shè)結(jié)果以為加密了其實(shí)沒(méi)加密。3.3 數(shù)據(jù)集組件與連接池的配合MyDAC 的數(shù)據(jù)集組件類似TMyQuery、TMyTable不是孤立工作的它們背后共享連接或使用獨(dú)立連接。連接池的行為直接影響“為什么我改了數(shù)據(jù)但另一個(gè)查詢看不到”。常見(jiàn)做法是短連接場(chǎng)景開(kāi)池長(zhǎng)事務(wù)場(chǎng)景關(guān)池或顯式控制事務(wù)邊界。如果你在源碼里看到Pooling、MaxPoolSize這類屬性說(shuō)明它支持池化。池化的坑在于連接歸還時(shí)如果沒(méi)有回滾未提交事務(wù)下一個(gè)拿到該連接的人會(huì)看到臟數(shù)據(jù)。// 事務(wù)邊界要顯式別依賴組件自動(dòng)提交 Conn.StartTransaction; try Qry.SQL.Text : UPDATE t_smoke SET note :n WHERE id :id; Qry.ParamByName(n).AsString : updated; Qry.ParamByName(id).AsInteger : 1; Qry.ExecSQL; Conn.Commit; // 不 Commit池化連接歸還后事務(wù)仍掛著 except Conn.Rollback; raise; end;邏輯說(shuō)明StartTransaction和Commit/Rollback必須成對(duì)出現(xiàn)try...except保證異常時(shí)回滾。參數(shù)化查詢用ParamByName而不是拼字符串避免 SQL 注入和引號(hào)轉(zhuǎn)義問(wèn)題。如果你用池化又忘了回滾下一個(gè)請(qǐng)求可能讀到未提交數(shù)據(jù)這種問(wèn)題在測(cè)試環(huán)境很難復(fù)現(xiàn)因?yàn)椴l(fā)不夠。4. 避坑與排查連接失敗、亂碼、事務(wù)不生效4.1 現(xiàn)象連接報(bào)“Authentication plugin cannot be loaded”原因MySQL 8.0 用戶默認(rèn)用caching_sha2_password而老版本 MyDAC 客戶端庫(kù)只認(rèn)mysql_native_password。解決要么升級(jí) MyDAC 到支持新插件的版本要么在服務(wù)端執(zhí)行ALTER USER app_user% IDENTIFIED WITH mysql_native_password BY app_pass;。注意改插件后要FLUSH PRIVILEGES。這不是長(zhǎng)久之計(jì)但能讓你先把系統(tǒng)跑起來(lái)。4.2 現(xiàn)象中文存進(jìn)去變成問(wèn)號(hào)原因連接字符集沒(méi)設(shè)對(duì)或者表/列字符集不是utf8mb4。解決連接屬性里顯式設(shè)Charset : utf8mb4同時(shí)確認(rèn)表定義。如果源碼里字符集是硬編碼的latin1那就得改源碼或找配置項(xiàng)。排查時(shí)用SHOW VARIABLES LIKE character_set%;看服務(wù)端用SELECT HEX(note) FROM t_smoke;看實(shí)際存儲(chǔ)字節(jié)。4.3 現(xiàn)象更新后查詢看不到變化原因事務(wù)沒(méi)提交或者連接池復(fù)用了帶未提交事務(wù)的連接。解決檢查代碼里有沒(méi)有漏掉Commit如果用了池化在歸還連接前確保事務(wù)已結(jié)束?？梢栽跍y(cè)試時(shí)臨時(shí)關(guān)掉池化看問(wèn)題是否消失以此定位。4.4 現(xiàn)象編譯時(shí)報(bào)“Unit not found”原因源碼包的搜索路徑?jīng)]配全或者運(yùn)行期包沒(méi)先編譯。解決在 IDE 的 Library Path 里把Source下所有子目錄加進(jìn)去先編譯運(yùn)行期包再裝設(shè)計(jì)期包。如果還不行看報(bào)錯(cuò)的具體單元名去目錄里搜它在哪個(gè)子目錄單獨(dú)把那個(gè)目錄加進(jìn)搜索路徑。4.5 現(xiàn)象Demo 能跑自己的項(xiàng)目連不上原因Demo 用的連接參數(shù)和你的不同或者你的項(xiàng)目引用了不同版本的單元。解決把 Demo 的連接參數(shù)逐項(xiàng)抄過(guò)來(lái)先跑通再改。檢查項(xiàng)目里有沒(méi)有重復(fù)引用舊版單元Delphi 的單元搜索順序有時(shí)會(huì)讓人抓狂用Project Options Delphi Compiler Search Path確認(rèn)順序。5. 進(jìn)階用法從源碼里挖出可復(fù)用的連接管理技巧源碼包最大的價(jià)值不是“能用”而是“能改”。當(dāng)你把The Client層的連接建立流程讀一遍會(huì)發(fā)現(xiàn)它把“解析服務(wù)端能力位 → 選擇認(rèn)證方式 → 協(xié)商字符集 → 建立會(huì)話”拆得很清楚。你可以把這套流程抽出來(lái)做成自己的輕量連接工廠不依賴 IDE 組件方便在控制臺(tái)程序或服務(wù)里復(fù)用。我一般會(huì)先找連接類的Connect方法順著調(diào)用鏈看它做了哪幾件事然后寫一個(gè)最小復(fù)現(xiàn)把每一步的返回值打日志。這樣即使以后換組件排查思路還在。// 偽代碼把連接建立的關(guān)鍵節(jié)點(diǎn)打日志方便定位卡在哪一步 procedure TConnTrace.Connect; begin Log(1. resolve host); ResolveHost; Log(2. tcp connect); OpenSocket; Log(3. read handshake); ReadHandshake; Log(4. send auth); SendAuth; Log(5. read auth result); ReadAuthResult; Log(6. set charset); SetCharset; Log(connected); end;邏輯說(shuō)明這段偽代碼的重點(diǎn)是“分步日志”。真實(shí)源碼里這些步驟可能揉在一個(gè)方法里但你可以通過(guò)斷點(diǎn)或日志把它們分開(kāi)。參數(shù)上每一步的耗時(shí)和返回值都值得記錄尤其是ReadAuthResult返回的錯(cuò)誤碼。這樣下次再遇到連接問(wèn)題你一眼就能看出是網(wǎng)絡(luò)層、認(rèn)證層還是字符集層。另一個(gè)進(jìn)階點(diǎn)是連接池的健康檢查。池化連接放久了可能被服務(wù)端wait_timeout斷開(kāi)下次取出來(lái)用就報(bào)“MySQL server has gone away”。常見(jiàn)做法是在取出連接時(shí)先執(zhí)行一次輕量SELECT 1失敗就重建。這個(gè)邏輯如果源碼里沒(méi)有你可以自己在封裝層加。檢查項(xiàng)建議值說(shuō)明連接超時(shí)510 秒太短易誤判太長(zhǎng)卡界面命令超時(shí)30 秒按業(yè)務(wù)查詢復(fù)雜度調(diào)池大小520按并發(fā)量調(diào)別盲目開(kāi)大空閑回收60300 秒小于服務(wù)端 wait_timeout邏輯說(shuō)明這張表是我在多個(gè)項(xiàng)目里試出來(lái)的經(jīng)驗(yàn)值不是標(biāo)準(zhǔn)答案。連接超時(shí)設(shè)太短網(wǎng)絡(luò)抖動(dòng)就失敗池大小開(kāi)太大數(shù)據(jù)庫(kù)連接數(shù)爆掉?？臻e回收一定要小于服務(wù)端的wait_timeout否則池里全是死連接。最后說(shuō)一個(gè)我踩過(guò)的坑有次為了省事直接把源碼包里某個(gè)單元的初始化代碼復(fù)制到自己的項(xiàng)目結(jié)果它依賴另一個(gè)單元的全局變量編譯能過(guò)運(yùn)行時(shí)卻隨機(jī)崩潰。后來(lái)老老實(shí)實(shí)按依賴順序引單元問(wèn)題消失。所以讀源碼可以抄代碼要連依賴一起看。希望幫到你。本文還有配套的精品資源點(diǎn)擊獲取