uses dao97,dao2000; procedure CompactMdbDatabase(srcDbname,dstDbname,oldpwd,pwd:;bAccess97:boolean=true); var idbEngine:_dbEngine; begin oldpwd '' then oldpwd := ';pwd='+oldpwd; pwd '' then pwd... [阅读全文]

//保存图片到数据库 function imagesavetosql(data:TQuery;filename:String):boolean; var imagejpg:TJPEGImage; //jpg图片 MyStm:TMemoryStream; begin result:=false; MyStm:=TMemoryStream.Create; imagejpg:=Tjp... [阅读全文]

在Delphi数据库应用系统数据录入过程中有些数据是保存在Excel中；有些是保存在纸张上；还有些是需要新增加由于各条记录的间有大量重复数据如果每条记录都让录入人员全部手工录入其间重复劳动是相当大还降低了工作效率下面就这个问题进行论述　　1、利用DelphiExcel　　Delphi中已经带了Word和PowerPo例子Excel和这两个应用服务器略有区别所以也可以利用DelphiExcel　　步... [阅读全文]

高红岩(ghyghost) 近日笔者书写个小型学生管理系统时需要用到ADOControl控件存取SQL Server数据库图片查看资料发现基本都是针对BMP文件进行操作(巨增数据库大小)但发现了★eagletian★高手翻译ADO英文技术文档里面涉及到了数据库存取JPEG文件关键技术在win98+sql server桌面版中测试通过运行良好现于源码公开如下: unit Unit1; erfac... [阅读全文]

厦 门 市 邮 政 局 邮 政 设 备 科 曾 剑 平 ---- 在 计 算 机 应 用 系 统 软 件 升 级 改 造 过 程 中 我 们 经 常 遇 到 这 样 个 问 题: 老 系 统 数 据 库 平 台 和 新 系 统 不 同 例 如 老 系 统 数 据 库 平 台 是Foxpro 而 新 系 统 平 台 是SQL Server 而 且 我 们 需 要 把 旧 数 据... [阅读全文]