Главная страница
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.012 c
1-49961
Victor N Golutvin
2002-05-04 12:48
2002.05.16
Help->About и номер версии+билд???


1-50032
Vinivor
2002-05-01 19:35
2002.05.16
Как разбить строку на части?


7-50145
Tosha13
2002-02-15 18:39
2002.05.16
COM-порт


4-50169
cok
2002-03-07 20:49
2002.05.16
Потоки


1-49991
Vasjatka
2002-04-30 13:31
2002.05.16
Kak uprvljatj ciklom iz okna ?