Einzelnen Beitrag anzeigen

Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
9.580 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: Prozessor-Name auslesen ohne Adminrechte

  Alt 29. Jun 2011, 07:04
Das geht bei neueren Delphiversionen auch, ja. Ich würde den Rückgabewert allerdings auch auswerten:
Delphi-Quellcode:
function GetProzessorName: string;
var
  reg: TRegistry;
begin
  result := 'Unbekannter Prozessor';
  reg := TRegistry.Create;
  try
    reg.RootKey := HKEY_LOCAL_MACHINE;
    if reg.OpenKeyReadOnly('Hardware\Description\System\CentralProcessor\0') then
      result := reg.ReadString('ProcessorNameString');
  finally
    reg.free;
  end;
end;
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!
  Mit Zitat antworten Zitat