- 新着としてマーク
- ブックマーク
- 購読
- ミュート
- RSS フィードを購読する
- ハイライト
- 印刷
- 不適切なコンテンツを報告
Hi,
Is there any api that provides the TDP (watts) processor?
I can't find.
Ty.
コピーされたリンク
- 新着としてマーク
- ブックマーク
- 購読
- ミュート
- RSS フィードを購読する
- ハイライト
- 印刷
- 不適切なコンテンツを報告
We answer questions regarding Intel Active Management Technology (vPro) on this forum. I do not know what SDK a TDP api would be a part of. (Sorry..)
- 新着としてマーク
- ブックマーク
- 購読
- ミュート
- RSS フィードを購読する
- ハイライト
- 印刷
- 不適切なコンテンツを報告
Maybe one of the MSR registers will be helpful.
- 新着としてマーク
- ブックマーク
- 購読
- ミュート
- RSS フィードを購読する
- ハイライト
- 印刷
- 不適切なコンテンツを報告
procedure TForm2.GetKernelPerfStateInfo;
const
WbemUser ='';
WbemPassword ='';
WbemComputer ='localhost';
wbemFlagForwardOnly = $00000020;
var
FSWbemLocator : OLEVariant;
FWMIService : OLEVariant;
FWbemObjectSet: OLEVariant;
FWbemObject : OLEVariant;
oEnum : IEnumvariant;
iValue : LongWord;
begin;
FSWbemLocator := CreateOleObject('WbemScripting.SWbemLocator');
FWMIService := FSWbemLocator.ConnectServer(WbemComputer, 'root\WMI', WbemUser, WbemPassword);
FWbemObjectSet:= FWMIService.ExecQuery('SELECT * FROM KernelPerfState','WQL',wbemFlagForwardOnly);
oEnum := IUnknown(FWbemObjectSet._NewEnum) as IEnumVariant;
while oEnum.Next(1, FWbemObject, iValue) = 0 do
begin
Label5.Caption := (Format('Power %d',[Integer(FWbemObject.Power)]));// Uint32
FWbemObject:=Unassigned;
end;
end;
Don't show tdp. Tips?
- 新着としてマーク
- ブックマーク
- 購読
- ミュート
- RSS フィードを購読する
- ハイライト
- 印刷
- 不適切なコンテンツを報告
Can you access directly these MSR registers( on Ivy Bridge) 0x648 ,0x649, 0x64A?
- 新着としてマーク
- ブックマーク
- 購読
- ミュート
- RSS フィードを購読する
- ハイライト
- 印刷
- 不適切なコンテンツを報告
WMI.KernelPerfStates.Power does not exist. Don't crosspost this bullshit anymore. Just check.
WMI.KernelPerfStates.vbs :
Const wbemCimtypeDatetime = 101 ' Date/time value
On Error Resume Next
Set d = CreateObject("WbemScripting.SWbemDateTime")
Set c = GetObject("winmgmts:\\.\root\WMI").InstancesOf("KernelPerfStates")
for each o in c
WSH.Echo ""
WSH.Echo "----"
for each p in o.Properties_
if IsNull(p.Value) then
WSH.Echo p.Name
else
if p.CIMType = wbemCimtypeDatetime then
d.Value = p.Value
WSH.Echo p.Name & " = " & d.GetVarDate()
else
if IsArray(p.Value) then
WSH.Echo p.Name & " = " & Join(p.Value, ",")
else
WSH.Echo p.Name & " = " & p.Value
end if
end if
end if
next
next
if Err <> 0 then
WSH.Echo ""
WSH.Echo "Error:", Hex(Err.Number), "-", Err.Description
Err.Clear
end if