Вниз
Скачать: 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.026 c
3-40890
Barada
2003-10-20 15:07
2003.11.13
Как вытащить список доступных LANGDRIVER ?


1-41573
andrew&max
2003-10-25 12:03
2003.11.13
Встраивание в Word


3-40793
Школьник
2003-10-21 21:35
2003.11.13
TTable и временная таблица в MSSQL


3-40833
___Nikolay
2003-10-21 11:21
2003.11.13
Почему-то виснет....................................


14-41958
Vlad Oshin
2003-10-17 12:42
2003.11.13
А что, плохая шутка? - Продам презервативы




   Наверх