Проблемы с привязкой к железу

[Человек_Борща]

Сложность взлома прямо пропорционально зависит от сложности реализации.
Напишите вы хоть наибрутальнейшую защиту, но 1 методом или в 1 модуле, и она ломается быстро.
Сложно обходить хитрости разработчика, не дающие дизассемблеру правильно интерпретировать какие-то участки кода.

И как обойти придуманную мною защиту?

Вызовы Terminate и ShowMessage, nop'ами затереть.
А по хорошему вообще на сайт запретить стучаться, ибо нефиг тут трафик раскидывать.


Если пишите что-то серьёзное и планируете в том же духе, то купите готовый софт в котором уже за вас обо всем подумали. The Enigma Protector - очень не плохой и относительно не дорогой, я и сам им пользуюсь.

[Azazel9024]

Сообщение от Человек_Борща

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

Так если от сайта ответа не будет, разве приложение выполнится?

[Человек_Борща]

Так если от сайта ответа не будет, разве приложение выполнится?

Ну да, я ведь до этого просто затру выход из приложения и код проверки правильности ответа, и тогда не целесообразно оставлять подключение к сайту, следовательно его тоже надо выпилить.

[Azazel9024]

if
IdHTTP1.ResponseCode = 404
then
showmessage('Ваша копия не лицензирована.')
else
Button2.Enabled:=true;
end;

После showmessage нужно как-то закрыть приложение, но проблемы у меня с синтаксисом. Кто поможет?

[phomm]

_Язык учите_
100,(0)1 % что у Вас программа, которая даже бесплатно никому не нужна. (ну разве что школьникам, таким же как Вы, которые и сами-то не знают, что им нужно и берут из инета всякую ерунду)

if IdHTTP1.ResponseCode = 404 then
begin
  showmessage('Ваша копия не лицензирована.');
  halt(0);
end
else
  Button2.Enabled:=true;
end;

[Slym]

обойти... очень просто, любой примитивный if можно быстро найти под отладчиком и заменить на nop или jmp или
еще чего вариантов много...
сложнее неявное сравнение в разных местах, и не явным закрытием (Terminate) а какой нибудь необработанной ошибкой

[Azazel9024]

Снова всем привет. Появилась необходимость билдить в Delphi 7, но появилась ошибка.
IdHTTP1 := TIdHTTP.Create;
На эту строку ругается: not enough actual parameters

[Человек_Борща]

укажите Create(nil) если где-то не на форме, а если на форме, программно, создаешь то Create(MySuperForm)