代码搜索：sysutils
找到约 10,000 项符合「sysutils」的源代码
代码结果 10,000
www.eeworm.com/read/492871/6411167
pas udata.pas
unit uData;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TdmPer = class(TDataModule)
acPer: TADOConnection;
private
{ Private declarations }
public
{ Public de
www.eeworm.com/read/492871/6411172
pas upublic.pas
unit uPublic;
interface
uses
classes, comctrls, registry,Sysutils,windows,Printers,Dialogs;
Const
UserIDLength = 10; //借书人号为10位
CodeLength = 10; //书号为10位
GroupID
www.eeworm.com/read/492871/6411182
~pas udata.~pas
unit uData;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TdmPer = class(TDataModule)
acPer: TADOConnection;
private
{ Private declarations }
public
{ Public de
www.eeworm.com/read/491055/6440045
~pas about.~pas
unit about;
interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
Buttons, ExtCtrls;
type
TAboutBox = class(TForm)
Panel1: TPanel;
ProgramIcon: TImag
www.eeworm.com/read/491055/6440052
pas about.pas
unit about;
interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
Buttons, ExtCtrls;
type
TAboutBox = class(TForm)
Panel1: TPanel;
ProgramIcon: TImag
www.eeworm.com/read/491055/6440075
~pas unit3.~pas
unit Unit3;
interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
Buttons, ExtCtrls;
type
TAboutBox = class(TForm)
Panel1: TPanel;
ProgramIcon: TImag
www.eeworm.com/read/491055/6440078
~pas unit2.~pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm2 = class(TForm)
private
{ Private declarations }
www.eeworm.com/read/490914/6445340
pas udm.pas
unit uDM;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDM = class(TDataModule)
Conn: TADOConnection;
private
{ Private declarations }
public
{ Public declarat
www.eeworm.com/read/490914/6445354
~pas udm.~pas
unit uDM;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDM = class(TDataModule)
Conn: TADOConnection;
private
{ Private declarations }
public
{ Public declarat
www.eeworm.com/read/490934/6445773
pas unit2.pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm2 = class(TForm)
private
{ Private declarations }