Ok ok i wrote a function however it dosent do its job very well...
Delphi-Quellcode:
Function IntelCore(ThreadAffinity:Cardinal;Mask:dword):string;
var
msr:tmsr;
omcdrv:tmsrio;
x:dword;
s:string;
o:integer;
begin
SetThreadAffinityMask(ThreadAffinity,mask);
omcdrv.ReadMSR($19C,msr);
x := msr.LowPart;
x:=x shr 16 and $0000ff ;
s:=Format('%8.8x', [x]);
o:=100-HexToInt(S);
result:=inttostr(o)+' °C';
end;
Am i confused couse i cant figure the mask for the thread....please!
