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

← →
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]

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

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