Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.11.21;
Скачать: CL | DM;

Вниз

Версия операционной сиситемы   Найти похожие ветки 

 
Fishka   (2004-10-08 10:35) [0]

Подскажите как определить весию операционки.


 
Okcid   (2004-10-08 10:45) [1]

Насчёт версии не знаю, но платформа ОС определяется с помощью функции GetVersionEx(OSVersion: TOSVersionInfo)

VER_PLATFORM_WINS32s == Windows 3.1
VER_PLATFORM_WINS32_WINDOWS == Windows 95/98/Me
VER_PLATFORM_WINS32_NT == Windows NT/2000/XP


 
piople ©   (2004-10-08 10:49) [2]

В реестре посмотреть?!


 
Fishka   (2004-10-08 10:50) [3]

Поподробней можно?


 
piople ©   (2004-10-08 10:53) [4]

А подробней в реестре смотри ^_^


 
Okcid   (2004-10-08 10:56) [5]

В реестре можно найти дополнительную инфу о windows тут:
HKLM\Software\Microsoft\Windows\CurrentVersion


 
piople ©   (2004-10-08 10:58) [6]


> Okcid

Ну взял все испортил! Пускай бы человек сам допетрил, ему и так много сказали! А так бы он(она) подумал(а) и допетрил(а) сам(а)!!!


 
Okcid   (2004-10-08 11:08) [7]

А с помощью GetVersionEx(), будет так:

OSVersion.dwOSVersionInfoSize:=SizeOf(OSVersion);
if GetVersion(OSVersion) then
begin
Label1.Caption:=Format("%d.%d (%d.%s)",[OSVersion.dwMajorVersion, OSVersion.dwMinorVersion,(OSVersion.dwBuildNumber and $FFFF), OSVersion.szCSDVersion]);
case OSVersion.dwPlatformID of
 VER_PLATFORM_WIN32s:Label2.Caption:="Windows 3.1";
 VER_PLATFORM_WIN32_WINDOWS:Label2.Caption:="Windows 95";
 VER_PLATFORM_WIN32_NT:Label2.Caption:="Windows NT";
else
 Label2.Caption:="";
end;
end;


 
CHES ©   (2004-10-08 13:01) [8]

В добавление к Okcid:

DwMajorVersion:DWORD - старшая цифра версии Windows

Windows 95 - 4
Windows 98 - 4
Windows Me - 4
Windows NT 3.51 - 3
Windows NT 4.0 - 4
Windows 2000 - 5
Windows XP - 5
DwMinorVersion: DWORD - младшая цифра версии

Windows 95 - 0
Windows 98 - 10
Windows Me - 90
Windows NT 3.51 - 51
Windows NT 4.0 - 0
Windows 2000 - 0
Windows XP - 1
DwBuildNumber: DWORD

Win NT 4 - номер билда
Win 9x - старший байт - старшая и младшая цифры версии / младший - номер билда
dwPlatformId: DWORD

VER_PLATFORM_WIN32s Win32s on Windows 3.1.
VER_PLATFORM_WIN32_WINDOWS Win32 on Windows 9x
VER_PLATFORM_WIN32_NT Win32 on Windows NT, 2000
SzCSDVersion:DWORD

NT - содержит PСhar с инфо о установленном ServicePack
9x - доп. инфо, может и не быть


 
Okcid   (2004-10-08 14:32) [9]

> CHES
И откуда ты столько знаешь?... :-)


 
Anatoly Podgoretsky ©   (2004-10-08 14:45) [10]

Да в любом FAQ есть, выбирай на вкус, если местный не нравится.


 
Okcid   (2004-10-08 16:24) [11]

Я просто недавно об этом сайте узнал, и в FAQ ещё не успел зайти. Но, думаю, там много чево интерестного есть. Обязательно зайду.



Страницы: 1 вся ветка

Текущий архив: 2004.11.21;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.039 c
1-1099224487
lipskiy
2004-10-31 15:08
2004.11.21
Печать из браузера по умолчанию?


3-1098533331
sloug
2004-10-23 16:08
2004.11.21
DBRichEdit текст


1-1099663033
Mishenka
2004-11-05 16:57
2004.11.21
Как узнать над каким компонентом находится курсор мыши?


8-1092507702
k-sergey
2004-08-14 22:21
2004.11.21
Как поменять шрифт Hint-ов?


3-1098783606
OlegL
2004-10-26 13:40
2004.11.21
CleintDataSet