Registriert seit: 10. Jun 2003
Ort: Berlin
9.580 Beiträge
Delphi 11 Alexandria
|
AW: Prozessor-Name auslesen ohne Adminrechte
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!
|