Topic: Лицензионный ключ
Как сделать в созданную программу лицензионный ключ для каждого компьютера отдельно?
My Visual Database → Russian → Лицензионный ключ
Как сделать в созданную программу лицензионный ключ для каждого компьютера отдельно?
необходимо, чтобы один и тот же ключ не мог работать на разных компьютерах?
Да
Обычно это реализуется с помощью какого либо неизменяемого идентификатора компьютера, например серийного номера жесткого диска, который можете получить так:
GetHardDiskSerial('c');
далее клиент должен сообщить вам этот номер, и на основе этого номера вы генерируете индивидуальный ключ для данного компьютера, в простейшем случае, например можно просто переставить некоторые символы данного номера.
затем этот ключ отсылаете обратно клиенту, который он должен ввести в программу, и скрипт сверит правильность данного ключа с использованием функции GetHardDiskSerial
затем данный ключ необходимо где то сохранить на компьютере клиента, например в реестре, и теперь каждый раз при запуске проекта скрипт будет проверять данный ключ на правильность.
К сожалению готового примера у меня нет.
можете сделать простой пример?
К сожалению пример будет не совсем простой, поэтому не могу.
у меня есть исходники этого примера сделанной на Delphi, не знаю как его привязать к программе, исходник прилагается
данный пример невозможно привязать к проекту, скрипт хоть и позволяет использовать синтаксис и функции как в Delphi, но все же полностью с ней не совместим.
Содержимое второй скопируйте на первую папку
как нам быть, этот вопрос будет еще подниматься пользователями несколько раз
пока этот вопрос поднимается первый раз за все время )
На английском форуме я вроде встретил похожую тему
точно, было дело )
может стоит сделать пример, а дальше все будут по своему его изменят, ведь на основе вашей программы многие тут делают проекты, и если получится внедрить лицензию то вашему проекту не будет цены, я сам например уже куплю у вас лицензионный ключ для MVDB.
Представляю вашему вниманию проект Лицензия и Серийник. Работает. Может у кого другая идея по реализации.
Забыл написать. При показе Серийного номера надо удалить буквы а цифры вводить в Серийник и после этого надо сгенерировать ключ. Например, если A90PN788Y09 - то надо удалить буквы и останется только цифры - 9078809, вот это надо вводить в серийник и сгенерировать ключ.
Уважаемый Админ. Я воспользовался функцией GetHardDiskSerial. Какую функцию использовать чтобы узнать номер процессора?Это мой скрипт:
procedure Form1_OnShow (Sender: string; Action: string);
var
res:string;
begin
res := GetHardDiskSerial ('C');
if (res = '0') then
begin
res := GetHardDiskSerial ('D');
if (res = '0') then
begin
res := GetHardDiskSerial ('E');
if (res = '0') then
res := GetHardDiskSerial ('F');
end;
pha1984
Такой функции нет, и к сожалению реализовать ее вряд ли получится, на сколько я знаю у процессора нет серийного номера.
В Delphi ведь есть какая та функция использующая процессор
pha1984
Такой функции нет, и к сожалению реализовать ее вряд ли получится, на сколько я знаю у процессора нет серийного номера.
Уважаемый pha1984 , не могли бы вы по подробней описать ваш способ внедрения "серийника" в проект.
Просто пытаюсь сделать следующее : пробную версию + если ввести ключ то пробная версия становиться постоянной .... вообще это реально сделать ????
да можно сделать, отправьте проект я посмотрю
Уважаемый pha1984 , не могли бы вы по подробней описать ваш способ внедрения "серийника" в проект.
Просто пытаюсь сделать следующее : пробную версию + если ввести ключ то пробная версия становиться постоянной .... вообще это реально сделать ????
pha1984 я правда еще ничего не добавлял в проект по этому поводу ... все равно выслать посмотреть ?
да
pha1984 ... отправил на почту , потому что не нашел кнопки чтоб сюда прикрепить
ок я посмотрю
My Visual Database → Russian → Лицензионный ключ
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi