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

Вниз

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

 
Riko   (2002-05-03 15:15) [0]

Для определения версии Винды я использую следующую функцию:

procedure TForm1.WinVer;
var
WinV: Word;
begin
WinV := GetVersion AND $0000FFFF;
Edit6.Text := IntToStr(Lo(WinV))+"."+IntToStr(Hi(WinV));
end;


Функция выдает следующее - 4.10
Как можно таким же простым способом получить полную версию - 4.10.222


 
Anatoly Podgoretsky ©   (2002-05-03 15:33) [1]

В FAQ есть ответ


 
Riko   (2002-05-03 15:43) [2]

2Anatoly Podgoretsky © (03.05.02 15:33)

Есть. Но в том коде что-то не работает. Я уже не помню что именно, давно с ним работал. Кстати, он тоже выдает 4.10.

Код, приведенный выше, проще и работает стабильно.


 
ZZ   (2002-05-03 16:27) [3]

Riko
А 222 это что такое? Если номер билда, то используй GetVersionEx, там он точно есть (может и в GetVersion тоже есть)


 
Oleg_Gashev ©   (2002-05-03 16:36) [4]

Посмотри http://gashev.com/Code.php?Code=1



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
4-50174
HELP!!!!!!!!!!!!!!!
2002-03-16 09:15
2002.05.16
СРОЧНО ПОМОГИТЕ!


4-50168
Dikma
2002-03-12 15:39
2002.05.16
CHM файл


3-49866
Dorosh
2002-04-15 15:23
2002.05.16
Polaris DbTreeView


14-50106
anod
2002-04-06 00:12
2002.05.16
Подскажите


1-49932
Sergey_Kiev_student_
2002-05-03 22:57
2002.05.16
компоненты