Определение версии Windows
Часто в программах системного плана приходится определять, какая версия операционной системы Windows установлена на компьютере.
Предлагаю работающий алгоритм, который определяет версию Windows. Среда программирования: Borland Delphi 5.
Описание типов:
type TWinVersion = (wvUnknown,wv95,wv98,wvME,wvNT3,wvNT4,wvW2K,wvXP,wv2003);
Функция определения версии операционной системы:
function DetectWinVersion : TWinVersion;
var
OSVersionInfo : TOSVersionInfo;
begin
Result := wvUnknown; // Неизвестная версия ОС
OSVersionInfo.dwOSVersionInfoSize := sizeof(TOSVersionInfo);
if GetVersionEx(OSVersionInfo)
then
begin
case OSVersionInfo.DwMajorVersion of
3: Result := wvNT3; // Windows NT 3
4: case OSVersionInfo.DwMinorVersion of
0: if OSVersionInfo.dwPlatformId = VER_PLATFORM_WIN32_NT
then Result := wvNT4 // Windows NT 4
else Result := wv95; // Windows 95
10: Result := wv98; // Windows 98
90: Result := wvME; // Windows ME
end;
5: case OSVersionInfo.DwMinorVersion of
0: Result := wvW2K; // Windows 2000
1: Result := wvXP; // Windows XP
2: Result := wv2003; // Windows 2003
end;
end;
end;
end;
Дополнительная функция вывода названия операционной системы:
function DetectWinVersionStr : string;
const
VersStr : array[TWinVersion] of string = (
'Unknown',
'Windows 95',
'Windows 98',
'Windows ME',
'Windows NT 3',
'Windows NT 4',
'Windows 2000',
'Windows XP',
'Windows 2003');
begin
Result := VersStr[DetectWinVersion];
end;
Вышеописанный алгоритм тестировался на Windows 98, Windows NT 4, Windows XP и Windows 2000, точно определяя версию операционной системы.
С появлением в широких массах новой операционной системы Windows Longhorn (Windows Vista) алгоритм будет обновлен и переписан.
Дополнительная информация на тему "работа с операционной системой Windows":
JavaScript — это язык веб-программирования, работающий на стороне клиента, позволяющий автоматизировать какую-либо деятельность на странице сайта, не нагружая сервер. Вся нагрузка лежит на компьютере пользователя. В нем можно создавать функции, а также использовать базовые алгоритмы, состоящие из следования-ветвления-цикла. Чаще всего программный код на языке JavaScript обрабатывается обычными веб-браузерами.
Интересные материалы на сайте:
В статье рассказывается как начать свой бизнез грузоперевозок на территории Европы.
Список движков для создания игр на различных платформат, от PC и PlayStation 2, до Apple и Android.
статье реализован алгоритм работы с кубическими сплайнами и построение 3D модели.
Описание алгоритмов шифрования данных. Каждый пример является самодостаточной программой, написанной на языке программирования Borlabd Pascal 7.0
