代码搜索:sysutils
找到约 10,000 项符合「sysutils」的源代码
代码结果 10,000
www.eeworm.com/read/145646/12708949
pas data.pas
unit data;
interface
uses
SysUtils, Classes, MConnect, ObjBrkr, DB, DBClient, SConnect;
type
TDatam = class(TDataModule)
SCTlx: TSocketConnection;
SOBlx: TSimpleObjectBroker;
www.eeworm.com/read/332940/12715617
pas dxwaveedit.pas
unit DXWaveEdit;
interface
uses
Windows, SysUtils, Classes, Forms, Dialogs, Controls, StdCtrls, ExtCtrls,
Buttons, ComCtrls, DXSounds, Wave, Graphics;
type
{ TDelphiXWaveEditForm
www.eeworm.com/read/332940/12715711
pas dxpictedit.pas
unit DXPictEdit;
interface
uses
Windows, SysUtils, Classes, Forms, Dialogs, Controls, StdCtrls, ExtCtrls,
ExtDlgs, DIB, Menus, Graphics, Clipbrd;
type
{ TDelphiXDIBEditForm }
www.eeworm.com/read/332804/12727129
pas tflathintunit.pas
unit TFlatHintUnit;
interface
uses
Classes, Windows, Graphics, Messages, Controls, Forms, SysUtils, FlatUtilitys;
type
TFlatHint = class(TComponent)
private
FHintFont: TFont;
www.eeworm.com/read/145278/12739452
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/145278/12739481
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/145278/12739486
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/145278/12739558
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/145278/12739600
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/145137/12750327
pas changepassword.pas
unit changepassword;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, baseform, StdCtrls;
type
Tfchangepassword = class(Tfbaseform)