Borland C++ Builder FAQ - Название процессора

Written on . Posted in C++ Builder

ОГЛАВЛЕНИЕ

Страница 99 из 127

Название процессора

//  Введите следующий код:
AnsiString  ProcessorName="Unknown";
TRegistry *reg = new TRegistry;
try  {
reg->RootKey =  HKEY_LOCAL_MACHINE;
reg->OpenKey("Hardware\\Description"
"\\System\\CentralProcessor\\0",  false);
ProcessorName=reg->ReadString("ProcessorNameString");
}
__finally
{
delete  reg;
}
MessageDlg(ProcessorName, mtInformation, TMsgDlgButtons()  << mbOK, 0);

форум c++ builder