SystemUtilities V 1.0

[Orbmu2k]

In der Jedi Code Libary ist sowas drin ...

Delphi-Quellcode:

uses
  JclSysinfo;

function GetCPUInfoStr:String;
var
  CPUInfo:TCpuInfo;
  FreqInfo:TFreqInfo;
begin

  GetCpuInfo(CPUInfo);
  GetCPUSpeed(FreqInfo);

  Result := (CPUInfo.Manufacturer + ' '
           + CPUInfo.CpuName + ' @ '
           + IntToStr(FreqInfo.RawFreq)
           + 'MHZ');

end;