En Win7 es mas complicado ejecutar como administrador que usar un archivo de recursos.
Para tu caso la función puedes hacerla así:
Código Delphi
[-]function NombreProcesador:string;
var
Registro:TRegistry;
begin
Result:='';
Registro:= TRegistry.Create;
Registro.Access:= KEY_READ;
try
Registro.RootKey:= HKEY_LOCAL_MACHINE;
if Registro.OpenKey('\Hardware\Description\System\CentralProcessor\0', True) then
Result:= Registro.ReadString('ProcessorNameString');
finally
Registro.Free;
end;
end;
Saludos.