Tech-ecke Delphi

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;