Вниз
Скачать: CL | DM;

Необходимо защитить или зашифровать число от его изменения   Найти похожие ветки 

 
AlexBurton   (2005-11-29 18:10) [40]

> что за функция ?
function GetVerNum: Byte;
begin
Result := Length(user32) - SizeOf(Application.Handle);
end;

> твоя собственная ?
да, пока топик разростался, написал ее)

> приводи код ..
привел выше)

почему именно я к версии прицепился. потому что версию с трояном распространяют как новую версию 7. Вот теперь пытаюсь выпустить обновленную версию 6, которая не будет позволять так легко менять номер версии.


 
AlexBurton   (2005-11-29 18:13) [41]

а та, что с трояном, она на самом деле текущей 6-й версии, только номер у нее поменяли.


 
Digitman ©   (2005-11-29 18:21) [42]


> AlexBurton   (29.11.05 18:10) [40]


ерундой ты занялся с

Result := Length(user32) - SizeOf(Application.Handle);

в крит.участке своего кода размести

lea eax, путь_к_исп_файлу_твоего проекта
call GetCRC32 //подсчитать контр.сумму
cmp eax, контр_сумма
je ...

собери исп.файл, подсчитай его CRC32, запиши результата в "контр_сумма"

большинству "двинутых юзеров" это отобъет охоту курочить твой исп.модуль


 
AlexBurton   (2005-11-29 18:31) [43]


> Digitman ©   (29.11.05 18:21) [42]

спасибо, значит копаю в сторону CRC32.


 
Lamer@fools.ua ©   (2005-11-29 20:26) [44]

>>Digitman ©   (29.11.05 18:21) [42]

IMHO, "je" - это слишком просто. Я бы предпочёл в качестве борьбы с кулхацкерами что-то вроде "jmp eax", где EAX основывается на GetCRC32.



Страницы: 1 2 вся ветка

Скачать: CL | DM;



Память: 0.52 MB
Время: 0.025 c
1-1133334608
kot1110
2005-11-30 10:10
2005.12.25
Unit тесты


6-1126549480
oberon
2005-09-12 22:24
2005.12.25
проблема с xml запросом


2-1134403185
Shar
2005-12-12 18:59
2005.12.25
VarArrayOf


14-1133338697
блин
2005-11-30 11:18
2005.12.25
Авторские права


3-1131019475
DelphiLexx
2005-11-03 15:04
2005.12.25
Подтвердить транзакцию в процедуре




   Наверх