📄 addredit.pas
字号:
004D7777 33C0 xor eax, eax
004D7779 5A pop edx
004D777A 59 pop ecx
004D777B 59 pop ecx
004D777C 648910 mov fs:[eax], edx
****** FINALLY
|
004D777F 68A1774D00 push $004D77A1
004D7784 8D45D8 lea eax, [ebp-$28]
004D7787 BA05000000 mov edx, $00000005
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
004D778C E88BD2F2FF call 00404A1C
004D7791 8D45F0 lea eax, [ebp-$10]
* Reference to: System.@LStrClr(void;void);
|
004D7794 E85FD2F2FF call 004049F8
004D7799 C3 ret
* Reference to: System.@HandleFinally;
|
004D779A E9B1CBF2FF jmp 00404350
004D779F EBE3 jmp 004D7784
****** END
|
004D77A1 5F pop edi
004D77A2 5E pop esi
004D77A3 5B pop ebx
004D77A4 8BE5 mov esp, ebp
004D77A6 5D pop ebp
004D77A7 C3 ret
*)
end;
procedure TFrmEditAddr.Open(Sender : TObject);
begin
(*
004D780C 55 push ebp
004D780D 8BEC mov ebp, esp
004D780F B905000000 mov ecx, $00000005
004D7814 6A00 push $00
004D7816 6A00 push $00
004D7818 49 dec ecx
004D7819 75F9 jnz 004D7814
004D781B 51 push ecx
004D781C 53 push ebx
004D781D 56 push esi
004D781E 57 push edi
004D781F 8945FC mov [ebp-$04], eax
004D7822 33C0 xor eax, eax
004D7824 55 push ebp
004D7825 68227A4D00 push $004D7A22
***** TRY
|
004D782A 64FF30 push dword ptr fs:[eax]
004D782D 648920 mov fs:[eax], esp
004D7830 8B45FC mov eax, [ebp-$04]
|
004D7833 E87CFFFFFF call 004D77B4
004D7838 B201 mov dl, $01
004D783A A1B8CB4100 mov eax, dword ptr [$0041CBB8]
* Reference to: InStack.TInStack.Create(TInStack;boolean);
| or: System.TObject.Create(TObject;Boolean);
|
004D783F E834C3F2FF call 00403B78
004D7844 8945F8 mov [ebp-$08], eax
004D7847 33C0 xor eax, eax
004D7849 55 push ebp
004D784A 686F784D00 push $004D786F
***** TRY
|
004D784F 64FF30 push dword ptr fs:[eax]
004D7852 648920 mov fs:[eax], esp
004D7855 8B1504814E00 mov edx, [$004E8104]
004D785B 8B12 mov edx, [edx]
004D785D 8B45F8 mov eax, [ebp-$08]
004D7860 8B08 mov ecx, [eax]
004D7862 FF5168 call dword ptr [ecx+$68]
004D7865 33C0 xor eax, eax
004D7867 5A pop edx
004D7868 59 pop ecx
004D7869 59 pop ecx
004D786A 648910 mov fs:[eax], edx
004D786D EB0A jmp 004D7879
* Reference to: System.@HandleAnyException;
|
004D786F E928C8F2FF jmp 0040409C
* Reference to: System.@DoneExcept;
|
004D7874 E88BCBF2FF call 00404404
****** END
|
004D7879 BB01000000 mov ebx, $00000001
004D787E 8B45F8 mov eax, [ebp-$08]
004D7881 8B10 mov edx, [eax]
004D7883 FF5214 call dword ptr [edx+$14]
004D7886 48 dec eax
004D7887 85C0 test eax, eax
004D7889 0F8C4B010000 jl 004D79DA
004D788F 40 inc eax
004D7890 8945E8 mov [ebp-$18], eax
004D7893 C745F400000000 mov dword ptr [ebp-$0C], $00000000
004D789A 8D4DE4 lea ecx, [ebp-$1C]
004D789D 8B55F4 mov edx, [ebp-$0C]
004D78A0 8B45F8 mov eax, [ebp-$08]
004D78A3 8B30 mov esi, [eax]
004D78A5 FF560C call dword ptr [esi+$0C]
004D78A8 8B45E4 mov eax, [ebp-$1C]
004D78AB 8D55F0 lea edx, [ebp-$10]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
004D78AE E89533F3FF call 0040AC48
004D78B3 837DF000 cmp dword ptr [ebp-$10], +$00
004D78B7 0F8411010000 jz 004D79CE
004D78BD 8B45F0 mov eax, [ebp-$10]
004D78C0 80383B cmp byte ptr [eax], $3B
004D78C3 0F8405010000 jz 004D79CE
004D78C9 6A01 push $01
004D78CB 8D45E0 lea eax, [ebp-$20]
004D78CE 50 push eax
004D78CF C645DC20 mov byte ptr [ebp-$24], $20
004D78D3 C645DD09 mov byte ptr [ebp-$23], $09
004D78D7 8D4DDC lea ecx, [ebp-$24]
004D78DA 8D55EC lea edx, [ebp-$14]
004D78DD 8B45F0 mov eax, [ebp-$10]
|
004D78E0 E86FF0FBFF call 00496954
004D78E5 8B55E0 mov edx, [ebp-$20]
004D78E8 8D45F0 lea eax, [ebp-$10]
* Reference to: System.@LStrLAsg(void;void;void;void);
|
004D78EB E8A0D1F2FF call 00404A90
004D78F0 8B45EC mov eax, [ebp-$14]
004D78F3 50 push eax
004D78F4 8B45FC mov eax, [ebp-$04]
004D78F7 8B80F8020000 mov eax, [eax+$02F8]
004D78FD 8BCB mov ecx, ebx
004D78FF 33D2 xor edx, edx
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D7901 E86E7DFBFF call 0048F674
004D7906 33F6 xor esi, esi
004D7908 837DF000 cmp dword ptr [ebp-$10], +$00
004D790C 0F848C000000 jz 004D799E
004D7912 6A01 push $01
004D7914 8D45D8 lea eax, [ebp-$28]
004D7917 50 push eax
004D7918 C645DC20 mov byte ptr [ebp-$24], $20
004D791C C645DD09 mov byte ptr [ebp-$23], $09
004D7920 8D4DDC lea ecx, [ebp-$24]
004D7923 8D55EC lea edx, [ebp-$14]
004D7926 8B45F0 mov eax, [ebp-$10]
|
004D7929 E826F0FBFF call 00496954
004D792E 8B55D8 mov edx, [ebp-$28]
004D7931 8D45F0 lea eax, [ebp-$10]
* Reference to: System.@LStrLAsg(void;void;void;void);
|
004D7934 E857D1F2FF call 00404A90
004D7939 8B45EC mov eax, [ebp-$14]
004D793C 50 push eax
004D793D 8BFE mov edi, esi
004D793F 03FF add edi, edi
004D7941 8BD7 mov edx, edi
004D7943 42 inc edx
004D7944 8B45FC mov eax, [ebp-$04]
004D7947 8B80F8020000 mov eax, [eax+$02F8]
004D794D 8BCB mov ecx, ebx
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D794F E8207DFBFF call 0048F674
004D7954 6A01 push $01
004D7956 8D45D4 lea eax, [ebp-$2C]
004D7959 50 push eax
004D795A C645DC20 mov byte ptr [ebp-$24], $20
004D795E C645DD09 mov byte ptr [ebp-$23], $09
004D7962 8D4DDC lea ecx, [ebp-$24]
004D7965 8D55EC lea edx, [ebp-$14]
004D7968 8B45F0 mov eax, [ebp-$10]
|
004D796B E8E4EFFBFF call 00496954
004D7970 8B55D4 mov edx, [ebp-$2C]
004D7973 8D45F0 lea eax, [ebp-$10]
* Reference to: System.@LStrLAsg(void;void;void;void);
|
004D7976 E815D1F2FF call 00404A90
004D797B 8B45EC mov eax, [ebp-$14]
004D797E 50 push eax
004D797F 8BD7 mov edx, edi
004D7981 83C202 add edx, +$02
004D7984 8B45FC mov eax, [ebp-$04]
004D7987 8B80F8020000 mov eax, [eax+$02F8]
004D798D 8BCB mov ecx, ebx
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D798F E8E07CFBFF call 0048F674
004D7994 46 inc esi
004D7995 83FE09 cmp esi, +$09
004D7998 0F8E6AFFFFFF jle 004D7908
004D799E 43 inc ebx
004D799F 8B45FC mov eax, [ebp-$04]
004D79A2 8B80F8020000 mov eax, [eax+$02F8]
004D79A8 3B984C020000 cmp ebx, [eax+$024C]
004D79AE 7C1E jl 004D79CE
004D79B0 8B45FC mov eax, [ebp-$04]
004D79B3 8B80F8020000 mov eax, [eax+$02F8]
004D79B9 8B904C020000 mov edx, [eax+$024C]
004D79BF 42 inc edx
004D79C0 8B45FC mov eax, [ebp-$04]
004D79C3 8B80F8020000 mov eax, [eax+$02F8]
* Reference to: Grids.TCustomGrid.SetRowCount(TCustomGrid;Longint);
|
004D79C9 E82A5BFBFF call 0048D4F8
004D79CE FF45F4 inc dword ptr [ebp-$0C]
004D79D1 FF4DE8 dec dword ptr [ebp-$18]
004D79D4 0F85C0FEFFFF jnz 004D789A
004D79DA 8B45F8 mov eax, [ebp-$08]
* Reference to: System.TObject.Free(TObject);
|
004D79DD E8C6C1F2FF call 00403BA8
004D79E2 8B45FC mov eax, [ebp-$04]
004D79E5 8B10 mov edx, [eax]
004D79E7 FF92EC000000 call dword ptr [edx+$00EC]
004D79ED 33C0 xor eax, eax
004D79EF 5A pop edx
004D79F0 59 pop ecx
004D79F1 59 pop ecx
004D79F2 648910 mov fs:[eax], edx
****** FINALLY
|
004D79F5 68297A4D00 push $004D7A29
004D79FA 8D45D4 lea eax, [ebp-$2C]
004D79FD BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
004D7A02 E815D0F2FF call 00404A1C
004D7A07 8D45E0 lea eax, [ebp-$20]
004D7A0A BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
004D7A0F E808D0F2FF call 00404A1C
004D7A14 8D45EC lea eax, [ebp-$14]
004D7A17 BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
004D7A1C E8FBCFF2FF call 00404A1C
004D7A21 C3 ret
* Reference to: System.@HandleFinally;
|
004D7A22 E929C9F2FF jmp 00404350
004D7A27 EBD1 jmp 004D79FA
****** END
|
004D7A29 5F pop edi
004D7A2A 5E pop esi
004D7A2B 5B pop ebx
004D7A2C 8BE5 mov esp, ebp
004D7A2E 5D pop ebp
004D7A2F C3 ret
*)
end;
procedure TFrmEditAddr.ERowCountChange(Sender : TObject);
begin
(*
004D7A30 53 push ebx
004D7A31 8BD8 mov ebx, eax
004D7A33 8B8304030000 mov eax, [ebx+$0304]
* Reference to : TTimerSpeedButton._PROC_004960DC()
|
004D7A39 E89EE6FBFF call 004960DC
004D7A3E 48 dec eax
004D7A3F 7D10 jnl 004D7A51
004D7A41 BA01000000 mov edx, $00000001
004D7A46 8B8304030000 mov eax, [ebx+$0304]
* Reference to : TTimerSpeedButton._PROC_00496194()
|
004D7A4C E843E7FBFF call 00496194
004D7A51 8B8304030000 mov eax, [ebx+$0304]
* Reference to : TTimerSpeedButton._PROC_004960DC()
|
004D7A57 E880E6FBFF call 004960DC
004D7A5C 8BD0 mov edx, eax
004D7A5E 42 inc edx
004D7A5F 8B83F8020000 mov eax, [ebx+$02F8]
* Reference to: Grids.TCustomGrid.SetRowCount(TCustomGrid;Longint);
|
004D7A65 E88E5AFBFF call 0048D4F8
004D7A6A 5B pop ebx
004D7A6B C3 ret
*)
end;
procedure TFrmEditAddr._PROC_004D77B8(Sender : TObject);
begin
(*
004D77B8 51 push ecx
004D77B9 8BF8 mov edi, eax
004D77BB 8B87F8020000 mov eax, [edi+$02F8]
004D77C1 8B804C020000 mov eax, [eax+$024C]
004D77C7 48 dec eax
004D77C8 85C0 test eax, eax
004D77CA 7E37 jle 004D7803
004D77CC 890424 mov [esp], eax
004D77CF BD01000000 mov ebp, $00000001
004D77D4 8B87F8020000 mov eax, [edi+$02F8]
004D77DA 8B981C020000 mov ebx, [eax+$021C]
004D77E0 4B dec ebx
004D77E1 85DB test ebx, ebx
004D77E3 7C18 jl 004D77FD
004D77E5 43 inc ebx
004D77E6 33F6 xor esi, esi
004D77E8 6A00 push $00
004D77EA 8B87F8020000 mov eax, [edi+$02F8]
004D77F0 8BCD mov ecx, ebp
004D77F2 8BD6 mov edx, esi
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D77F4 E87B7EFBFF call 0048F674
004D77F9 46 inc esi
004D77FA 4B dec ebx
004D77FB 75EB jnz 004D77E8
004D77FD 45 inc ebp
004D77FE FF0C24 dec dword ptr [esp]
004D7801 75D1 jnz 004D77D4
004D7803 5A pop edx
004D7804 5D pop ebp
004D7805 5F pop edi
004D7806 5E pop esi
004D7807 5B pop ebx
004D7808 C3 ret
*)
end;
procedure TFrmEditAddr._PROC_004D7A6C(Sender : TObject);
begin
(*
004D7A6C 55 push ebp
004D7A6D 8BEC mov ebp, esp
004D7A6F 33C0 xor eax, eax
004D7A71 55 push ebp
* Possible String Reference to: '楹闰⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -