📄 dialogs.pas
字号:
0044E581 5F pop edi
0044E582 5E pop esi
0044E583 5B pop ebx
0044E584 8BE5 mov esp, ebp
0044E586 5D pop ebp
0044E587 C3 ret
*)
end;
procedure TMessageForm._PROC_0044E5A9(Sender : TObject);
begin
(*
0044E5A9 8BEC mov ebp, esp
0044E5AB 51 push ecx
0044E5AC 66894DFE mov [ebp-$02], cx
0044E5B0 8B4D08 mov ecx, [ebp+$08]
0044E5B3 51 push ecx
0044E5B4 6AFF push $FF
0044E5B6 6AFF push $FF
0044E5B8 6A00 push $00
0044E5BA 668B4DFE mov cx, word ptr [ebp-$02]
* Reference to : TMessageForm._PROC_0044E5EC()
|
0044E5BE E829000000 call 0044E5EC
0044E5C3 59 pop ecx
0044E5C4 5D pop ebp
0044E5C5 C20400 ret $0004
*)
end;
procedure TMessageForm._PROC_0044E5C8(Sender : TObject);
begin
(*
0044E5C8 55 push ebp
0044E5C9 8BEC mov ebp, esp
0044E5CB 51 push ecx
0044E5CC 66894DFE mov [ebp-$02], cx
0044E5D0 8B4D10 mov ecx, [ebp+$10]
0044E5D3 51 push ecx
0044E5D4 8B4D0C mov ecx, [ebp+$0C]
0044E5D7 51 push ecx
0044E5D8 8B4D08 mov ecx, [ebp+$08]
0044E5DB 51 push ecx
0044E5DC 6A00 push $00
0044E5DE 668B4DFE mov cx, word ptr [ebp-$02]
* Reference to : TMessageForm._PROC_0044E5EC()
|
0044E5E2 E805000000 call 0044E5EC
0044E5E7 59 pop ecx
0044E5E8 5D pop ebp
0044E5E9 C20C00 ret $000C
*)
end;
procedure TMessageForm._PROC_0044E5EC(Sender : TObject);
begin
(*
0044E5EC 55 push ebp
0044E5ED 8BEC mov ebp, esp
0044E5EF 83C4F4 add esp, -$0C
0044E5F2 53 push ebx
0044E5F3 56 push esi
0044E5F4 66894DFD mov [ebp-$03], cx
0044E5F8 8855FF mov [ebp-$01], dl
0044E5FB 8B750C mov esi, [ebp+$0C]
0044E5FE 8B5D10 mov ebx, [ebp+$10]
0044E601 668B4DFD mov cx, word ptr [ebp-$03]
0044E605 8A55FF mov dl, byte ptr [ebp-$01]
* Reference to: Dialogs.Proc_0044E038
|
0044E608 E82BFAFFFF call 0044E038
0044E60D 8945F4 mov [ebp-$0C], eax
0044E610 33C0 xor eax, eax
0044E612 55 push ebp
0044E613 688CE64400 push $0044E68C
***** TRY
|
0044E618 64FF30 push dword ptr fs:[eax]
0044E61B 648920 mov fs:[eax], esp
0044E61E 8B45F4 mov eax, [ebp-$0C]
0044E621 8B5514 mov edx, [ebp+$14]
* Reference to field TMessageForm.OFFS_0150
|
0044E624 899050010000 mov [eax+$0150], edx
0044E62A 8B45F4 mov eax, [ebp-$0C]
0044E62D 0524020000 add eax, +$00000224
0044E632 8B5508 mov edx, [ebp+$08]
* Reference to: System.Proc_00403DA8
|
0044E635 E86E57FBFF call 00403DA8
0044E63A 85DB test ebx, ebx
0044E63C 7C0A jl 0044E648
0044E63E 8BD3 mov edx, ebx
0044E640 8B45F4 mov eax, [ebp-$0C]
* Reference to: Controls.Proc_0042BADC
|
0044E643 E894D4FDFF call 0042BADC
0044E648 85F6 test esi, esi
0044E64A 7C0A jl 0044E656
0044E64C 8BD6 mov edx, esi
0044E64E 8B45F4 mov eax, [ebp-$0C]
* Reference to: Controls.Proc_0042BAFC
|
0044E651 E8A6D4FDFF call 0042BAFC
0044E656 85F6 test esi, esi
0044E658 7D0E jnl 0044E668
0044E65A 85DB test ebx, ebx
0044E65C 7D0A jnl 0044E668
0044E65E B204 mov dl, $04
0044E660 8B45F4 mov eax, [ebp-$0C]
* Reference to : TApplication._PROC_00444FF8()
|
0044E663 E89069FFFF call 00444FF8
0044E668 8B45F4 mov eax, [ebp-$0C]
0044E66B 8B10 mov edx, [eax]
* Possible reference to virtual method TMessageForm.OFFS_00D8
|
0044E66D FF92D8000000 call dword ptr [edx+$00D8]
0044E673 8945F8 mov [ebp-$08], eax
0044E676 33C0 xor eax, eax
0044E678 5A pop edx
0044E679 59 pop ecx
0044E67A 59 pop ecx
0044E67B 648910 mov fs:[eax], edx
****** FINALLY
|
0044E67E 6893E64400 push $0044E693
0044E683 8B45F4 mov eax, [ebp-$0C]
* Reference to: System.Proc_00402F6C
|
0044E686 E8E148FBFF call 00402F6C
0044E68B C3 ret
* Reference to: System.Proc_0040368C
|
0044E68C E9FB4FFBFF jmp 0040368C
0044E691 EBF0 jmp 0044E683
****** END
|
0044E693 8B45F8 mov eax, [ebp-$08]
0044E696 5E pop esi
0044E697 5B pop ebx
0044E698 8BE5 mov esp, ebp
0044E69A 5D pop ebp
0044E69B C21000 ret $0010
*)
end;
procedure TMessageForm._PROC_0044E6A0(Sender : TObject);
begin
(*
0044E6A0 83C9FF or ecx, -$01
0044E6A3 83CAFF or edx, -$01
* Reference to : TMessageForm._PROC_0044E6AC()
|
0044E6A6 E801000000 call 0044E6AC
0044E6AB C3 ret
*)
end;
procedure TMessageForm._PROC_0044E6AC(Sender : TObject);
begin
(*
0044E6AC 6A00 push $00
0044E6AE 52 push edx
0044E6AF 51 push ecx
0044E6B0 B204 mov dl, $04
0044E6B2 668B0DC0E64400 mov cx, word ptr [$0044E6C0]
* Reference to : TMessageForm._PROC_0044E5C8()
|
0044E6B9 E80AFFFFFF call 0044E5C8
0044E6BE C3 ret
*)
end;
procedure TMessageForm._PROC_0044E6BF(Sender : TObject);
begin
(*
0044E6BF 000400 add [eax+eax], al
0044E6C2 0000 add [eax], al
*)
end;
procedure TMessageForm._PROC_0044E6C4(Sender : TObject);
begin
(*
0044E6C4 83C4D0 add esp, -$30
* Possible String Reference to: 'commdlg_help'
|
0044E6C7 6828E74400 push $0044E728
* Reference to: user32.RegisterWindowMessageA()
|
0044E6CC E85F9BFBFF call 00408230
* Reference to GlobalVar_00503818
|
0044E6D1 A318385000 mov dword ptr [$00503818], eax
* Possible String Reference to: 'commdlg_FindReplace'
|
0044E6D6 6838E74400 push $0044E738
* Reference to: user32.RegisterWindowMessageA()
|
0044E6DB E8509BFBFF call 00408230
* Reference to GlobalVar_0050381C
|
0044E6E0 A31C385000 mov dword ptr [$0050381C], eax
0044E6E5 6A01 push $01
0044E6E7 A1DC345000 mov eax, dword ptr [$005034DC]
0044E6EC 89442424 mov [esp+$24], eax
0044E6F0 C644242800 mov byte ptr [esp+$28], $00
* Reference to: kernel32.GetCurrentThreadId()
|
0044E6F5 E89E93FBFF call 00407A98
0044E6FA 8944242C mov [esp+$2C], eax
0044E6FE C644243000 mov byte ptr [esp+$30], $00
0044E703 8D4C2424 lea ecx, [esp+$24]
* Possible String Reference to: 'WndProcPtr%.8X%.8X'
|
0044E707 BA4CE74400 mov edx, $0044E74C
0044E70C 8D442404 lea eax, [esp+$04]
* Reference to: Unit_004088DC.Proc_0040A4B0
|
0044E710 E89BBDFBFF call 0040A4B0
0044E715 50 push eax
* Reference to: kernel32.GlobalAddAtomA()
|
0044E716 E80594FBFF call 00407B20
0044E71B 66A3F80A5000 mov word ptr [$00500AF8], ax
0044E721 83C430 add esp, +$30
0044E724 C3 ret
*)
end;
procedure TMessageForm._PROC_0044E819(Sender : TObject);
begin
(*
0044E819 8BEC mov ebp, esp
0044E81B 33C0 xor eax, eax
0044E81D 55 push ebp
0044E81E 686AE84400 push $0044E86A
***** TRY
|
0044E823 64FF30 push dword ptr fs:[eax]
0044E826 648920 mov fs:[eax], esp
0044E829 FF0514385000 inc dword ptr [$00503814]
0044E82F 752B jnz 0044E85C
0044E831 66833DF80A500000 cmp word ptr [$00500AF8], +$00
0044E839 740C jz 0044E847
0044E83B 66A1F80A5000 mov ax, word ptr [$00500AF8]
0044E841 50 push eax
* Reference to: kernel32.GlobalDeleteAtom()
|
0044E842 E8E992FBFF call 00407B30
0044E847 B8240B5000 mov eax, $00500B24
0044E84C B90B000000 mov ecx, $0000000B
* Reference to object String
|
0044E851 8B15F8104000 mov edx, [$004010F8]
* Reference to: System.Proc_00404888
|
0044E857 E82C60FBFF call 00404888
0044E85C 33C0 xor eax, eax
0044E85E 5A pop edx
0044E85F 59 pop ecx
0044E860 59 pop ecx
0044E861 648910 mov fs:[eax], edx
****** FINALLY
|
0044E864 6871E84400 push $0044E871
0044E869 C3 ret
* Reference to: System.Proc_0040368C
|
0044E86A E91D4EFBFF jmp 0040368C
0044E86F EBF8 jmp 0044E869
****** END
|
0044E871 5D pop ebp
0044E872 C3 ret
*)
end;
procedure TMessageForm.Dialogs.Initialization(Sender : TObject);
begin
(*
0044E874 832D1438500001 sub dword ptr [$00503814], +$01
0044E87B 730F jnb 0044E88C
0044E87D B860E74400 mov eax, $0044E760
* Reference to: System.Proc_00403AD8
|
0044E882 E85152FBFF call 00403AD8
* Reference to : TMessageForm._PROC_0044E6C4()
|
0044E887 E838FEFFFF call 0044E6C4
0044E88C C3 ret
*)
end;
procedure TMessageForm.Dialogs.Finalization(Sender : TObject);
begin
(*
0044E818 55 push ebp
0044E819 8BEC mov ebp, esp
0044E81B 33C0 xor eax, eax
0044E81D 55 push ebp
0044E81E 686AE84400 push $0044E86A
***** TRY
|
0044E823 64FF30 push dword ptr fs:[eax]
0044E826 648920 mov fs:[eax], esp
0044E829 FF0514385000 inc dword ptr [$00503814]
0044E82F 752B jnz 0044E85C
0044E831 66833DF80A500000 cmp word ptr [$00500AF8], +$00
0044E839 740C jz 0044E847
0044E83B 66A1F80A5000 mov ax, word ptr [$00500AF8]
0044E841 50 push eax
* Reference to: kernel32.GlobalDeleteAtom()
|
0044E842 E8E992FBFF call 00407B30
0044E847 B8240B5000 mov eax, $00500B24
0044E84C B90B000000 mov ecx, $0000000B
* Reference to object String
|
0044E851 8B15F8104000 mov edx, [$004010F8]
* Reference to: System.Proc_00404888
|
0044E857 E82C60FBFF call 00404888
0044E85C 33C0 xor eax, eax
0044E85E 5A pop edx
0044E85F 59 pop ecx
0044E860 59 pop ecx
0044E861 648910 mov fs:[eax], edx
****** FINALLY
|
0044E864 6871E84400 push $0044E871
0044E869 C3 ret
* Reference to: System.Proc_0040368C
|
0044E86A E91D4EFBFF jmp 0040368C
0044E86F EBF8 jmp 0044E869
****** END
|
0044E871 5D pop ebp
0044E872 C3 ret
*)
end;
end.⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -