- 博客(0)
- 资源 (19)
- 收藏
- 关注
JSON_UniDac_内存表_Demo
Demo+处理单元 JSONUni.pas
1.用途:用以实现任意TDataSet转换成JSON格式,并将JSON文本转成Unidac的内存表TVirtualTable
2.需引用的第三方控件:Unidac,QJSON
3.说明:
3.1.本单元不是处理TClientDataSet,可将TClientDataSet转成JOSN,反向只能转成TVirtualTable;
3.2.本单元用的JSON解析工具是QJOSN,而非SupperObject,因为后者转换TdataSet时存在排序错乱问题;
3.3.无分者请来此处1530058030@QQ.com。
2015-12-15
UniDAC自动创建有密码的SQLite数据库(支持修改密码)
环境:Delphi XE2
控件:UniDAC(仅使用此了一种三方控件)
附件:SQLite3.dll
功能:
1.用纯脚本创建一个带密码的SQLite3数据库(默认文件名db.db,密码123)
2.用纯脚本创建一个表,并打开,可在Dbgrid中修改
3.修改SQLite3数据库的密码
备注:在不替换SQLite3.dll的前提下,本程序生成的带密码的db.db文件可以用SQLiteExpert_3.4.34.2256打开,如换作其它SQLite3.dll这个文件,则不保证,但换了别的SQLite3.dll本程序依然可用,只有的SQLite3.dll支持改密码有的不支持.
2013-12-30
DELPHI支持鼠标滚轮的DBGRID(可定义滚动及上下滚动事件)
1.鼠标的滚轮支持,即可以直接支持鼠标上下滚动
2.向上滚轮事件(自定义事件)
3.向下滚轮事件(自定义事件)
经本人实测可用,网上找的不是差这个就是差那个,本人综合了一下
2011-09-28
(SQL)列转行工具
可以把一列转成一行…… 分隔符默认为英文逗号,也可以转成INSERT 中VALUES()后面的单引号加逗号的形式。
以前用T-SQL时,总是把一列复制到EXCEL中,转置,然后复制到记本事中,把一空格替换成逗号……,这个工具可以直接搞定
2011-08-22
SQL2000自动备份 压缩 删除(备份文件)
您的数据库还在手动备份?或者苦于自动备份文件多了忘了删,结果当您要用的时候,发现磁盘空间已满,数据库上周就停止自动备份了?这个存储过程只要您把你的要的备份的数据库名写进去,再给它加一个调度,它就可以自动为您备份数据,删除指定时间以前的数据库备份,且自动为您打包压缩成RAR文件,一个备份就是一个文件名,但愿广大网管朋友用得上!
用的时候把里面的目标数据库名(TEST)改成阁下要的目标数据库名,然后放到查询分析器时执行即可,数据库自动以数据库名+时间(年月日时分).rar的形式存放在(默认)E:\DATABACKUP目录中,没有这个目录,本存储过程会自行新建,只要阁下有E:\就行!
用过的朋友肯定知数据库压缩率极高,压缩后可以节约很大一部分磁盘资源,因此我调用了WINRAR进行(后台自动)压缩,如果不需要压缩的可以把最后一段注释掉.
2009-05-22
Fast Report 中文使用说明
现在越来越的软件集成了Fast Report万能打印控件,它的功能是任意定制打印方案,纸张大小,打印格式,字体,条码打印等等,有用得着的朋友不妨下载看看,不明白的可以询问 E-mail:jonsenkiar@126.com
2008-12-31
SQL 批量生成条码 EAN-13
前几天有大量形码需要生成,手里也有批量打印条形码的程序,但是条形码最后一位是按一定规责自动生成的,比如八位条码12345670-12345679这之间只有一个有效条码,就是说1234567开头的只有一个条码,而不是十个,这最后一位(第八位)称为检验码,需要自动生成,到网上找了半天,没找到准确的,只是只有一部分能算对,于是自己动手改了一下……希望对朋友们有帮助,这里仅提供EAN-8和EAN-13码,前7位(12位)从你们定义的商品编码中取,最后一位(即检查码)由本函数自动生成
注:
1.这是一个自定义的SQL函数,不是可以直接使用的程序
2.EAN编码仅支持纯数字,不支持字母
2008-10-04
SQL 批量生成条码 EAN-8
前几天有大量形码需要生成,手里也有批量打印条形码的程序,但是条形码最后一位是按一定规责自动生成的,比如八位条码12345670-12345679这之间只有一个有效条码,就是说1234567开头的只有一个条码,而不是十个,这最后一位(第八位)称为检验码,需要自动生成,到网上找了半天,没找到准确的,只是只有一部分能算对,于是自己动手改了一下……希望对朋友们有帮助,这里仅提供EAN-8和EAN-13码,前7位(12位)从你们定义的商品编码中取,最后一位(即检查码)由本函数自动生成
注:EAN编码仅支持纯数字,不支持字母
2008-10-04
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人