Tech-Ecke / Delphi Inhalt / Hardware

 

     Hardware

 

   Auslesen des verwendeten CPU's

Die Bezeichnung des aktuell verwendeten Prozessors findet man in der Registry und kann mit folgender Funktion ausgelesen werden.

  function GetCPUType: String;
var
      Regist: TRegistry;
begin
   Result :=
'';
   Regist := TRegistry.Create;
  
try
      Regist.RootKey := HKEY_LOCAL_MACHINE;
      Regist.OpenKeyReadOnly(
'\Hardware\Description\System\CentralProcessor\0\');
      Result := regist.ReadString(
'ProcessorNameString');
  
finally
      Regist.CloseKey;
      Regist.free;
  
end;
end;
 

"Die Option Drucken funktioniert erst ab Netscape V4.0 bzw. I-Explorer 5.0 !"

[letzte Aktualisierung 25.01.2015]