Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Узнать какая ОС установлена (определить Windows7), Узнать установленную ОС с помощью API 
V
    Опции темы
artmaestro
Дата 16.10.2011, 15:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 80
Регистрация: 8.11.2010

Репутация: нет
Всего: 1



Здравствуйте! Столкнулся с проблемой, не могу определить с помощью API какая ОС установлена. 
Определить все ОС до Windows 7 получилось, а вот как определить, что стоит  Windows 7 - не могу понять.

Подскажите пожалуйста как можно это сделать через API ну или на крайней случай может через какой то компонент это организовать, только не используя реестр.

Буду благодарен!
PM MAIL   Вверх
bems
Дата 16.10.2011, 21:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 21
Всего: 88



GetVersionEx вроде всегда работала


--------------------
Обижено школьников: 8
PM MAIL   Вверх
artmaestro
Дата 16.10.2011, 22:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 80
Регистрация: 8.11.2010

Репутация: нет
Всего: 1



Цитата(bems @ 16.10.2011,  21:41)
GetVersionEx вроде всегда работала

Через нее удалось определить ОС, но не Windows 7
PM MAIL   Вверх
bems
Дата 17.10.2011, 01:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 21
Всего: 88



Справку читал? Семерка это dwMajorVersion = 6, dwMinorVersion = 1 и wProductType = VER_NT_WORKSTATION


--------------------
Обижено школьников: 8
PM MAIL   Вверх
Keeper89
Дата 17.10.2011, 02:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 14
Всего: 58



В последней Delphi XE2 есть новый класс для этого
http://blogs.embarcadero.com/pawelglowacki/2011/08/31/39273

Это сообщение отредактировал(а) Keeper89 - 17.10.2011, 12:47


--------------------
PM MAIL WWW   Вверх
artmaestro
Дата 17.10.2011, 16:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 80
Регистрация: 8.11.2010

Репутация: нет
Всего: 1



Цитата(Keeper89 @ 17.10.2011,  02:14)
В последней Delphi XE2 есть новый класс для этого
http://blogs.embarcadero.com/pawelglowacki/2011/08/31/39273


Спасибо за совет. Надо будет установить данную версию.


Цитата
    
Справку читал? Семерка это dwMajorVersion = 6, dwMinorVersion = 1 и wProductType = VER_NT_WORKSTATION


Под справкой ты имеешь ввиду MSDN? Я читал но не разобрался поэтому решил написать сюда. Спасибо за пример!
PM MAIL   Вверх
CodeMonkey
Дата 20.10.2011, 07:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

Репутация: 16
Всего: 89



Цитата(artmaestro @  16.10.2011,  23:36 Найти цитируемый пост)
Через нее удалось определить ОС, но не Windows 7 


Код в студию.

P.S. И что "удалось определить" - тоже.

Это сообщение отредактировал(а) CodeMonkey - 20.10.2011, 07:10


--------------------
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
PM MAIL WWW ICQ Skype GTalk Jabber   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »


 




[ Время генерации скрипта: 0.0442 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.