Как узнать сведения о железе?

[SpaceXXX]

Здраствуйте. Пишу программу, и столкнулся с проблемой в процессе ее защиты от незаконного копирования. Я конечно понимаю, что любую программу можно взломать, но хотелось бы чтобы ее взломали не в первыую неделю...
Мысль такая - На компьютере, где установлена программа генерируется уникальный код, после чего этот код отправляется на сервер, там регистрируется код активации (из присланного кода). После чего код активации отправляется обратно на компьютер и сравнивается с сгенерированным кодом. Ну а дальше все просто: Если коды одинаковые - программа работает, если нет - досвидания...
Вроде все просто, но несколько проблем:
- Нужно привязать генерируемый код к какому-нибудь жележу, которое не меняет свои данные! (Процессор, жесткий и тд).
- Программа должна работать на всех серсиях Windows (начиная от 98).
Программа пишется на Delphi 7 (Другими языками владею посредственно)Просьба написать кусок текста программы, который поможет решить эту проблему. Заранее спасибо.

Мне бы хотябы код, который дает сведения о железе (лучше всего серийник жесткого диска, только не тома а самого винта).. а дальше я сам разберусь!

[Hollander]

var
  VolumeSerialNumber : DWORD;
  MaximumComponentLength : DWORD;
  FileSystemFlags : DWORD;
  TheSerialNumber : String;
begin
  if GetVolumeInformation('C:\',nil,0,@VolumeSerialNumber,
     MaximumComponentLength,FileSystemFlags,nil,0)
     then
     begin
     TheSerialNumber := IntToHex(HiWord(VolumeSerialNumber), 4) +
                        IntToHex(LoWord(VolumeSerialNumber), 4);
     end; 
  ShowMessage('The drive serial number is: '+TheSerialNumber);
end;

[Greblin]

Hollander это как раз серийный номер тома, а не винта
SpaceXXX, посмотрите в DRKB, вроде бы там был код

[SERG1980]

Есть комопнент LMDSysInfo из набора компонентов от LMD. Предоставляет полную инфу о компе

[Greblin]

Вроде бы LMD платный был...

[Stilet]

Вроде бы LMD платный был...

Я и бесплатные встречал в сети. LMD5 у меня например бесплатный был.

[DeKot]

А ID компьютера Вам не подойдет?
http://www.programmersforum.ru/showt...ghlight=hostid

[s.Creator]

Сообщение от SpaceXXX

...(лучше всего серийник жесткого диска, только не тома а самого винта).. а дальше я сам разберусь!

Может лучше материнской платы?
Подумайте о пользователе - он может поменять (добавить) жесткий, память, процессор - и каждый раз запрашивать очередной ключ активации?
При смене материнки во всяком случае винду переставлять наверняка придется.
И самое главное продумайте защиту кода проверяющего ключ активации
А то хакер заменит команду (asm) условного перехода в проге после проверки ключа на безусловный и все старания насмарку.

[Kotofff]

Один хороший человек по имена Terran выкладывал тут свои модули для работы с системой. Очень даже подошли бы автору темы.

http://programmersforum.ru/showthread.php?t=54664

[toreo]

Сообщение от Kotofff

Один хороший человек по имена Terran выкладывал тут свои модули для работы с системой. Очень даже подошли бы автору темы.

http://programmersforum.ru/showthread.php?t=54664

фуфло там а не модули, рег файл запустил с инфой зареганного компа, запустил прогу и работай. данные сбросятся в реестре тока при перезагрузке. короче для защиты программы использовать такое абсурд.