Home

Page 284
Page 284
background image

Железная мастерская

6.1.2. Информация о процессоре

Следующим этапом мы узнаем информацию о процессоре. Она находится

в реестре по адресу:

Информация о первом процессоре находится в разделе о. Если есть еще
процессоры, то они будут находиться в разд. 1, 2 и т. д. Здесь нас интересу-

ют параметры Identifier,

6.1.3. Информация о платформе Windows

Теперь узнаем, на какой платформе Windows запущена программа. Сущест-

вует три основные платформы Windows:
• WIN32S — это Windows 3.1 с 32-м расширением.

 — это Windows 95/98/ME. Эта ветка уже прекратила

свое развитие.

 — это Windows NT/2000/XP и все последующие версии, ос-

нованные на ядре NT.

Для того чтобы узнать платформу, выполняется следующий код:

if

 then

begin

 OSVersion.

 and $FFFF},

case

 of

 :=

 3.1';

 'Windows

 :=

else

 :=

end;

end;

В первой строке заполняется свойство

 структуры

OSVersion, которая имеет тип

 В этом свойстве обязательно

нужно указывать размер самой структуры. После этого нужно вызвать
функцию GetVersionEx и указать ей в качестве параметра нашу структуру.
Функция заполнит все остальные поля структуры корректной информацией
о версии и платформе Windows. Идентификатор платформы находится

В

 dwPlatformlD.


Copyright © 2020 Файлообменник files.d-lan.dp.ua

Использование любых материалов сайта возможно только с разрешения автора.