Лицензия программы

[uberchel]

На! держи...

Первый код ввод лецензионого номера!

procedure TForm1.Button1Click(Sender: TObjects);
var pass: string;
begin
pass:= '123-321-123'; // лецензионого номер
if Edit1.text = pass  // проверка
then Edit2.Enabled.true // номер верен
else
ShowMessage('Номер не верен!' +#13#10+ 'Попробуйте снова.');// Номер не верен
end;

[QunneD]

Подстолом, и это ты называеш лицензия? Я бы мог показать свою систему, но нехочу распространять т.к сам использую.

[spamer]

QunneD че сразу

Подстолом

???

Да, лицензия фиговая получается, но человек может пытается разобраться в самой сути.

[QunneD]

Ой ладно мне все равно...

[uberchel]

Сообщение от QunneD

Подстолом, и это ты называеш лицензия? Я бы мог показать свою систему, но нехочу распространять т.к сам использую.

Если ты не можешь сказать, не чего умного, а только похвастаться, что у тебя вот такая система защиты "Х-й кто взломает", молодец я за тебя рад, но лучше держи это при себе, если не хочешь помочь !!!!!!!!!!!!!

P.S
Что, ты думаешь, я не знаю как написать защиту норм!....
Тут вобщето Alex2009 надо было простой пример.

[Alex2009]

Спосибо всем!!!

[Alex2009]

Да а чтоб и логин водился нужно зделать так?

procedure TForm1.Button1Click(Sender: TObjects);
var log: string;
begin
log:= 'Alex2009'; // лецензионого номер
if Edit1.text = log  // проверка
then Edit2.Enabled.true // номер верен
else
ShowMessage('Логин не верен!' +#13#10+ 'Попробуйте снова.');// Номер не верен
end;

[spamer]

Надо не так

Edit2.Enabled.true

, а

Edit2.Enabled:= true

[rzawm]

Если хочеш сделать программу как сказать с ключом, т.е. идея как я понял получать с неё деньги, -> т.е. в итоге получаем коммерческий проект. Основная цель стоящая перед тобой должна быть сделать такую систему защиты чтобы твою программу было дешевле купить чем сломать. Это как основное правило. Далее твоя процедура сравнения верности серийного номера и имени пользователя должна быть как можно дальше разнесена от ввода его самого, к примеру ввели сн и пользователя а проверка собственно должна произойти как можно дальше, перед основной проверкой на втыкай различных ложных процедур проверки, плюсом значения как сказать верных сн и логинов не должно в программе хранится в открытом виде и в различных переменных, при сравнении введённого сн и логина с истинным сн, истинный сн должен вычислятся (генерироваться) по определённому алгоритму а потом сравниваться с введённым и не вкоем случае не хранится в открытом виде в листинге программы (к примеру
var
sn:string;
begin
sn:=55sf6g665asd).
Это будет защита от как сказать дебагеров.

Далее после реализации предыдущего метода защиты необходимо полученный ехе твоей так сильно любимой программулины, сжать какиминибудь прогами для сжатия ехе шников, можно двумя тремя подрят, некоторые из них позволяют так сделать, что в итоге получиш: уменьшится размер ехе файла, и второе самое главное что при попытке его декомпилировать человеком не желающим платить за сн, декомпиляция скорее не удастся он получит не код твоей программы а фиг знает что.

Моё мнение, то что сломать можно любую софтину, вопрос только времени и необходимости этого.

[rzawm]

И ещё, чтобы сделать все по уму в плане лицензирования.

Все, что связано авторскими правами на программные продукты, в настоящее время регулируется Законом РФ от 23.09.1992 № 3523-1 "О правовой охране программ для ЭВМ и баз данных". Согласно из положениям данного закона защита авторских прав на программы для ЭВМ осуществляется аналогично защите авторских прав на литературные произведения. Изучи данные материалы.