procedure TZForm.Button4Click(Sender : TObject);
begin
(*
00589500 55 push ebp
00589501 8BEC mov ebp, esp
00589503 6A00 push $00
00589505 6A00 push $00
00589507 53 push ebx
00589508 8BD8 mov ebx, eax
0058950A 33C0 xor eax, eax
0058950C 55 push ebp
* Possible String Reference to: '軻扮腓[YY]脨U嬱3繳h!朮'
|
0058950D 6857955800 push $00589557
***** TRY
|
00589512 64FF30 push dword ptr fs:[eax]
00589515 648920 mov fs:[eax], esp
00589518 8D55F8 lea edx, [ebp-$08]
0058951B 8B83A0050000 mov eax, [ebx+$05A0]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
00589521 E842BCEEFF call 00475168
00589526 8B45F8 mov eax, [ebp-$08]
00589529 8D55FC lea edx, [ebp-$04]
|
0058952C E81B65FFFF call 0057FA4C
00589531 8B45FC mov eax, [ebp-$04]
* Reference to: Dialogs.ShowMessage(AnsiString);
|
00589534 E8E318EBFF call 0043AE1C
00589539 33C0 xor eax, eax
0058953B 5A pop edx
0058953C 59 pop ecx
0058953D 59 pop ecx
0058953E 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[YY]脨U嬱3繳h!朮'
|
00589541 685E955800 push $0058955E
00589546 8D45F8 lea eax, [ebp-$08]
* Reference to: System.@LStrClr(void;void);
|
00589549 E886B8E7FF call 00404DD4
0058954E 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
00589551 E87EB8E7FF call 00404DD4
00589556 C3 ret
* Reference to: System.@HandleFinally;
|
00589557 E9F0B0E7FF jmp 0040464C
0058955C EBE8 jmp 00589546
****** END
|
0058955E 5B pop ebx
0058955F 59 pop ecx
00589560 59 pop ecx
00589561 5D pop ebp
00589562 C3 ret
*)
end;
end.
uj5u.com熱心網友回復：
... 應該是delphi的.. 不過你這反匯編出來的都是 匯編代碼了..里面還有很多注釋..uj5u.com熱心網友回復：
這是反匯編出來的uj5u.com熱心網友回復：
樓主有DEDE等反編譯出來的吧。uj5u.com熱心網友回復：
這是匯編代碼不是delphi代碼
uj5u.com熱心網友回復：
是反編譯出來的，這個沒有可識別性嗎？
uj5u.com熱心網友回復：
這個是DEDE反編譯出來的……LS說過了……uj5u.com熱心網友回復：
當然可識別嗎，不然別人怎么破解……（不過我不會
）
uj5u.com熱心網友回復：
可以肯定這個不是Delphi的代碼了，看代碼樣子有點像拿除錯器運行某一段程式的時候，CPU視窗顯示的資訊。不過如果在Delphi函式或者程序里，可以使用ASM關鍵字來執行匯編陳述句。
例子：
將a的值賦給b：
var
a, b: word;
begin
a := 1;
b := 2;
asm
mov ax, a
mov b, ax
end;
Caption := IntToStr(b);
end;
uj5u.com熱心網友回復：
這個看上去是的不過不是原版uj5u.com熱心網友回復：
反編譯成匯編語言了 ，看大概應該是從delphi反編譯的uj5u.com熱心網友回復：
procedure TZForm.Button4Click;
begin
_ebx_ := Self;
try
_edx_ := ^lvar_8;
_eax_ := Edit2;
lvar_8 := Edit2.GetText;
_eax_ := lvar_8;
_edx_ := ^lvar_4;
sub_0057FA4C(lvar_8, lvar_4);
_eax_ := lvar_4;
ShowMessage(lvar_4);
finally
_eax_ := ^lvar_8;
lvar_8 := '';
_eax_ := ^lvar_4;
lvar_4 := '';
end;
end;
uj5u.com熱心網友回復：
http://bbs.csdn.net/topics/390707213?page=1#post-396735813 看看此貼uj5u.com熱心網友回復：
這個，我看不懂你可以幫我分析一下嗎。
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/116035.html
標籤：數據庫相關
上一篇：xe3下的rsa演算法