代码搜索：sysutils
找到约 10,000 项符合「sysutils」的源代码
代码结果 10,000
www.eeworm.com/read/419398/10871243
pas buttonlistbox.pas
unit ButtonListBox;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TButtonListBox = class(TListBox)
private
FDepth:
www.eeworm.com/read/419398/10871256
svn-base wmutil.pas.svn-base
unit wmutil;
interface
uses
Windows, SysUtils, Classes, Graphics, Controls,
DIB, AsphyreImages;
type
TWMImageHeader = record
Title: string[40]; //'WEMADE Entertainment
www.eeworm.com/read/419398/10871301
svn-base buttonlistbox.pas.svn-base
unit ButtonListBox;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TButtonListBox = class(TListBox)
private
FDepth:
www.eeworm.com/read/419398/10871325
pas wmutil.pas
unit wmutil;
interface
uses
Windows, SysUtils, Classes, Graphics, Controls,
DIB, AsphyreImages;
type
TWMImageHeader = record
Title: string[40]; //'WEMADE Entertainment
www.eeworm.com/read/419318/10874631
pas xstreams.pas
unit xStreams;
interface
uses Windows, SysUtils, Classes, Forms, TypInfo;
procedure SavePropertyToStream(Stream: TStream; Instance: TPersistent; PropName: string);
procedure LoadPropertyFrom
www.eeworm.com/read/419318/10874661
pas xregistry.pas
unit xRegistry;
interface
uses Windows, SysUtils, Registry;
function GetAssociatedExecutable(FileExt: string; var FileDesc, MIMEType: string): string;
function SetAssociatedExecutable(FileEx
www.eeworm.com/read/419318/10874665
pas xfiles.pas
unit xFiles;
interface
uses SysUtils, Windows, ShellAPI, Forms;
type
TEnumDirectoryFileProc = procedure (Filename: string; var bContinue: Boolean) of object;
function PathWithoutSlash
www.eeworm.com/read/419318/10874779
pas memory.pas
unit memory;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
CtlPanel;
type
TMemoryModule = class(TAppletModule)
procedure MemoryModuleN
www.eeworm.com/read/419318/10874838
pas util.pas
unit util;
interface
uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TMyColor = (ActiveTitle, GradientActiveTitle, Background, Hilight,
HilightText
www.eeworm.com/read/274340/10874875
~pas msgdb.~pas
unit MsgDB;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TfrmMsgDB = class(TDataModule)
tblChatMsg: TADOTable;
tblChatMsgSend_MobilePhone: TWideStringField;
tblChatM