代码搜索:sysutils
找到约 10,000 项符合「sysutils」的源代码
代码结果 10,000
www.eeworm.com/read/319602/13448411
~52~ unitmain.pas.~52~
unit unitMain;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, ComCtrls, IdIOHandler, IdIOHandlerSocket,
IdIOHandl
www.eeworm.com/read/319602/13448413
~57~ unitmain.pas.~57~
unit unitMain;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, ComCtrls, IdIOHandler, IdIOHandlerSocket,
IdIOHandl
www.eeworm.com/read/319161/13459430
pas mydata.pas
unit MyData;
interface
uses
SysUtils, Classes, DB, ADODB;
type
Tdm = class(TDataModule)
AQCustName: TADOQuery;
AQCustInfo: TADOQuery;
DSCustInfo: TDataSource;
AQDept
www.eeworm.com/read/319161/13459527
pas utodayworkrecord.pas
unit UtodayWorkRecord;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, Buttons, ComCtrls;
type
TfrmTodayRecord
www.eeworm.com/read/318852/13470783
pas picturecontainerprop.pas
unit PictureContainerProp;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, PictureContainer, HTMListB, ShellAPi, ExtDlgs;
type
TCon
www.eeworm.com/read/317895/13494048
pas untdmappmdi.pas
unit UntDMAppMDI;
interface
uses
SysUtils, Classes, DB,Forms, ADODB;
type
TDM = class(TDataModule)
ADOConnection: TADOConnection;
procedure DataModuleCreate(Sender: TObject);
www.eeworm.com/read/317396/13505092
pas interservermsg.pas
unit InterServerMsg;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, JSocket,ObjBase;
type
TServerMsgInfo = record
Socket :
www.eeworm.com/read/317396/13505181
pas shareunit.pas
unit ShareUnit;
interface
uses
Windows, Messages, SysUtils, Classes, Controls,
Forms, ExtCtrls, StdCtrls;
type
PUserRecord = ^TUserRecord;
TUserRecord = record
Bz: Byte;
www.eeworm.com/read/317396/13505189
pas generalconfig.pas
unit GeneralConfig;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls, IniFiles, ExtCtrls;
type
TfrmGeneralConfig
www.eeworm.com/read/317396/13505213
pas guild.pas
unit Guild;
interface
uses
Windows, SysUtils, Classes,IniFiles,ObjBase;
type
TGuildRank = record
nRankNo :Integer;
sRankName :String;
MemberList :TStringList;
end;