代码搜索：sysutils
找到约 10,000 项符合「sysutils」的源代码
代码结果 10,000
www.eeworm.com/read/155391/11880875
pas oneform.pas
unit OneForm;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TFormOneForm = class(TForm)
LabelText: TLabel;
private
www.eeworm.com/read/258060/11891066
pas datamu.pas
unit DataMU;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDataM = class(TDataModule)
ADOCon: TADOConnection;
private
{ Private declarations }
public
{ Public
www.eeworm.com/read/258060/11891069
~pas config.~pas
unit config;
interface
uses
SysUtils,forms;
type
TXQWYConfig=class
connectionstr:string;
public
class function getConnectionStr:string;
end;
implementation
class function TXQW
www.eeworm.com/read/258060/11891071
pas config.pas
unit config;
interface
uses
SysUtils,forms;
type
TXQWYConfig=class //定义连接管理类
public
class function getConnectionStr:string; //定义类的方法，得到连接字符串
end;
implementation
class function
www.eeworm.com/read/154998/11907333
~pas mr_jg.~pas
unit mr_jg;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
Tmrjg = class(TForm)
private
{ Private declarations }
p
www.eeworm.com/read/154941/11912518
pas mc_dl.pas
unit MC_DL;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TDL = class(TForm)
private
{ Private declarations }
public
{ Pu
www.eeworm.com/read/154941/11912522
pas mc_jls.pas
unit MC_JLS;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
jpeg, ExtCtrls, Buttons, ImgList;
type
TJLS = class(TForm)
Panel1: TPanel;
www.eeworm.com/read/154939/11915321
pas mc_load.pas
unit MC_Load;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls, jpeg;
type
TLoad = class(TForm)
Image1: TImage;
private
www.eeworm.com/read/343927/11919643
pas dm.pas
unit dm;
interface
uses
SysUtils, Windows, Messages, Classes, Graphics, Controls, Forms,
Dialogs, DBTables, DB, ADODB;
type
Tcodedm = class(TDataModule)
adqsex: TADOQuery;
www.eeworm.com/read/343839/11921979
pas hitedlg.pas
unit HiteDlg;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
THiteForm = class(TForm)
LblHite: TLabel;
priv