Скачать: CL | DM;

какой Windows ?   Найти похожие ветки 

← →
som   (2003-09-02 14:00) [0]

Как програмно узнать какой виндовс ?
Надо узнать Win NT/2000/XP или Win95/98/Me ?

---

← →
Palladin ©   (2003-09-02 14:03) [1]

:)
GetVersion

---

← →
VMcL ©   (2003-09-02 14:06) [2]

GetVersionEx

---

← →
KSergey ©   (2003-09-02 14:24) [3]

Нет, ребяты ;)

Раз уж дельфи нам это дает, на мой взгляд правильнее использовать значения Win32Platform, Win32MajorVersion, Win32MinorVersion и Win32BuildNumber из модуля SysUtils. Там же даны комментарии что дополнительно где смотреть.

---

← →
VMcL ©   (2003-09-02 14:31) [4]

>KSergey © (02.09.03 14:24) [3]

Не в тему.

procedure InitPlatformId;
var
OSVersionInfo: TOSVersionInfo;
begin
OSVersionInfo.dwOSVersionInfoSize := SizeOf(OSVersionInfo);
if GetVersionEx(OSVersionInfo) then
with OSVersionInfo do
begin
Win32Platform := dwPlatformId;
Win32MajorVersion := dwMajorVersion;
Win32MinorVersion := dwMinorVersion;
Win32BuildNumber := dwBuildNumber;
Win32CSDVersion := szCSDVersion;
end;
end;

---

← →
VMcL ©   (2003-09-02 14:33) [5]

Это я в том смысле, что использование SysUtils не всегда желательно, и нужно знать первоисточник.

---

← →
KSergey ©   (2003-09-02 14:35) [6]

VMcL © (02.09.03 14:33)

Ну ежу понятно, что GetVersionEx там и используется ;)
Вот только на подобный вопрос всегда отвечают GetVersionEx, однако про указанные константы, по-моему, мало кто догадывается.
Впрочем, возможно в этом меньшенстве лишь я один.

---

← →
KSergey ©   (2003-09-02 14:36) [7]

Впрочем, возможно в этом меньшенстве лишь я один. до недавнего времени.

---

← →
VMcL ©   (2003-09-02 14:40) [8]

>KSergey © (02.09.03 14:35) [6]
> однако про указанные константы

это не константы.

---

← →
KSergey ©   (2003-09-02 14:45) [9]

[8] VMcL © (02.09.03 14:40)
это не константы.

Ну т.е. прощу прощения, конечно. Глобальные переменные.

---

← →
DVM ©   (2003-09-02 15:28) [10]

http://delphibase.endimus.com/?action=viewfunc&topic=sysparams&id=1000 2

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: -0.975 c