文件名称:Delphi数据库批量查询数据控件.rar
文件大小:49KB
文件格式:RAR
更新时间:2022-07-30 11:00:45
Delphi源码-数据库实例
Delphi批量查询数据,采用控件来查询,在安装此控件前,先安装raiz3.10控件。 FTerm:SQL 语句,FShowTerm:Show给User的组合条件 StrdateField_E按日期分段查询的日期字段英文名 查询过程中,把单引号转换成两个单引号/检验是否为数值型,并考虑到了日期时间型和布尔型数据,批量查询较准确。 //从注册表中读出ConnectionString Reg01.RootKey := HKEY_CURRENT_USER; if Reg01.OpenKey('\Software\LdcErpAcc\QueryDemo', True) then strConnection := Reg01.ReadString('Connection'); ADOConnection1.ConnectionString := strConnection; try ADOConnection1.open; except ADOConnection1.Close; strConnection := PromptDataSource(0, ADOConnection1.ConnectionString); if strConnection <> '' then begin ADOConnection1.ConnectionString := strConnection; //如果注册表中没有信息则创建信息 if (Reg01.OpenKey('\Software\LdcErpAcc\QueryDemo', False)) = False then reg01.CreateKey('\Software\LdcErpAcc\QueryDemo'); //将ConnectionString写到注册表中 Reg01.OpenKey('\Software\LdcErpAcc\QueryDemo', True); Reg01.WriteString('Connection', strConnection); ADOConnection1.Open; end else Application.Terminate; end;
【文件预览】:
srcfans.com
----数组成批查询()
--------Demo()
--------Source()
--------安装说明.txt(35B)