Qt连接MySql并增加表数据,删除数据工程文件包,下载解压直接导入到Qt 中编译即可。
2023-05-16 22:21:51 5KB Qt
1
{ 工作中遇到这样的需求,苦苦找不到相关的代码,找到一个还是收费的!:( 本着共享互惠的精神,本人简单实现了一个 FastReport 打印二维码的应用。 使用方法非常简单,将压缩包中的 frx2DBarcode 单元添加到引用即可在报表设计中看到 2D 条码对象,进行设计、打印。 目前仅实现了 QRCcode 的打印,抛砖引玉,相信增加 PDF417,DM 编码应该不会太难。 如果对源代码做了改进和修改欢迎 EMAIL 给我一份,学习一下! 邮件: JulyXDay@QQ.COM 谢谢支持! } {******************************************} { } { FastReport v4.0 } { 2DBarcode object } { } { Copyright (c) 2012 } { by LiKejian } { QQ 39839655 } { } {******************************************} unit frx2DBarcode; interface {$I frx.inc} uses Windows, Messages, SysUtils, Classes, Graphics, frxClass {$IFDEF Delphi6} , Variants {$ENDIF}; type TfrxBarcode2DObject = class(TComponent); // fake component TfrxBarcode2DView = class(TfrxView) private FEccLevel: SmallInt; FModule: SmallInt; FVersion: SmallInt; FText: String; FExpression: String; public constructor Create(AOwner: TComponent); override; procedure Draw(Canvas: TCanvas; ScaleX, ScaleY, OffsetX, OffsetY: Extended); override; class function GetDescription: String; override; procedure GetData; override; published property Version: SmallInt read FVersion write FVersion default 0; property EccLevel: SmallInt read FEccLevel write FEccLevel default 0; property Module: SmallInt read FModule write FModule default 0; property DataField; property DataSet; property DataSetName; property Expression: String read FExpression write FExpression; property Frame; property Text: String read FText write FText; end; implementation uses frx2DBarcodeRTTI, frxDsgnIntf, frxRes, frxUtils, uQRCode; constructor TfrxBarcode2DView.Create(AOwner: TComponent); begin inherited; end; class function TfrxBarcode2DView.GetDescription: String; begin Result := '2D 条形码对象'; end; procedure TfrxBarcode2DView.Draw(Canvas: TCanvas; ScaleX, ScaleY, OffsetX, OffsetY: Extended); const sFileName = 'QRCode.bmp'; var oBmp: TBitmap; begin BeginDraw(Canvas, ScaleX, ScaleY, OffsetX, OffsetY); //Create 2D Barcode CreateQRCode(FText, FVersion, FEccLevel, FModule); if FileExists(sFileName) then begin oBmp := TBitmap.Create; oBmp.LoadFromFile(sFileName); frxDrawGraphic(Canvas, Rect(FX, FY, FX1, FY1), oBmp, IsPrinting, False, False, 0); FreeAndNil(oBmp); end; DrawFrame; end; procedure TfrxBarcode2DView.GetData; begin inherited; if IsDataField then FText := VarToStr(DataSet.Value[DataField]) else if FExpression <> '' then FText := VarToStr(Report.Calc(FExpression)); end; initialization frxObjects.RegisterObject1(TfrxBarcode2DView, nil, '', '', 0, 23); finalization frxObjects.UnRegister(TfrxBarcode2DView); end.
2023-05-05 09:10:37 281KB 二维码 FastReport
1
在word中根据表头动态增加表格行,然后把数据中数据中写入表格中。
2023-04-18 15:38:50 12KB c# word
1
华三交换机增加或删除路由条目——自动化实现python脚本
2023-04-17 13:06:04 64KB python H3C netconf
1
delphi2007之前支持PNG格式图片
2023-04-14 14:47:26 285KB DELPHI TImage TPNGImage
1
范例使用SuperMap iClient for JavaScript开发模式,实现地物编辑时,弹窗增加属性值等实用功能。
2023-04-13 23:44:56 424KB SuperMap JavaScript 地物编辑
1
基于TP5.1开发的小程序源码带后台商城源码程序【带详细安装使用文档】,修复增加小程序前端,市面上很多没有小程序源码,这款修复版增加小程序前端源码。 ThinkPHP 5.1框架全开源商城小程序源码,代替了手机端的APP电脑端的独立网站。无需下载,触手可及。 1、源码部署自己服务器,全部数据自己掌握; 2、持续更新升级; 3、支持后台修改小程序端同步生效; 4、带安装搭建教程,同步更新; 5、支持自定义个人中心部分功能; 6、支持小程序内页DIY; 7、支持PC端宣传网站版权自定义; 8、支持商家管理手机端。
2023-04-12 19:25:01 14.69MB thinkphp 软件/插件 小程序 前端
1
Vue.js通过简洁的API提供高效的数据绑定和灵活的组件系统。在前端纷繁复杂的生态中,Vue.js有幸受到一定程度的关注,下面这篇文章主要给介绍了Vue.js实现表格动态增加删除的方法实例,文末提供了源码下载,需要的朋友可以参考借鉴。
2023-04-12 16:24:55 47KB vue.js 表格 vue.js 动态增加属性
1
本文介绍了在Linux系统中增加Swap分区文件步骤方法:首先检查当前的分区情况,然后增加交换分区文件及大小,最后启用交换分区文件。
2023-04-12 15:30:05 34KB 软件
1
ExpressFast 实用的快递app,除了常用的快递查询还增加了地图模块方便邮寄快递 主要实现了以下功能: 【1】输入快递单号或者扫描二维码 查询快递信息 【2】收藏当前快递,自动添加条目,方便随时查阅 【3】可将当前快递信息通过短信方式分享 【4】侧滑栏集成的百度地图可以显示附近快递点,方便选择合适自己的地点 【5】摇一摇可以显示一些快递小常识 【6】联系客户可以在出现问题时及时跟快递公司的客服沟通 详细介绍可以参考 部分截图:
2023-04-09 10:49:49 31.17MB Java
1