Вниз
Скачать: CL | DM;

Генератор ключей?   Найти похожие ветки 

← →
EndDie   (2003-02-17 07:54) [0]

function HDDNum(const DrivePath:string):integer;
Доброго времени суток!
Не знает ли all, с чего начать решение проблемы:
1. Есть серийнай номер винта:
var
SerialNum:Pdword;
a,b:Dword;
buffer:array [0..255] of char;
begin
result:=0;
new(SerialNum);
if getVolumeInformation(pChar(drivePath),buffer,
sizeof(buffer),SerialNum,a,b,nil,0) then
result:=SerialNum^;
Dispose(SerialNum);
end;

2. Есть имя пользователя: user

Нужно на основе этих вводных сгенерить регистрационный номер (registration number), а уже под него - регистрационый ключ (registration key). Т.е. чел вводит свое имя, ему дается рег. номер, он его отсылает, ему в обратку - ключ для регистрации...
Вопрос: С чего начать, мож кто занимался чем подобным, приветсствуются любые предложения и куски кода (тем паче).
Спасибо.


← →
Jel ©   (2003-02-17 10:01) [1]

Таким образом ты получишь серийный номер тома, а не винта. К нему привязываться не стоит - очень легко исправить.
А для генерации серийных номеров подойдет любая обратимая криптофункция. В простейшем случае можно использовать xor. Лучше DES или MD5.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c
1-87459
Alessio2003
2003-02-18 21:47
2003.02.27
TMemo


3-87309
SL57
2003-02-07 11:23
2003.02.27
Как сделать выборку по отсутствующем значениям


14-87618
Val
2003-02-07 19:09
2003.02.27
Передача графики на мобильник via e-mail


8-87569
skyfox2
2002-11-12 11:06
2003.02.27
подскажите где взять?


14-87628
Dudko Anton
2003-02-10 05:39
2003.02.27
Pascal




   Наверх