Интересны перспективные методы криптовки и полиморфизма в самом коде, а не в сторонних криптовщиках. Кто что может сказать ? А то я в этом вообще ничего не понял. Может кто подкинет статуйку подходящую.
Имхо имеется в виду реализация полиморфного движка, дабы программа имела приблуду для самокрипта.
function blabla(): boolean;
begin
MessageBox(0,0,0,0);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
ShowMessage(IntToHex(dword(@blabla), 8));
end;
int SomeFunction()
{
MessageBox(0,0,0,0);
}
int main( void )
{
printf("Adress of SomeFunction: %x", (DWORD)&SomeFunction);
getch();
}
Private Sub Form_Load()
MsgBox Hex(fn(AddressOf blabla))
End Sub
Public Function blabla()
MsgBox "1111111111111"
End Function
Public Function fn(ByVal fn_ptr As Long)
fn = fn_ptr
End Function
blabla proc
invoke MessageBox,0,0,0,0
blabla endp
sz = $ - blabla