Текущий архив: 2003.02.27;
Скачать: 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 вся ветка
Текущий архив: 2003.02.27;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.023 c
