Как программно определить версию Windows ?

← →
White (2002-03-28 13:19) [0]

Приветствую Вас, мастера.
Помогите! Интересует вопрос, как программно определить версию Windows (типа какой он, 95, 98 или 2000 и т.п.).
Может быть, есть функция или что-нибудь подобное.
По возможности, если не функция, то очень прошу исходник (здесь или на мыло).
За ранее благодарю.

← →
Dimka Maslov (2002-03-28 13:26) [1]

http://dims.gpsm.ru/files/index_en.php?page=dim/system.htm&ref=GetOperatingSystem

← →
drpass (2002-03-28 14:05) [2]

Это в том случае, если тебе неохота качать немеренно полезный и незаменимый для каждого программера модуль dim.pas :)))
GetWindowsMajorVersion + GerWindowsMinorVersion;
95/NT - 4.0
98 - 4.1
Me - 4.9
2000 - 5.0
XP - 5.1
Переменная Win32Platform позволяет узнать, какая платформа.
VER_PLATFORM_WIN32_WINDOWS - Win9x, VER_PLATFORM_WIN32_WINNT - WinNT

← →
SPeller (2002-03-28 14:49) [3]

Или если нужна просто строчка с названием, то можно взять с
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\ProductName или HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Version

← →
Dimka Maslov (2002-03-28 18:04) [4]

>drpass
Кому неохота качать, номер версии у 98 - 4.10, а у ME - 4.90

← →
drpass (2002-03-28 18:11) [5]

>Dimka Maslov
Прошу прощения, что задел Ваше чувство собственного достоинства. Просто Ваш ответ был слегка, так сказать, эгоистичным, и я не удержался от большого соблазна...
Насчет версий, Вы совершенно правы. XP - кстати - 5.10
;-)

← →
Dimka Maslov (2002-03-28 18:25) [6]

>drpass
Как раз нет. XP всё-таки 5.1, а не 5.10.

← →
White (2002-03-29 09:44) [7]

Доброе утро господа!
Спасибо Вам за подсказку, разобрался, с вашей помощью.
Есть еще один вопрос, может быть кто подскажет, Где найти наиболее полную информацию (литературу), по процедурам и функциям модулей Delphi (Windows, SysUtils, ... и т.д.),
и API Windows ?

Как программно определить версию Windows ? Найти похожие ветки