Вверх ↑
Этот топик читают: Гость
Гость
Ответов: 17029
Рейтинг: 0
#1: 2007-03-30 19:11:39 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-04 17:59:20
карма: 0

0
Администрация
Ответов: 15295
Рейтинг: 1519
#2: 2007-03-30 19:48:37 ЛС | профиль | цитата
можно сказать, что никак
карма: 26
0
Разработчик
Ответов: 26073
Рейтинг: 2122
#3: 2007-03-30 20:45:47 ЛС | профиль | цитата
SoftWorker, можно, но только с помощью сторонних компонентов, поэтому примера не будет. И не самая лучшая защита с применением серийника HDD, про это все уже давно знают. ИМХО.
А посему
Dilma писал(а):
можно сказать, что никак
будет -- правильно.
карма: 22

0
Гость
Ответов: 17029
Рейтинг: 0
#4: 2007-03-30 21:14:23 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-04 17:59:28
карма: 0

0
Разработчик
Ответов: 26073
Рейтинг: 2122
#5: 2007-03-30 21:17:08 ЛС | профиль | цитата
SoftWorker, вот видишь, ты привел схему на нестандартных компонентах. И у большинства этих компонентов нет. Кто проверит эту схему и даст тебе рекомендации? Если только тот, у кого они остались.
карма: 22

0
Администрация
Ответов: 15295
Рейтинг: 1519
#6: 2007-03-30 21:25:32 ЛС | профиль | цитата
если эта точка номер выдает, то в чем тогда проблема-то?
карма: 26
0
Гость
Ответов: 17029
Рейтинг: 0
#7: 2007-03-30 22:03:30 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-04 17:59:28
карма: 0

0
Администрация
Ответов: 15295
Рейтинг: 1519
#8: 2007-03-30 22:03:49 ЛС | профиль | цитата
по-моему volume serial no в данном случае это некоторый номер устройства хванения информации в терминах Windows. К реально серийному номеру винчестера он скорей всего отношения не имеет. Некоторые номера устройств впринципе можно найти в ветке реестра HKEY_LOCAL_MACHINESYSTEMControlSet002EnumIDE
карма: 26
0
Ответов: 1891
Рейтинг: 110
#9: 2007-03-30 23:12:28 ЛС | профиль | цитата
SoftWorker, писал(а):
Кто-нибудь помогите - как узнать серийный номер жестк. диска


Может серийный номер тома?
Add(MainForm,2450397,21,105)
{
Left=20
Top=105
link(onCreate,9051208:doGetLogicalDrive,[])
}
Add(Drive,9051208,91,140)
{
Point(SerialNumber)
link(onOK,1513708:doText,[(139,153)(139,180)(109,180)(109,195)])
link(DriveName,9716400:Value,[(96,121)])
}
Add(Memory,9716400,91,84)
{
Default=String(C:)
}
Add(Label,1513708,119,189)
{
Left=15
Top=50
link(Text,9051208:SerialNumber,[])
}
Проверял через команду msinfo32 - все сходится!

[size=-2]------ Добавлено в 23:12
Выкладываю компонент Drive
карма: 0
%time%
0
файлы: 1Drive.rar [4.1KB] [201]
Гость
Ответов: 17029
Рейтинг: 0
#10: 2007-03-30 23:51:36 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-04 17:59:29
карма: 0

0
Ответов: 1891
Рейтинг: 110
#11: 2007-04-01 00:50:42 ЛС | профиль | цитата
SoftWorker, можешь также использовать еще и такие ключи реестра:

Регистрационный номер от компакт-диска с Windows:
HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionProductKey

Имя пользователя:
HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindows NTCurrentVersionRegisteredOwner
карма: 0
%time%
0
Ответов: 71
Рейтинг: 1
#12: 2007-04-01 17:02:37 ЛС | профиль | цитата
Видел в интернете исходники программы на Delphi, при помощи которой можно узнать серийный номер диска (не тома). Если интересно, то могу у себя поискать и выложить.
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#13: 2007-04-01 22:31:55 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-04 17:59:29
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#14: 2007-04-01 22:35:45 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-04 17:59:29
карма: 0

0
Ответов: 71
Рейтинг: 1
#15: 2007-04-02 07:40:54 ЛС | профиль | цитата
Выложил (извиняюсь, что на народе) http://dimikos.narod.ru/SmartView.rar
У меня показало тот номер, который на винте.
карма: 0

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)