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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как Определить сер номер материнки и процессора? Как? 
:(
    Опции темы
VictorBondarenko
Дата 4.11.2006, 11:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Уважаемые дузья!
Подскажите пожалуйста, как из проги на Delphi
определить серийный номер процессора и материнки.

  С благодарностью и уважением,
                Виктор
PM MAIL   Вверх
Snowy
Дата 4.11.2006, 12:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484



Цитата(VictorBondarenko @  4.11.2006,  12:00 Найти цитируемый пост)
серийный номер процессора
Эта функция поддерживается не всеми процессорами.
Для получения информации о процессоре (в т.ч. серийного номера, если это поддерживается) есть такой компонент: http://www.torry.net/vcl/system/cpu/acpuid.zip

Цитата(VictorBondarenko @  4.11.2006,  12:00 Найти цитируемый пост)
и материнки
Материнка - не есть цельное устройство.
Получить её серийный номер нельзя.
Но можно получить серийный номер BIOS'a - в FAQ есть пример.
PM MAIL   Вверх
VictorBondarenko
Дата 8.11.2006, 14:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Уважаемый Модератор!

Я посмотрел компонент acpuid, о котором Вы написали,
но при его компиляции возникает ошибка.
Система не находит юнит DsgnIntf.
Есть в компоненте такая строка: 
uses  ..... , DsgnIntf;

Может чего-нибудь присоветуете?

С благодарностью и уважением, 
           Виктор

PM MAIL   Вверх
Alexeis
Дата 8.11.2006, 15:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

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



Цитата(VictorBondarenko @  8.11.2006,  14:57 Найти цитируемый пост)
uses  ..... , DsgnIntf;

А знаю, этот модуль требуется в старых версиях делфи. Нужно поискать компонентик для вашей версии.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
Snowy
Дата 8.11.2006, 15:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484



Цитата(VictorBondarenko @  8.11.2006,  15:57 Найти цитируемый пост)
но при его компиляции возникает ошибка.Система не находит юнит DsgnIntf.
Просто он написан под Delphi5.
Для 7-ки нужно дорабатывать руками.
DsgnIntf требовался для интеграции в дельфи редактора пропертей данного компонента.
Можно вообще вырезать этот редактор из кода - нет особого смысла делать его компонентом.
Главное там - функциональные классы.
Их нужно смотреть и использовать как пример.
Если всё таки хочется установить его именно, как компонент, то стоит поискать решение проблемы установки старых компонентов:
FAQ: http://vingrad.ru/DELPHI-DLP-000314
Поиск: http://www.google.ru/search?q=DsgnIntf+site:forum.vingrad.ru
PM MAIL   Вверх
Alexeis
Дата 8.11.2006, 16:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

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



Snowy, Я пробовал решить эту проблему. Тут самый тяжелый случай совмещения DisignTime и RunTime. Как пишут тут http://community.borland.com/article/27717
Требуется разделение модуля на две части (DisignTime и RunTime отдельно). Т.е. нужно перелопатить весь модуль. Это довольно сложно. Кроме того в одной из ассемблерных вставок применяется оператор dw его нужно заменить на обычную переменную типа word c тем же именем.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
Albinos_x
Дата 8.11.2006, 16:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Evil Skynet
****


Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 3
Всего: 108



примеров получения серийника проца в интернете полно... вот к примеру один из них (см. прикреплёный файл)

Добавлено @ 16:53 
ещё здесь посмотреть можно

Присоединённый файл ( Кол-во скачиваний: 81 )
Присоединённый файл  ______________.zip 168,34 Kb


--------------------
"Кто владеет информацией, тот владеет миром"    
Уинстон Черчилль
PM MAIL ICQ   Вверх
VictorBondarenko
Дата 8.11.2006, 19:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Чего-то не скачивается присоединенный "Albinos X" файл
почему-то говорит, что Эта функция запрещена для Гостей, хотя я участник.
                        Виктор
PM MAIL   Вверх
Snowy
Дата 8.11.2006, 19:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484



Перезалил сюда: http://slil.ru/23373217
И этот вариант у меня не даёт ничего. Выдал серийник 0000-0000-0000-0000-0000-0000
Не поддерживает мой проц (XP2500+) выдачу номера.
PM MAIL   Вверх
VictorBondarenko
Дата 9.11.2006, 21:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Но если все так мрачно, что где-то s/n проца определяется, а где-то нет,
если s/n BIOSa из $FEC71 для 98 читается, а для ХР нет, если в реестре,
который читается в ХР не содержится s/n BIOSa, если s/n материнки можно
прочитать только на коробке, то что же тогда есть в железе фундаментального
и уникального которое бы всегда было и программно читалось чтобы можно было бы привязать прогу к компу?

 Может быть сер.ном. модуля памяти, сер ном. монитора, сер. ном. памяти на видеокарте, 
сер.ном. винта?
  Наверняка кто-то уже такую задачу решал и не один раз.   
                                            С уважением и признательностью за любые соображения,
                                                    Виктор
         

PM MAIL   Вверх
Albinos_x
Дата 10.11.2006, 22:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Evil Skynet
****


Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 3
Всего: 108



по ссылке смотрели?

тоже не работает?

Цитата(VictorBondarenko @  9.11.2006,  21:16 Найти цитируемый пост)
сер.ном. винта

можно использовать, только вот для SATA винтов нормального алгоритма е нашёл... для обычных пример есть в DRKB...


--------------------
"Кто владеет информацией, тот владеет миром"    
Уинстон Черчилль
PM MAIL ICQ   Вверх
Burm
Дата 11.11.2006, 09:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Пример получения серийного номера винта есть в DRKB, сам попробовал - вроде на всех машинах работает.
PM MAIL   Вверх
Albinos_x
Дата 13.11.2006, 15:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Evil Skynet
****


Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 3
Всего: 108



Цитата(Burm @  11.11.2006,  09:49 Найти цитируемый пост)
сам попробовал - вроде на всех машинах работает

Цитата(Albinos_x @  10.11.2006,  22:24 Найти цитируемый пост)
 только вот для SATA винтов нормального алгоритма е нашёл

здесь подтвердение:
http://forum.vingrad.ru/topic-115197.html


--------------------
"Кто владеет информацией, тот владеет миром"    
Уинстон Черчилль
PM MAIL ICQ   Вверх
ArtemRubtsov
Дата 13.11.2006, 22:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



серийный номер на мать можно вытащщить из БИОСа (если серийник там есть, обычно нет)
из под 2000/ХР нужно писать процедуру доступа к физической памяти, пример точно есть на каком-то сайте по Delphi
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "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.0659 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


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

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