Поддержка / Donate Благодарю за поддержку! Новости сайта Новости форума Архив исходников Automatic translation
Поддержка / Donate
Благодарю за поддержку!
Архив исходников
Automatic translation
Delphi FAQ - Часто задаваемые вопросы | Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа || ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |
Автор: Shady
uses registry; ... function GetCpuMhz: Word; begin with tregistry.Create do begin rootkey := HKEY_LOCAL_MACHINE; openkey('\hardware\description\system\centralprocessor\0\', false); result := readinteger('~mhz'); free; end; end;