代码搜索:TADOQuery
找到约 2,205 项符合「TADOQuery」的源代码
代码结果 2,205
www.eeworm.com/read/480689/6659921
pas dahelper.pas
unit DAHelper;
interface
uses
SysUtils, Classes, DB, ADODB,DataMU;
//执行没有返回值的sql语句,如果正确执行则返回true,否则返回false
function ExeSqlNoQuery(sql:string):boolean;
// 执行有返回值的sql语句,返回得到的ADOQuery;
functio
www.eeworm.com/read/480689/6659923
pas control_feeu.pas
unit Control_feeU;
interface
uses DAHelper,ClassesU,ADODB,SysUtils;
//得到费用集
function GetFeeSetArray:TADOQuery;
//删除费用
function DelFeeSet(feeID:integer):boolean;
//查找是否存在给定的项目名称,如果存在返回true
fu
www.eeworm.com/read/480689/6659942
pas control_operatoru.pas
unit Control_OperatorU;
interface
uses DAHelper,ClassesU,ADODB,SysUtils;
//对用户名和密码进行检查,判断此用户是否存在,如果存在返回操作员的ID
function CheckOperator(operator:Toperator):integer;
//添加用户
function AddNewOperator
www.eeworm.com/read/478858/6705234
dfm dmshoufei.dfm
object dm_mz: Tdm_mz
OldCreateOrder = False
Left = 243
Top = 291
Height = 239
Width = 282
object ADOkeshi: TADOQuery
Connection = dm.ADOConnection1
Parameters =
Lef
www.eeworm.com/read/478858/6705236
dfm dmmzshg.dfm
object dm_mzshg: Tdm_mzshg
OldCreateOrder = False
Left = 330
Top = 282
Height = 225
Width = 360
object ADOchaxun: TADOQuery
Connection = dm.ADOConnection1
Parameters =
www.eeworm.com/read/478858/6705349
dfm dmjiaokuan11.dfm
object dmjiaokuan: Tdmjiaokuan
OldCreateOrder = False
Left = 354
Top = 240
Height = 251
Width = 336
object ADOyujiao: TADOQuery
Connection = dm.ADOConnection1
Parameters =
www.eeworm.com/read/477658/6730243
pas uu1.pas
unit uU1;
interface
uses
ADODB, SysUtils, Classes, WideStrings, Grids, Forms;
//声明全局函数
procedure oleAdoQurySub(dbPathName, oldPsd:string; Var adoQury: TADOQuery);
function oleQuryExecS
www.eeworm.com/read/477658/6730284
~5~ uu1.pas.~5~
unit uU1;
interface
uses
ADODB, SysUtils, Classes, WideStrings, Grids, Forms;
//声明全局函数
procedure oleAdoQurySub(dbPathName, oldPsd:string; Var adoQury: TADOQuery);
function oleQuryExecS
www.eeworm.com/read/477658/6730305
~10~ uu1.pas.~10~
unit uU1;
interface
uses
ADODB, SysUtils, Classes, WideStrings, Grids, Forms;
//声明全局函数
procedure oleAdoQurySub(dbPathName, oldPsd:string; Var adoQury: TADOQuery);
function oleQuryExecS
www.eeworm.com/read/477658/6730317
~8~ uu1.pas.~8~
unit uU1;
interface
uses
ADODB, SysUtils, Classes, WideStrings, Grids, Forms;
//声明全局函数
procedure oleAdoQurySub(dbPathName, oldPsd:string; Var adoQury: TADOQuery);
function oleQuryExecS