Hallo,
ich habe mir ein Programm geschrieben (Delphi 5), welches über WMI die wichtigsten Hardwaredaten vom Computern liefert, den Prozessortyp z.B. so:
//ProzessorName
Function GetProzessorName(aSrv : ISWbemServices) : string;
begin
aObjSet := aSrv.ExecQuery('SELECT Name FROM Win32_Processor', 'WQL',0,aNVSDummy);
pEnum := aObjSet.Get__NewEnum as IEnumVARIANT;
while (TRUE) do
begin
hRes := pEnum.Next(1, vOut, dwRetrieved);
if hRes <> S_OK then Break;
result := trim(VarToStr(vOut.Name));
end;
end;
Leider kommen bei den neueren PC's falsche Bezeichnungen, so findet er für einen Intel Quad Core nur einen "Intel Pentium III Xeon-Prozessor".
Gibt es eine Möglichkeit die Bezeichnung im WMI zu aktualisieren - im Gerätemanager steht ja die korrekte Bezeichnung?
Danke im Voraus für jede Hilfe.
Knut
ich habe mir ein Programm geschrieben (Delphi 5), welches über WMI die wichtigsten Hardwaredaten vom Computern liefert, den Prozessortyp z.B. so:
//ProzessorName
Function GetProzessorName(aSrv : ISWbemServices) : string;
begin
aObjSet := aSrv.ExecQuery('SELECT Name FROM Win32_Processor', 'WQL',0,aNVSDummy);
pEnum := aObjSet.Get__NewEnum as IEnumVARIANT;
while (TRUE) do
begin
hRes := pEnum.Next(1, vOut, dwRetrieved);
if hRes <> S_OK then Break;
result := trim(VarToStr(vOut.Name));
end;
end;
Leider kommen bei den neueren PC's falsche Bezeichnungen, so findet er für einen Intel Quad Core nur einen "Intel Pentium III Xeon-Prozessor".
Gibt es eine Möglichkeit die Bezeichnung im WMI zu aktualisieren - im Gerätemanager steht ja die korrekte Bezeichnung?
Danke im Voraus für jede Hilfe.
Knut
Comment