核心提示:unit WinRing;interfaceuses Windows,WinSvc,Dialogs,Forms;Type TRingData = Record AdjRing0Entry:ULONG...
unit WinRing;
interface
uses Windows,WinSvc,Dialogs,Forms;
Type
TRingData = Record
AdjRing0Entry:ULONG ;
RegData:array[0..6] of ULONG;
end;
TRing0Proc = Procedure;StdCall;
procedure OpenWinRing;
function CloseDriver:boolean;
procedure ProcessRing0(Ring0Proc: TRing0Proc);StdCall;
const
DRIVER = 'WINRING';
implementation
代码已经打包下载
迅雷专用高速下载