如何使用 Delphi/Lazarus 代码在 FastReport VCL 中生成二维码?

FastReport VCL是用于在软件中集成商务智能的现代解决方案。它提供了可视化模板设计器,可以访问最受欢迎的数据源,报告引擎,预览,将过滤器导出为30多种格式,并可以部署到云,Web,电子邮件和打印中。

FastReport VCL最新版下载

近年来,二维码已经贯穿于我们日常生活。它们是一种二维条码,可以很容易地被数字设备读取,并以一系列像素的形式存储信息。它们已被广泛用于贸易、物流和生产领域。

与简单的条形码不同,二维码支持水平和垂直读取,因此,它们可以存储更多的数据。二维码的易识别性和易用性决定了它们的受欢迎程度。使用 FastReport VCL,您可以轻松地在报告中使用 QR 码。接下来我们一起来看看示例。

启动报告生成器设计器。从 "条形码对象 "工具的弹出菜单中选择 "QRCode "组件。

添加到页面后,QRCode 将如下图所示:

双击它来打开二维条码编辑器。这也可以从上下文菜单中选择 "编辑 "项来完成:

下方展示的是条形码编辑器:

接下来我们看看它的主要功能:


1. 在“常规”选项卡中,您可以更改条码的大小、添加签名或旋转条码。
2. 在“其他选项”选项卡上:

  • 如果 CodePage <> 0 - 使用 ECI 模式;
  • 您可以在 Encoding 属性中选择文本编码;
  • ErrorLevels属性确保了冗余度,以便正确读取有部分损坏的代码图像的数据。
  • QuietZone 检测二维码是否有白框。

3. 在表达式编辑器的“代码”行中,您可以:

  • 访问数据源字段;
  • 使用系统变量;
  • 使用各种功能

在“ExpressionPreset”对象属性中,您可以根据瑞士代码的规范选择生成收据的预设 :

您可以生成各种类型的二维码,因此您需要指定一个特定格式的字符串并在 Text 属性中进行设置。
我们可以通过条形码和数据的示例看看这些类型:
URI是统一资源标识符。它是一个字符串,用于标识各种文件、文档、图像、电子邮件、Web 服务等:

电子邮件 地址 - 电子邮件地址:

EmailMessage  – 电子邮件文本:

MATMSG:TO:support@fast-report.com;SUB:FastReport VCL 问题;BODY:你好,我有一个关于 FastReport VCL 的问题。
地理位置 ——真实地理位置的坐标:

地理位置:-50.737563,-79.490016,120


短信 - 短信:

SMSTO:(71)555-4444:你好,多莉!我很好!


致电- 电话号码:

Wi  -fi – 连接到 wi-fi 的信息:

接下来让我们从Delphi/Lazarus代码中创建一个二维码。

uses frxBarcode2D;
procedure TForm1.Button1Click(Sender: TObject);
var
 bcQR: TfrxBarcode2DView;
begin
 bcQR := TfrxBarcode2DView(frxReport1.FindObject('Barcode2D1'));
 { Set the barcode type }
 bcQR.BarType := bcCodeQR;
 
 { Depending on the type you want to use, you need to }
 { leave one line that assigns the text of a certain format }
 
 { If you want to set url type: }
 bcQR.Text := 'https://www.fast-report.com/en/';
 
 { If you want to set EmailAddress type: }
 bcQR.Text := 'support@fast-report.com';
 
 { If you want to set EmailMessage type: }
 bcQR.Text :=
 'MATMSG:TO:support@fast-report.com;SUB:FastReport VCL question;BODY:Hello, I have a question about FastReport VCL.;';
 
 { If you want to set Geolocation type: }
 bcQR.Text := 'geo:-50.737563,-79.490016,120';
 
 { If you want to set SMS type: }
 bcQR.Text := 'SMSTO:(71) 555-4444:Hello, Dolly! I'' m fine ! ';
 
 { If you want to set Call type: }
 bcQR.Text := 'tel:(71) 555-4444';
 
 { If you want to set Wi-Fi type: }
 bcQR.Text := 'WIFI:T:WPA;S:Honeypot;P:youarewelcome;H:true;';
 frxReport1.ShowReport();
end;

通过上文我们了解到如何在 FastReport VCL 中使用二维码。这个组件为在现代工作流程中使用这个报告生成器带来了更多可能性。

更多产品授权信息点击查看FastReport VCL价格,或者咨询慧都在线客服。

FastReport技术QQ群:536197826      欢迎进群一起讨论

  • 0
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值