get the CPU name?
// this code will get the cpu identifier from the windows registry
uses
Registry ;
function CPUname : string ;
var
Reg : TRegistry ;
begin
CPUname := '' ;
Reg := TRegistry . Create ;
try
Reg . RootKey := HKEY_LOCAL_MACHINE ;
if Reg . OpenKey ( '\Hardware\Description\System\CentralProcessor\0' , False ) then
CPUname := Reg . ReadString ( 'Identifier' );
finally
Reg . Free ;
end ;
end ;