標簽: delphi |
分類: Delphi10.2 |
FastReport本身支持二維碼,實際應用中遇到這樣的問題,用二維碼來顯示一個字段值,發現,二維碼顯示的大小會隨着字段值長度而變化,從而影響二維碼顯示的位置。同一字段,在一頁紙上顯示的大小不同。
在6.1.1版本中找到一個臨時解決辦法,利用腳本在運行期設置二維碼的Text屬性,二維碼的大小才固定下來:
這個腳本代碼:
procedure Barcode2D1OnBeforePrint(Sender: TfrxComponent);
begin
Barcode2D1.text:=<frxDBDataset1."FID">;
end;
procedure Barcode2D1OnBeforePrint(Sender: TfrxComponent);
begin
Barcode2D1.text:=<frxDBDataset1."FID">;
end;