代码搜索：TADOQuery
找到约 2,205 项符合「TADOQuery」的源代码
代码结果 2,205
www.eeworm.com/read/196956/8038541
~h datamodule.~h
//---------------------------------------------------------------------------
#ifndef DataModuleH
#define DataModuleH
//---------------------------------------------------------------------------
www.eeworm.com/read/196956/8038546
h datamodule.h
//---------------------------------------------------------------------------
#ifndef DataModuleH
#define DataModuleH
//---------------------------------------------------------------------------
www.eeworm.com/read/397120/8066059
~pas datamodule.~pas
unit DataModule;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDM = class(TDataModule)
ADOConnection1: TADOConnection;
LoginQuery: TADOQuery;
LoginDataSource: TDataS
www.eeworm.com/read/397120/8066073
pas datamodule.pas
unit DataModule;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDM = class(TDataModule)
ADOConnection1: TADOConnection;
LoginQuery: TADOQuery;
LoginDataSource: TDataS
www.eeworm.com/read/296565/8092944
pas editlesseefm.pas
Unit EditLesseeFM;
Interface
Uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls, DBCtrls, Mask,
DBCtrlsEh, DB, ADODB, Grids,
www.eeworm.com/read/296565/8093080
pas globe.pas
unit Globe;
interface
uses SysUtils, ExtCtrls, ADODB, DB;
var
OPName: string;
Path: string;
procedure ShowForm(FrmID: Cardinal);
function GetMaxID(TableName: WideString): Cardinal
www.eeworm.com/read/296565/8093248
~8~ globe.pas.~8~
unit Globe;
interface
uses SysUtils, ExtCtrls, ADODB, DB;
var
OPName: string;
Path: string;
procedure ShowForm(FrmID: Cardinal);
function GetMaxID(TableName: WideString): Cardinal
www.eeworm.com/read/296565/8093456
~1~ editlesseefm.pas.~1~
Unit EditLesseeUnit;
Interface
Uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, LbButton, ExtCtrls, StdCtrls, DBCtrls, AAFont, AACtrls, Mask,
www.eeworm.com/read/296565/8093691
~9~ globe.pas.~9~
unit Globe;
interface
uses SysUtils, ExtCtrls, ADODB, DB;
var
OPName: string;
Path: string;
procedure ShowForm(FrmID: Cardinal);
function GetMaxID(TableName: WideString): Cardinal
www.eeworm.com/read/296565/8093893
~3~ editlesseefm.pas.~3~
Unit EditLesseeFM;
Interface
Uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, LbButton, ExtCtrls, StdCtrls, DBCtrls, AAFont, AACtrls, Mask,
DB