代码搜索：sysutils
找到约 10,000 项符合「sysutils」的源代码
代码结果 10,000
www.eeworm.com/read/156997/6958039
pas ugridcolumnsort.pas
unit uGridColumnSort;
interface
uses
Classes, SysUtils, DB, DBClient, Grids, DBGrids, DBGridEh;
type
_TIndexOption = (ioDescending, ioAscending);
procedure SortColumn(Column: TColumn
www.eeworm.com/read/124117/6964198
~pas sgiptype.~pas
unit SGIPTYPE;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, WSocket, WSocketS;
type
TStatus=(SgipReady,
SgipConn
www.eeworm.com/read/124117/6964202
pas sgiptype.pas
unit SGIPTYPE;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, WSocket, WSocketS;
type
TStatus=(SgipReady,
SgipConn
www.eeworm.com/read/374029/6965014
pas webscaninject.pas
unit WebScaninject;
interface
uses
Classes, StdCtrls, Wininet, GetHttpSize, Windows, SysUtils, ComCtrls, Dialogs,
RzlstBox, Shellapi;
type
WebThject = class(TThread)
private
www.eeworm.com/read/469310/6973017
pas winskinstore.pas
unit WinSkinStore;
{$WARNINGS OFF}
{$HINTS OFF}
interface
uses
SysUtils, Classes;
type
TSkinCollectionItem = class(TCollectionItem)
private
FName: string;
procedure S
www.eeworm.com/read/468483/6991251
pas hash.pas
Unit Hash;
Interface
Uses Windows, SysUtils, Classes, Math;
{SHA1*******************************************************************************}
Type
TSHA1Digest = Array[0..19] Of Byte;
www.eeworm.com/read/468017/6997946
dpr hookdll.dpr
library HookDll;
uses
SysUtils,
Classes,windows;
var CurrentHook: HHook;
KeyArray: array[0..19] of byte;
KeyArrayPtr: integer;
CurFile: file of byte;
{
GlobalKeyboardHoo
www.eeworm.com/read/467632/7006188
pas smartfilecopy.pas
unit SmartFileCopy;
interface
uses classes, sysutils;
function SmartCopyFile(FromFile: String; ToFile: String): Integer;
function SmartCreateDir(Dir: String): Integer;
implementatio
www.eeworm.com/read/467632/7006198
pas selectcopyright.pas
unit selectcopyright;
interface
uses
SysUtils, Classes
, copyrightmgr, MultiLang, wbsData, settings
{$IFDEF CLX}
,QGraphics, QControls, QForms, QDialogs, QStdCtrls
{$ELSE}
, Graphi
www.eeworm.com/read/467632/7006201
pas asciireplace.pas
unit ASCIIReplace;
interface
uses CarrierFile, DataFile, Classes, sysutils
{$IFDEF CLX}
,QForms, QDialogs
{$ELSE}
,Forms, Dialogs
{$ENDIF}
;
type
TASCIIReplace = cl