| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Версия Винды... [D3, Win95/98]
Riko © (2002-05-03 15:15:00)Для определения версии Винды я использую следующую функцию:
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
Oleg_Gashev (2002-05-03 16:36:00) [1]Посмотри http://gashev.com/Code.php?Code=1
ZZ (2002-05-03 16:27:00) [2]Riko
А 222 это что такое? Если номер билда, то используй GetVersionEx, там он точно есть (может и в GetVersion тоже есть)
Riko (2002-05-03 15:43:00) [3]2Anatoly Podgoretsky © (03.05.02 15:33)
Есть. Но в том коде что-то не работает. Я уже не помню что именно, давно с ним работал. Кстати, он тоже выдает 4.10.
Код, приведенный выше, проще и работает стабильно.
Anatoly Podgoretsky (2002-05-03 15:33:00) [4]В FAQ есть ответ
| |
