這段時(shí)間陸續(xù)給兩三個(gè) Delphi 項(xiàng)目做了二維碼生成模塊需求都差不多離線狀態(tài)下錄入一串編號(hào)程序生成二維碼展示在界面上能保存成圖片文件歸檔。第一個(gè)項(xiàng)目我圖省事調(diào)了某個(gè)云接口把圖片拉回來(lái)結(jié)果部署環(huán)境沒(méi)外網(wǎng)項(xiàng)目差點(diǎn)延期。后面老老實(shí)實(shí)自己生成把整個(gè)流程跑通以后發(fā)現(xiàn)Delphi 里做這件事并不復(fù)雜難點(diǎn)反而在幾個(gè)容易被忽略的細(xì)節(jié)上——比如 PaintBox 繪制完以后怎么不閃保存時(shí)怎么保證掃得出來(lái)還有放到 Image 里顯示會(huì)不會(huì)莫名其妙被拉伸變形。這篇文章就把這套流程完整說(shuō)一遍從二維碼生成的原理、PaintBox 畫圖、保存 PNG再到 Image 控件加載顯示連帶我在項(xiàng)目里踩過(guò)的坑一起寫出來(lái)。適合正在用 Delphi 做桌面客戶端、需要在本地生成和展示二維碼的小伙伴也適合想搞懂二維碼生成底層概念再自己動(dòng)手寫的人。讀的時(shí)候可以開(kāi)著 IDE 跟著敲代碼片段都是可以直接粘進(jìn)項(xiàng)目的。1. 項(xiàng)目背景與需求拆解桌面端二維碼到底怎么用1.1 三種典型應(yīng)用場(chǎng)景二維碼在桌面程序里出現(xiàn)最多的場(chǎng)景我總結(jié)下來(lái)就三類。第一類是設(shè)備資產(chǎn)標(biāo)簽操作員錄入設(shè)備編號(hào)、型號(hào)、序列號(hào)程序生成二維碼要么直接打印到標(biāo)簽紙上要么導(dǎo)出圖片歸檔。第二類是授權(quán)激活常見(jiàn)于工業(yè)軟件或?qū)I(yè)工具程序在離線環(huán)境下根據(jù)授權(quán)碼生成二維碼用戶拿手機(jī) App 掃一下完成激活綁定這里數(shù)據(jù)完全不能出內(nèi)網(wǎng)。第三類是工序流轉(zhuǎn)產(chǎn)線操作員選擇工單號(hào)二維碼貼在物料流轉(zhuǎn)單上下一個(gè)工位掃碼讀取不需要額外的掃碼槍硬件手機(jī)就能頂上去。我做的某制造企業(yè) MES 客戶端就屬于第一類和第三類的結(jié)合體。操作員在界面上選中設(shè)備編號(hào)點(diǎn)擊按鈕之后二維碼立刻顯示在右側(cè)的 PaintBox 里同時(shí)保存成一個(gè) PNG 文件放到共享目錄最后在下方 Image 控件里再預(yù)顯一次。整個(gè)流程看起來(lái)簡(jiǎn)單但里面每一步都有選擇可以做錯(cuò)尤其是后面要講的繪制和顯示問(wèn)題。1.2 本地生成和外接接口怎么選做二維碼功能的第一道選擇題就是到底調(diào)用別人的接口還是自己本地生成。在線接口的優(yōu)勢(shì)很明顯代碼少圖片美觀人家還幫你處理了各種參數(shù)。但劣勢(shì)同樣明顯必須有外網(wǎng)、有接口限流、數(shù)據(jù)內(nèi)容會(huì)經(jīng)過(guò)第三方服務(wù)器這三條在工控和政企項(xiàng)目里通常都是硬傷。我第一版就是調(diào)接口開(kāi)發(fā)時(shí)一切正常到了客戶現(xiàn)場(chǎng)發(fā)現(xiàn)生產(chǎn)網(wǎng)段根本沒(méi)有外網(wǎng)所有二維碼都拉不回來(lái)。后來(lái)改成本地生成才意識(shí)到二維碼生成本身就是一個(gè)純計(jì)算過(guò)程不涉及 OCR、不涉及大模型普通 CPU 計(jì)算一個(gè) V40 的二維碼也就是幾十毫秒的事完全沒(méi)有必要依賴外部服務(wù)。所以我現(xiàn)在的建議很簡(jiǎn)單桌面程序里做二維碼默認(rèn)走本地生成除非你有批量生成幾萬(wàn)張并且需要統(tǒng)一模板設(shè)計(jì)的需求才考慮外部服務(wù)。1.3 為什么是 PaintBox Image 這個(gè)組合Delphi 的 VCL 里能顯示圖形的東西很多但 PaintBox 和 Image 是分工不同的兩個(gè)控件。TPaintBox 是輕量級(jí)繪圖控件它本身不保存圖像數(shù)據(jù)只是在 OnPaint 事件觸發(fā)時(shí)把內(nèi)容畫到 Canvas 上適合動(dòng)態(tài)計(jì)算出來(lái)的畫面。TImage 則是一個(gè)圖像容器有 Picture 屬性可以加載磁盤文件、TBitmap、TPngImage 等等適合靜態(tài)展示。不少人會(huì)偷懶直接在 TImage.Canvas 上畫二維碼我一開(kāi)始也這么干過(guò)結(jié)果窗體一縮放、一遮擋TImage 上的內(nèi)容就被系統(tǒng)擦掉了因?yàn)樗⒉回?fù)責(zé)持久化繪制內(nèi)容。用 PaintBox 就清楚很多數(shù)據(jù)變了就調(diào)用 Invalidate 觸發(fā)重繪OnPaint 里統(tǒng)一處理邏輯上是閉環(huán)的。而 TImage 用來(lái)做最終結(jié)果展示和文件預(yù)覽分工干凈利落。2. 二維碼生成的底層邏輯先把矩陣搞清楚2.1 二維碼本質(zhì)上是一張位圖矩陣?yán)斫饬说讓釉倏创a很多坑就能提前避開(kāi)。QR Code 這個(gè)東西表面上是一張黑白相間的方塊圖實(shí)際上是一個(gè)行列固定的布爾矩陣黑色模塊代表 1白色模塊代表 0。這個(gè)矩陣?yán)锛扔形覀冚斎氲臄?shù)據(jù)內(nèi)容也有定位圖形、校正圖形、時(shí)序圖形這些專門用于掃描定位的元素。所以二維碼生成庫(kù)的工作本質(zhì)就兩步一是把你的字符串編碼成符合 QR 規(guī)范的數(shù)據(jù)位流二是在內(nèi)存里拼出一個(gè) rows * columns 的二維布爾數(shù)組。繪制環(huán)節(jié)完全不需要關(guān)心里面的編碼細(xì)節(jié)只需要拿著這個(gè)布爾數(shù)組把每個(gè)為 true 的格子畫成一個(gè)帶顏色的矩形就得到了肉眼可見(jiàn)的二維碼。這也是為什么 PaintBox 很適合做這件事它的 Canvas 畫矩形是基本操作。2.2 生成器在中間做了四件事如果你用封裝好的庫(kù)這些事都是透明的但知道一下沒(méi)有壞處至少調(diào)試的時(shí)候不會(huì)瞎猜。第一件事是數(shù)據(jù)分析檢查待編碼內(nèi)容屬于純數(shù)字、字母數(shù)字、字節(jié)還是漢字模式選擇最緊湊的編碼方式。第二件事是數(shù)據(jù)編碼把內(nèi)容變成比特流加入模式指示符、字符計(jì)數(shù)符和終止符。第三件事是生成糾錯(cuò)碼這里用的是 Reed-Solomon 算法把原始數(shù)據(jù)按照設(shè)定的糾錯(cuò)級(jí)別拆塊每塊生成糾錯(cuò)碼這樣二維碼局部被遮擋或污損時(shí)依然能解出來(lái)。第四件事是把數(shù)據(jù)碼和糾錯(cuò)碼按規(guī)則填入矩陣再執(zhí)行掩碼運(yùn)算并寫入版本信息和格式信息。掩碼這一步可能很多人不知道它的目的不是加密而是讓生成出來(lái)的二維碼黑色模塊分布盡量均勻避免出現(xiàn)大面積的空白或密集方塊導(dǎo)致掃描器無(wú)法定位。整個(gè)過(guò)程標(biāo)準(zhǔn)文檔寫了幾十頁(yè)但你完全不需要自己實(shí)現(xiàn)開(kāi)源社區(qū)早就把這塊固化成穩(wěn)定的庫(kù)了。2.3 版本、糾錯(cuò)級(jí)別和參數(shù)選擇二維碼版本從 1 到 40版本越高矩陣越大容量越大。V1 是 21x21 的模塊每增加一個(gè)版本矩陣一邊增加 4 個(gè)模塊到 V40 是 177x177。同一個(gè)版本下容量還受糾錯(cuò)級(jí)別影響。糾錯(cuò)級(jí)別分 L、M、Q、H分別能容忍約 7%、15%、25%、30% 的碼字損壞。級(jí)別越高能存的有效內(nèi)容越少但抗污損能力越強(qiáng)。我的經(jīng)驗(yàn)是普通業(yè)務(wù)場(chǎng)景選 M 級(jí)別就夠內(nèi)容比較短的比如鏈接、編號(hào)直接用 H 也不會(huì)虧。但是要注意內(nèi)容長(zhǎng)度決定版本號(hào)版本越高矩陣越大如果顯示尺寸固定高版本的每個(gè)模塊像素就越小掃碼設(shè)備識(shí)別難度會(huì)上升。所以不要盲目追求大容量能短則短。另外還有一個(gè)參數(shù)容易被忽略就是靜區(qū)也就是二維碼周圍一圈空白的寬度。規(guī)范要求至少 4 個(gè)模塊寬實(shí)際測(cè)試下來(lái)少于這個(gè)值手機(jī)還能掃但工業(yè)掃碼槍很容易翻車。這個(gè)參數(shù)后面繪制和保存時(shí)會(huì)反復(fù)用到。3. 核心實(shí)現(xiàn)PaintBox 上把二維碼畫出來(lái)3.1 生成庫(kù)的選型和引入Delphi 生態(tài)里現(xiàn)成的二維碼生成方案不算多但有一款基于 ZXing 移植的開(kāi)源庫(kù)相當(dāng)能打純 Delphi 實(shí)現(xiàn)沒(méi)有第三方動(dòng)態(tài)庫(kù)依賴可以在舊版本的 Delphi 里直接用。市面上還有 Delphi XE 自帶的某些組件以及各種個(gè)人封裝的單元但對(duì)比下來(lái)ZXing 移植版勝在編碼規(guī)范、支持多版本多糾錯(cuò)級(jí)別、矩陣輸出接口清晰非常適合我們把繪制邏輯自己做一遍。引入方式很簡(jiǎn)單下載源碼后把相關(guān)單元所在目錄加入 Project Manager 里的 Search Path 就行然后在你自己的單元 uses 里加上聲明。整個(gè)過(guò)程不裝包、不注冊(cè)組件和寫普通代碼完全一樣。我建議不要用那種直接把整張二維碼圖片生成好的重量級(jí)封裝因?yàn)轫?xiàng)目里后續(xù)需求往往會(huì)有變動(dòng)比如加 Logo、改靜區(qū)尺寸、只生成矩陣自己排版打印矩陣輸出的接口比圖片輸出接口好用得多。3.2 從字符串到矩陣再到 Canvas核心代碼看下面這段。首先生成器對(duì)象設(shè)置 Data 為要編碼的內(nèi)容Encoding 用字節(jié)模式這樣中文和特殊字符都能按 UTF-8 正確處理。QuietZone 設(shè)置為 4對(duì)應(yīng)靜區(qū) 4 個(gè)模塊。ErrorCorrectionLevel 這里設(shè)成 1表示 M 級(jí)糾錯(cuò)。隨后遍歷矩陣所有 IsBlack 為 true 的格子都畫成黑色矩形。type TFormQRCode class(TForm) PaintBox1: TPaintBox; btnGenerate: TButton; procedure btnGenerateClick(Sender: TObject); procedure FormCreate(Sender: TObject); private QRCore: TDelphiZXingQRCode; public procedure DrawMatrix(PBox: TPaintBox); end; implementation procedure TFormQRCode.FormCreate(Sender: TObject); begin QRCore : TDelphiZXingQRCode.Create; end; procedure TFormQRCode.btnGenerateClick(Sender: TObject); begin QRCore.Data : edtContent.Text; QRCore.Encoding : TQRCodeEncoding.qrEncodingByte; QRCore.QuietZone : 4; QRCore.ErrorCorrectionLevel : 1; PaintBox1.Invalidate; end; procedure TFormQRCode.DrawMatrix(PBox: TPaintBox); var Row, Col: Integer; ModuleSize, Margin: Integer; DrawWidth, DrawHeight: Integer; X, Y: Integer; begin ModuleSize : 8; Margin : ModuleSize * QRCore.QuietZone; DrawWidth : QRCore.Columns * ModuleSize Margin * 2; DrawHeight : QRCore.Rows * ModuleSize Margin * 2; PBox.Canvas.Brush.Color : clWhite; PBox.Canvas.FillRect(Rect(0, 0, DrawWidth, DrawHeight)); PBox.Canvas.Brush.Color : clBlack; for Row : 0 to QRCore.Rows - 1 do begin for Col : 0 to QRCore.Columns - 1 do begin if QRCore.IsBlack[Row, Col] then begin X : Margin Col * ModuleSize; Y : Margin Row * ModuleSize; PBox.Canvas.FillRect(Rect(X, Y, X ModuleSize, Y ModuleSize)); end; end; end; PBox.Width : DrawWidth; PBox.Height : DrawHeight; end;這段代碼里最關(guān)鍵的一個(gè)點(diǎn)就是繪制尺寸的計(jì)算。很多人直接把 PaintBox 撐滿整個(gè)窗體然后從左上角開(kāi)始畫結(jié)果二維碼擠在角落靜區(qū)也沒(méi)有掃起來(lái)特別費(fèi)勁。正確的做法是先根據(jù)矩陣列數(shù)和模塊尺寸算出總寬度再把整個(gè)繪制邏輯和 PaintBox 的寬高綁定。這樣無(wú)論內(nèi)容長(zhǎng)短、版本高低二維碼都能居中占滿控件且四周留有標(biāo)準(zhǔn)的白邊。3.3 繪制參數(shù)調(diào)試模塊尺寸與靜區(qū)模塊尺寸選多大取決于二維碼最終要在哪看。如果只是在屏幕上展示模塊尺寸 6 到 8 像素很合適畫面干凈。如果還要打印到小標(biāo)簽上那模塊尺寸建議按打印分辨率換算通常至少 4 個(gè)打印像素。模塊尺寸過(guò)小的直接后果是模塊與模塊之間幾乎沒(méi)有間隔黑白邊緣容易被打印機(jī)糊成一團(tuán)。靜區(qū)在上面的代碼里由 QRCore.QuietZone 參數(shù)控制我固定設(shè)為 4。這里要提醒一點(diǎn)如果你自己實(shí)現(xiàn)繪制不要只在矩陣外邊留幾個(gè)像素就算靜區(qū)必須按模塊尺寸乘以靜區(qū)模塊數(shù)來(lái)計(jì)算。還有顏色選擇我堅(jiān)持用純黑和純白不要為了 UI 美觀把前景改成深藍(lán)、深綠很多掃碼引擎對(duì)非標(biāo)準(zhǔn)黑色邊緣的容錯(cuò)很差尤其是低端掃碼槍。如果想要“彩色二維碼”的效果更穩(wěn)妥的做法是先保存黑白底圖再通過(guò)位圖后處理給白色區(qū)域染色黑色模塊保持不動(dòng)。4. 保存本地文件并加載到 Image 控件4.1 為什么要繞一層文件操作有朋友問(wèn)既然已經(jīng)畫在 PaintBox 上了直接 Image1.Picture.Assign(PaintBox1.Canvas) 這種思路行不行答案是不行Canva 不是圖形對(duì)象不能直接賦值給 Picture。另外標(biāo)題里的需求本來(lái)就要求“保存為本地文件并添加至 Image 控件中”這個(gè)文件是要拿來(lái)歸檔、打印、上傳服務(wù)端的不是臨時(shí)展示用。所以正確的鏈路是PaintBox 繪制完成后把它 Canvas 上的內(nèi)容拷貝到一個(gè) TBitmap再由 TBitmap 轉(zhuǎn)成 TPngImage 保存成磁盤文件。保存完之后Image 控件再?gòu)拇疟P加載這個(gè) PNG。這樣文件有了展示也有了后面想對(duì)這個(gè)文件做二次處理比如加水印、壓縮、合并都有明確的操作對(duì)象。4.2 保存為 PNG 的具體實(shí)現(xiàn)下面的代碼把 PaintBox 的內(nèi)容拷貝到一個(gè) 24 位色的 Bitmap然后轉(zhuǎn)成 PNG 保存。注意拷貝之前一定要確保 PaintBox 已經(jīng)完成了一次完整的重繪否則 Canvas 上可能是舊數(shù)據(jù)或者空白。我習(xí)慣在生成函數(shù)里顯式調(diào)用一下 PaintBox1.Update()強(qiáng)制刷新整個(gè)窗口消息隊(duì)列確保畫布內(nèi)容落定。uses System.SysUtils, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.ExtCtrls, Vcl.Imaging.pngimage; procedure SavePaintBoxToPng(PBox: TPaintBox; const AFileName: string); var Bmp: TBitmap; Png: TPngImage; W, H: Integer; begin W : PBox.Width; H : PBox.Height; if (W 0) or (H 0) then Exit; Bmp : TBitmap.Create; try Bmp.Width : W; Bmp.Height : H; Bmp.PixelFormat : pf24bit; Bmp.Canvas.Brush.Color : clWhite; Bmp.Canvas.FillRect(Rect(0, 0, W, H)); Bmp.Canvas.CopyRect( Rect(0, 0, W, H), PBox.Canvas, PBox.ClientRect); Png : TPngImage.Create; try Png.Assign(Bmp); Png.SaveToFile(AFileName); finally Png.Free; end; finally Bmp.Free; end; end;為什么不直接存 BMP 而轉(zhuǎn)成 PNG因?yàn)?PNG 是無(wú)損壓縮白底黑字的二維碼壓縮率極高存出來(lái)可能只有幾 KB而 BMP 一張 300x300 的圖就有二百多 KB。還有一點(diǎn)PNG 自帶 alpha 通道和像素格式信息后續(xù)如果用其他平臺(tái)處理兼容性比 BMP 好太多。JPG 格式我是強(qiáng)烈不建議用的JPG 是有損壓縮黑色模塊邊緣會(huì)出現(xiàn)顏色擴(kuò)散和模糊一旦模塊較小掃碼識(shí)別率斷崖式下降后面講踩坑會(huì)細(xì)說(shuō)。4.3 Image 控件顯示參數(shù)設(shè)置與優(yōu)化文件保存好之后加載進(jìn) Image 很簡(jiǎn)單一行代碼Image1.Picture.LoadFromFile(AFileName);但這里有個(gè)新手高頻問(wèn)題加載進(jìn)去之后顯示只露出左上角一小塊二維碼其他部分都是空白。原因很簡(jiǎn)單TImage 控件的 Stretch 屬性默認(rèn)是 FalsePicture 多大它就按原始像素尺寸顯示如果控件比圖片小內(nèi)容就會(huì)被裁剪。解決辦法是把 Stretch 設(shè)為 TrueProportional 設(shè)為 TrueAutoSize 保持 False。Stretch True圖片自動(dòng)縮放填滿控件區(qū)域。Proportional True縮放時(shí)保持寬高比不會(huì)把二維碼壓扁。Center True縮放后如果還有留白讓圖片居中。這三個(gè)屬性配合起來(lái)不管 Image 控件在窗體里被拉大還是縮小二維碼始終保持正方形且居中顯示。如果你想把二維碼放大預(yù)覽按鈕里動(dòng)態(tài)設(shè)置 Image1.Width 和 Height 就行不需要重新生成文件。5. 我踩過(guò)的坑與排查速查5.1 繪制閃爍問(wèn)題第一次把繪制代碼塞進(jìn) OnPaint 之后每次鼠標(biāo)劃過(guò)窗體二維碼區(qū)域就瘋狂閃爍。原因是 PaintBox 背景先被清成白色再畫黑色模塊重繪頻率高的時(shí)候人眼就能捕捉到閃爍。解決方案有兩個(gè)一是 Form 的 DoubleBuffered 屬性設(shè)為 True讓 VCL 在內(nèi)存畫布上完成整套繪制后再一次性復(fù)制到屏幕二是減少不必要的重繪只有數(shù)據(jù)改變或控件尺寸改變時(shí)才調(diào)用 Invalidate。最穩(wěn)的做法是把繪制邏輯封裝成一個(gè)獨(dú)立函數(shù)按鈕點(diǎn)擊時(shí)設(shè)置矩陣數(shù)據(jù)、計(jì)算新尺寸最后才 Invalidate。不要在 OnPaint 里去讀取 Edit 框內(nèi)容、去請(qǐng)求網(wǎng)絡(luò)、去做 IO 操作。VCL 的繪制事件頻率遠(yuǎn)比你想象的高窗口遮擋恢復(fù)、窗體拖動(dòng)、最小化還原都會(huì)觸發(fā)干重活會(huì)導(dǎo)致界面明顯卡頓。還有一個(gè)小技巧如果某個(gè)界面里二維碼和其他控件布局比較復(fù)雜可以把 PaintBox 的 Enabled 設(shè)為 False。這樣它不響應(yīng)鼠標(biāo)交互從根本上減少無(wú)意義的刷新。5.2 DPI 縮放導(dǎo)致的鋸齒和虛化高 DPI 屏幕上VCL 窗體如果啟用了縮放控件會(huì)被整體放大。這時(shí) PaintBox 的 Width、Height 是物理像素還是邏輯像素會(huì)直接影響繪制清晰度。我遇到過(guò) 150% 縮放下模塊邊緣出現(xiàn)灰邊、掃碼時(shí)識(shí)錯(cuò)的情況原因是繪制時(shí)用了物理 Canvas但坐標(biāo)計(jì)算基于邏輯尺寸黑色矩形被系統(tǒng)插值拉伸邊緣就虛了。解決思路是按當(dāng)前 PixelsPerInch 動(dòng)態(tài)調(diào)整 ModuleSize保證每個(gè)模塊的物理寬度是一個(gè)整數(shù)。簡(jiǎn)單實(shí)現(xiàn)就是在繪制前讀取 Form 的 PixelsPerInch 和設(shè)計(jì)時(shí)基準(zhǔn)值換算出實(shí)際模塊尺寸。另外保存文件的過(guò)程不受屏幕影響因?yàn)?Bitmap 尺寸完全由我們自己指定和屏幕分辨率無(wú)關(guān)。所以我建議屏幕展示圖稍虛沒(méi)關(guān)系保存出去的 PNG 一定要按固定邏輯尺寸生成保證掃描穩(wěn)定。5.3 保存出來(lái)的圖片掃不出來(lái)這個(gè)坑最隱蔽曾經(jīng)讓我排查了一個(gè)下午?，F(xiàn)象是 PaintBox 上掃碼正常保存成 PNG 后手機(jī)能掃但工業(yè)掃碼槍怎么都掃不到。后面對(duì)比兩張圖發(fā)現(xiàn)PaintBox 上顯示時(shí)周圍有空白的窗體背景實(shí)際上發(fā)揮了靜區(qū)作用而保存出來(lái)的 PNG 因?yàn)槔L制時(shí) Margin 設(shè)置為 0黑白矩陣貼邊生成掃碼槍讀不了。處理辦法就是本文前面反復(fù)提到的靜區(qū)參數(shù)QuietZone 至少 4保存時(shí)最外層 4 圈模塊寬度必須是空白。另外一個(gè)導(dǎo)致掃不出來(lái)的原因是保存尺寸太小如果二維碼是 V10 以上的版本模塊數(shù)量多但你把圖片整體壓到 100x100 像素那每個(gè)模塊平均只有不到 3 像素很多掃碼引擎直接放棄。我通常保證最終保存的圖片邊長(zhǎng)不低于 400 像素模塊尺寸不小于 6 像素。5.4 二次加載與文件占用問(wèn)題有業(yè)務(wù)需求是保存后立即把文件刪掉只讓圖片保留在 Image 控件里。實(shí)際操作時(shí)發(fā)現(xiàn)LoadFromFile 之后立刻 DeleteFile 會(huì)失敗有一部分原因是殺毒軟件還在掃描文件另一部分是 Image 控件內(nèi)部還沒(méi)有完全釋放文件句柄。穩(wěn)妥做法是先用 Try 包裝刪除確認(rèn)延遲幾百毫秒如果真的必須馬上刪可以先把 Picture 保存到內(nèi)存里的 TBitmap再加載到 Image之后刪除文件就毫無(wú)障礙。另外一個(gè)相關(guān)問(wèn)題是PaintBox 繪制的二維碼在窗體最小化再恢復(fù)之后OnPaint 觸發(fā)時(shí)會(huì)重新繪制這個(gè)前提下代碼里必須保證矩陣對(duì)象還在或者至少數(shù)據(jù)源還在。我見(jiàn)過(guò)有人直接把循環(huán)畫在 FormCreate 里結(jié)果窗口一刷新二維碼就消失了。正確做法是把矩陣生成結(jié)果緩存成一個(gè)字段OnPaint 只做繪制。5.5 常見(jiàn)問(wèn)題速查表問(wèn)題現(xiàn)象可能原因解決辦法二維碼繪制區(qū)域閃爍PaintBox 頻繁重繪未開(kāi)雙緩沖Form.DoubleBuffered : True數(shù)據(jù)變化再 Invalidate高 DPI 下邊緣虛化邏輯尺寸與物理像素不匹配動(dòng)態(tài)調(diào)整 ModuleSize用整數(shù)像素繪制保存后掃碼槍識(shí)別失敗靜區(qū)不足或模塊太小QuietZone 設(shè)為 4圖片邊長(zhǎng)不低于 400 像素JPG 保存后無(wú)法掃描有損壓縮導(dǎo)致模塊邊緣模糊改用 PNG 保存Image 控件只顯示一角Stretch 為 False設(shè)置 Stretch / Proportional / Center 為 True窗體恢復(fù)后二維碼消失繪制邏輯不在 OnPaint 里緩存矩陣在 OnPaint 中統(tǒng)一繪制DeleteFile 刪除失敗圖片文件句柄未釋放加載到內(nèi)存后再刪除或延遲刪除內(nèi)容包含中文掃出來(lái)亂碼編碼模式或字符集不一致Encoding 使用字節(jié)模式UTF-8掃碼端約定一致6. 擴(kuò)展從“能掃出來(lái)”到“掃得快、不翻車”6.1 給二維碼加 Logo 的注意事項(xiàng)很多客戶會(huì)要求在二維碼中間放一個(gè)企業(yè) Logo外觀上確實(shí)更有辨識(shí)度。實(shí)現(xiàn)上并不復(fù)雜在生成好的 Bitmap 正中央把 Logo 圖片按比例縮小后繪制上去。但核心問(wèn)題是Logo 區(qū)域會(huì)遮擋一部分矩陣模塊QR 碼的 Reed-Solomon 糾錯(cuò)能力能扛住一定程度的遮擋H 級(jí)別最高可以容忍約 30% 的碼字損壞。所以加 Logo 時(shí)必須把糾錯(cuò)級(jí)別提升到 H設(shè)置 ErrorCorrectionLevel 為 3。Logo 尺寸建議不要超過(guò)二維碼邊長(zhǎng)的四分之一也就是中心 1/4 區(qū)域內(nèi)的遮擋會(huì)被糾錯(cuò)抵消。還有一個(gè)小細(xì)節(jié)Logo 圖案最好不要帶大面積的純黑或純白背景尤其是不能帶有與黑色模塊相似的規(guī)則紋理否則掃描器會(huì)誤判為數(shù)據(jù)模塊。我一般會(huì)把 Logo 周圍留一圈白邊再放到二維碼上。6.2 批量生成與文件命名策略如果業(yè)務(wù)上要一次生成幾十上百個(gè)二維碼循環(huán)調(diào)用生成庫(kù)即可每個(gè)二維碼生成計(jì)算量很小不需要額外開(kāi)線程。但文件命名和日志管理值得提前規(guī)劃。我習(xí)慣用“前綴 日期 業(yè)務(wù)ID 隨機(jī)短碼”的方式比如 DEV20250615-0001-X7K3.png這樣歸檔時(shí)按前綴分類、按日期檢索、按業(yè)務(wù)ID關(guān)聯(lián)非常清晰。批量場(chǎng)景還有一個(gè)常見(jiàn)需求是連同二維碼一起導(dǎo)出 Excel 或 SQLite 記錄表生成后把文件名、內(nèi)容、生成時(shí)間、版本、糾錯(cuò)級(jí)別一并記錄。千萬(wàn)不要在文件名里放中文和特殊符號(hào)有些共享目錄和打印系統(tǒng)的編碼處理很弱極易出錯(cuò)。文件名里的信息越少越穩(wěn)真正的內(nèi)容全部放在關(guān)聯(lián)表里。6.3 二維碼內(nèi)容協(xié)議與數(shù)據(jù)安全二維碼能承載的內(nèi)容有限但很多人會(huì)往里塞一長(zhǎng)串 JSON結(jié)果版本飆到 V20 以上掃碼變慢打印變小純屬自找麻煩。我建議在系統(tǒng)設(shè)計(jì)階段就約定一個(gè)緊湊的內(nèi)容協(xié)議比如DEV|SN20250615|A1B2C3這種管道符分隔格式掃描端按固定順序拆分即可。如果是 URL就盡量用短鏈接服務(wù)或者干脆放一個(gè)跳轉(zhuǎn)參數(shù)別把完整參數(shù)往二維碼里塞。涉及敏感信息時(shí)直接在二維碼里放明文不可取。二維碼本身沒(méi)有任何加密能力貼在產(chǎn)品標(biāo)簽上誰(shuí)都能掃。要保護(hù)的內(nèi)容先做加密再編碼例如用 AES 加密后轉(zhuǎn) Base64掃描端再反向解密。如果項(xiàng)目允許離線驗(yàn)簽可以在內(nèi)容尾部加一段 HMAC 簽名掃碼后校驗(yàn)簽名確認(rèn)數(shù)據(jù)未被篡改。這些內(nèi)容看起來(lái)超出“畫二維碼”的范疇但實(shí)際項(xiàng)目里往往和二維碼功能綁定出現(xiàn)提前設(shè)計(jì)能省掉后面改協(xié)議的痛苦。我自己在實(shí)際項(xiàng)目里踩得最慘的一次就是把二維碼當(dāng)成普通圖片處理最后因?yàn)楦袷胶挽o區(qū)問(wèn)題耽誤了上線。以后的習(xí)慣是內(nèi)容先定協(xié)議生成用矩陣接口繪制時(shí)算好模塊尺寸和靜區(qū)保存永遠(yuǎn)走 PNG顯示用 Image 的三件套屬性。這套流程順下來(lái)不管是畫在 PaintBox、保存到本地文件、加載到 Image 控件還是后續(xù)加 Logo、批量導(dǎo)出、加密簽名都只是在這個(gè)骨架上加?xùn)|西而已。