асемблер в дельфи
Пользователи, просматривающие топик: none
|
Зашли как: Guest
|
Имя  |
| Сообщение |
<< Старые топики Новые топики >> |
|
|
асемблер в дельфи - 2010-03-30 18:07:11.370000
|
|
|
iamkreol
Сообщений: 2
Оценки: 0
Присоединился: 2010-03-30 17:55:22.830000
|
привет всем. я с помощью dede перевел код экзешника. и внутри процедур у меня ассемблерный код. его я не знаю(((. подскажите как "вернуть" в дельфи код? или может литературу посоветуете?
(*
0048B6F8 55 push ebp
0048B6F9 8BEC mov ebp, esp
0048B6FB 6A00 push $00
0048B6FD 6A00 push $00
0048B6FF 6A00 push $00
0048B701 53 push ebx
0048B702 8BD8 mov ebx, eax
0048B704 33C0 xor eax, eax
0048B706 55 push ebp
0048B707 6888B74800 push $0048B788
***** TRY
|
0048B70C 64FF30 push dword ptr fs:[eax]
0048B70F 648920 mov fs:[eax], esp
0048B712 8D55FC lea edx, [ebp-$04]
* Reference to control TFRMReg.fldActKey : TEdit
|
0048B715 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0048B71B E80CB9FBFF call 0044702C
0048B720 837DFC00 cmp dword ptr [ebp-$04], +$00
0048B724 743C jz 0048B762
0048B726 8D45F8 lea eax, [ebp-$08]
0048B729 50 push eax
0048B72A 8D55F4 lea edx, [ebp-$0C]
* Reference to control TFRMReg.fldActKey : TEdit
|
0048B72D 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0048B733 E8F4B8FBFF call 0044702C
0048B738 8B4DF4 mov ecx, [ebp-$0C]
* Possible String Reference to: 'RegKey'
|
0048B73B BA9CB74800 mov edx, $0048B79C
* Possible String Reference to: 'Registration'
|
0048B740 B8ACB74800 mov eax, $0048B7AC
|
0048B745 E81A3FFEFF call 0046F664
0048B74A 66BAF5FF mov dx, $FFF5
0048B74E 8BC3 mov eax, ebx
* Reference to: Controls.TControl.SetCursor(TControl;TCursor);
|
0048B750 E8E3BAFBFF call 00447238
0048B755 B201 mov dl, $01
* Reference to control TFRMReg.Tmr : TTimer
|
0048B757 8B8314030000 mov eax, [ebx+$0314]
* Reference to: ExtCtrls.TTimer.SetEnabled(TTimer;Boolean);
|
0048B75D E84E58FAFF call 00430FB0
0048B762 33C0 xor eax, eax
0048B764 5A pop edx
0048B765 59 pop ecx
0048B766 59 pop ecx
0048B767 648910 mov fs:[eax], edx
****** FINALLY
|
0048B76A 688FB74800 push $0048B78F
0048B76F 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
0048B772 E8F192F7FF call 00404A68
0048B777 8D45F8 lea eax, [ebp-$08]
* Reference to: System.@LStrClr(void;void);
|
0048B77A E8E992F7FF call 00404A68
0048B77F 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
0048B782 E8E192F7FF call 00404A68
0048B787 C3 ret
* Reference to: System.@HandleFinally;
|
0048B788 E9B78CF7FF jmp 00404444
0048B78D EBE0 jmp 0048B76F
****** END
|
0048B78F 5B pop ebx
0048B790 8BE5 mov esp, ebp
0048B792 5D pop ebp
0048B793 C3 ret
*)
|
|
|
|
|
RE: асемблер в дельфи - 2010-03-30 20:03:06.213333
|
|
|
Flint_ta
Сообщений: 3720
Оценки: 1120
Присоединился: 2007-01-26 15:49:18.323333
|
quote:
подскажите как
А никак ), вникать что к чему и писать тоже самое на любом языке высокого уровня.
|
|
|
|
|
RE: асемблер в дельфи - 2010-03-30 21:06:18.516666
|
|
|
iamkreol
Сообщений: 2
Оценки: 0
Присоединился: 2010-03-30 17:55:22.830000
|
а жаль(
а как определить что этой командой вызываеться?
call 00430FB0
|
|
|
|
|
RE: асемблер в дельфи - 2010-03-31 01:30:59.670000
|
|
|
Flint_ta
Сообщений: 3720
Оценки: 1120
Присоединился: 2007-01-26 15:49:18.323333
|
зайти в нее, это же функция, она должна заканчиваться командой ret
|
|
|
|
|
|
