Alright alright but you must have core2duo system to test.I provided the driver.
Now test!
Delphi-Quellcode:
procedure InitializeDll(); stdcall; external 'WinRing0.dll';
procedure DeinitializeDll(); stdcall; external 'WinRing0.dll';
function GetDllStatus(): dword; stdcall; external 'WinRing0.dll';
function RdmsrEx(index:dWORD;var eax,edx:dWORD;affinityMask:dword): LongBool; stdcall; external 'WinRing0.dll';
function Rdmsr(index:dWORD;var eax,edx:dWORD): LongBool; stdcall; external 'WinRing0.dll';