解决方案 »
- 多个控件问题
- 多少DELPHI人在学JAVA?
- 如何捕捉特定的窗口,让其关闭。
- 求SQL语句(sql server数据库),关于查询日期问题.adoquery.sql.add('select 数量 from table where 日期= '+datetostr(date));为什么查不
- 请问如何在系统关闭菜单按钮事件中执行代码?
- 请问这样的字符串替换应该怎么做?谢谢。
- Dll编程及使用!!!!
- 请问各位高手一个特菜的问题:计算机的reset电路的工作原理?
- 谁有delphi中进行数据库导入和导出的代码,帮帮忙!50分!!
- 字符串变量之间赋值时,是重新拷贝一块内存还是仅仅传递指针?
- 如何在程序中建立Firebird嵌入版数据库?
- fastreport2.52重要问题,请大家解决
http://www.cnblogs.com/FastReport/archive/2012/11/30/2796216.html
2、安装成功以后,在delphi工具栏下面有一个toolbox菜单,下面有一个二维码控件。
3、然后在你的报表form窗体拖拽一个二维码控件。
4、在数据集的adoquery的AfterScroll事件里面进行写代码,动态赋值,如下面代码,其中的 ppImage1.Picture.Bitmap这个是我的reportbuilder报表文件上面的一个imge图片控件,FastReport控件可以用同样的方式实现。 QRCode1.Pxmag := 1;
QRCode1.Match := true;
QRCode1.Code:=adoquery1.fieldbyname('QRCODE').AsString;
ppImage1.Picture.Bitmap:=QRCode1.Picture.Bitmap;
tfrxpictureview(frxreport1.FindObject('picture1')).Picture.Assign(QRCode1.Picture.Bitmap);Good luck for you!