Главная страница
    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.44 MB
Время: 0.006 c
14-50096
Yuraz
2002-04-06 11:01
2002.05.16
Как доустановить Delphi5


3-49877
Kolyan
2002-04-19 16:36
2002.05.16
Как перевести базу в SQL Server?


1-49970
eSKey
2002-04-29 17:42
2002.05.16
И как это убрать?!


1-49913
snoup
2002-04-29 00:15
2002.05.16
Помогите пожалуйста, например я где-то в блокноте или в офисе пиш


14-50105
hp1100
2002-04-05 09:19
2002.05.16
Как протоптать дорожку по умолчанию на открытие проектов?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский