Вниз
Скачать: 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.012 c
14-87666
gn
2003-02-10 08:09
2003.02.27
сша обнаглело


3-87266
Magedon
2003-02-06 15:27
2003.02.27
Как программно в ДБГриде выделить кучу записей?


1-87399
BurAn
2003-02-18 05:03
2003.02.27
FillRgn (SetWndRgn )


1-87451
sidor
2003-02-17 22:19
2003.02.27
Spinedit И Звук


6-87611
koly01
2003-01-08 14:36
2003.02.27
Застрял на аутентификации!!!! помогите!




   Наверх