📄 viewrcd.pas
字号:
004D2B0B E864CBFBFF call 0048F674
004D2B10 6A00 push $00
004D2B12 B907000000 mov ecx, $00000007
004D2B17 BA0A000000 mov edx, $0000000A
004D2B1C 8B83FC020000 mov eax, [ebx+$02FC]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D2B22 E84DCBFBFF call 0048F674
004D2B27 6A00 push $00
004D2B29 B907000000 mov ecx, $00000007
004D2B2E BA0B000000 mov edx, $0000000B
004D2B33 8B83FC020000 mov eax, [ebx+$02FC]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D2B39 E836CBFBFF call 0048F674
004D2B3E 5B pop ebx
004D2B3F C3 ret
*)
end;
procedure TFrmFDBViewer._PROC_004D2E2A(Sender : TObject);
begin
(*
004D2E2A 0003 add [ebx], al
004D2E2C 0000 add [eax], al
*)
end;
procedure TFrmFDBViewer._PROC_004D2E41(Sender : TObject);
begin
(*
004D2E41 0003 add [ebx], al
004D2E43 0000 add [eax], al
*)
end;
procedure TFrmFDBViewer._PROC_004D2E58(Sender : TObject);
begin
(*
004D2E58 0003 add [ebx], al
004D2E5A 0000 add [eax], al
*)
end;
procedure TFrmFDBViewer._PROC_004D2E6F(Sender : TObject);
begin
(*
004D2E6F 0003 add [ebx], al
004D2E71 0000 add [eax], al
*)
end;
procedure TFrmFDBViewer._PROC_004D2ECE(Sender : TObject);
begin
(*
004D2ECE 0403 add al, +$03
004D2ED0 0000 add [eax], al
*)
end;
procedure TFrmFDBViewer._PROC_004D2EE5(Sender : TObject);
begin
(*
004D2EE5 0403 add al, +$03
004D2EE7 0000 add [eax], al
*)
end;
procedure TFrmFDBViewer._PROC_004D2EFC(Sender : TObject);
begin
(*
004D2EFC 0403 add al, +$03
004D2EFE 0000 add [eax], al
*)
end;
procedure TFrmFDBViewer._PROC_004D2F4E(Sender : TObject);
begin
(*
004D2F4E 0803 or [ebx], al
004D2F50 0000 add [eax], al
*)
end;
procedure TFrmFDBViewer._PROC_004D2F65(Sender : TObject);
begin
(*
004D2F65 0803 or [ebx], al
004D2F67 0000 add [eax], al
*)
end;
procedure TFrmFDBViewer._PROC_004D2F7C(Sender : TObject);
begin
(*
004D2F7C 0803 or [ebx], al
004D2F7E 0000 add [eax], al
*)
end;
procedure TFrmFDBViewer._PROC_004D2FC1(Sender : TObject);
begin
(*
004D2FC1 8BEC mov ebp, esp
004D2FC3 83C4D0 add esp, -$30
004D2FC6 53 push ebx
004D2FC7 56 push esi
004D2FC8 57 push edi
004D2FC9 33DB xor ebx, ebx
004D2FCB 895DD8 mov [ebp-$28], ebx
004D2FCE 895DD4 mov [ebp-$2C], ebx
004D2FD1 895DD0 mov [ebp-$30], ebx
004D2FD4 895DDC mov [ebp-$24], ebx
004D2FD7 895DE0 mov [ebp-$20], ebx
004D2FDA 8B7508 mov esi, [ebp+$08]
004D2FDD 8D7DE4 lea edi, [ebp-$1C]
004D2FE0 51 push ecx
004D2FE1 B906000000 mov ecx, $00000006
004D2FE6 F3 rep
004D2FE7 A5 movsd
004D2FE8 59 pop ecx
004D2FE9 894DFC mov [ebp-$04], ecx
004D2FEC 8BF2 mov esi, edx
004D2FEE 8BD8 mov ebx, eax
004D2FF0 8B45FC mov eax, [ebp-$04]
* Reference to: System.@LStrAddRef(void;void):Pointer;
|
004D2FF3 E8B01EF3FF call 00404EA8
004D2FF8 33C0 xor eax, eax
004D2FFA 55 push ebp
004D2FFB 6828314D00 push $004D3128
***** TRY
|
004D3000 64FF30 push dword ptr fs:[eax]
004D3003 648920 mov fs:[eax], esp
004D3006 66837DE800 cmp word ptr [ebp-$18], +$00
004D300B 0F86A5000000 jbe 004D30B6
004D3011 8B45FC mov eax, [ebp-$04]
004D3014 50 push eax
004D3015 8BCE mov ecx, esi
004D3017 33D2 xor edx, edx
004D3019 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D301F E850C6FBFF call 0048F674
004D3024 8D55E0 lea edx, [ebp-$20]
004D3027 8B45E4 mov eax, [ebp-$1C]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D302A E8D57FF3FF call 0040B004
004D302F 8B45E0 mov eax, [ebp-$20]
004D3032 50 push eax
004D3033 8BCE mov ecx, esi
004D3035 BA01000000 mov edx, $00000001
004D303A 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D3040 E82FC6FBFF call 0048F674
004D3045 8D4DDC lea ecx, [ebp-$24]
004D3048 0FB755E8 movzx edx, word ptr [ebp-$18]
004D304C A1F87C4E00 mov eax, dword ptr [$004E7CF8]
004D3051 8B00 mov eax, [eax]
|
004D3053 E8D4E6FFFF call 004D172C
004D3058 8B45DC mov eax, [ebp-$24]
004D305B 50 push eax
004D305C 8BCE mov ecx, esi
004D305E BA02000000 mov edx, $00000002
004D3063 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D3069 E806C6FBFF call 0048F674
004D306E 8D55D4 lea edx, [ebp-$2C]
004D3071 0FB745EA movzx eax, word ptr [ebp-$16]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D3075 E88A7FF3FF call 0040B004
004D307A FF75D4 push dword ptr [ebp-$2C]
004D307D 6840314D00 push $004D3140
004D3082 8D55D0 lea edx, [ebp-$30]
004D3085 0FB745EC movzx eax, word ptr [ebp-$14]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D3089 E8767FF3FF call 0040B004
004D308E FF75D0 push dword ptr [ebp-$30]
004D3091 8D45D8 lea eax, [ebp-$28]
004D3094 BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
004D3099 E8DA1CF3FF call 00404D78
004D309E 8B45D8 mov eax, [ebp-$28]
004D30A1 50 push eax
004D30A2 8BCE mov ecx, esi
004D30A4 BA03000000 mov edx, $00000003
004D30A9 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D30AF E8C0C5FBFF call 0048F674
004D30B4 EB4F jmp 004D3105
004D30B6 8B45FC mov eax, [ebp-$04]
004D30B9 50 push eax
004D30BA 8BCE mov ecx, esi
004D30BC 33D2 xor edx, edx
004D30BE 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D30C4 E8ABC5FBFF call 0048F674
004D30C9 6A00 push $00
004D30CB 8BCE mov ecx, esi
004D30CD BA01000000 mov edx, $00000001
004D30D2 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D30D8 E897C5FBFF call 0048F674
004D30DD 6A00 push $00
004D30DF 8BCE mov ecx, esi
004D30E1 BA02000000 mov edx, $00000002
004D30E6 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D30EC E883C5FBFF call 0048F674
004D30F1 6A00 push $00
004D30F3 8BCE mov ecx, esi
004D30F5 BA03000000 mov edx, $00000003
004D30FA 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004D3100 E86FC5FBFF call 0048F674
004D3105 33C0 xor eax, eax
004D3107 5A pop edx
004D3108 59 pop ecx
004D3109 59 pop ecx
004D310A 648910 mov fs:[eax], edx
****** FINALLY
|
004D310D 682F314D00 push $004D312F
004D3112 8D45D0 lea eax, [ebp-$30]
004D3115 BA05000000 mov edx, $00000005
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
004D311A E8FD18F3FF call 00404A1C
004D311F 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D3122 E8D118F3FF call 004049F8
004D3127 C3 ret
* Reference to: System.@HandleFinally;
|
004D3128 E92312F3FF jmp 00404350
004D312D EBE3 jmp 004D3112
****** END
|
004D312F 5F pop edi
004D3130 5E pop esi
004D3131 5B pop ebx
004D3132 8BE5 mov esp, ebp
004D3134 5D pop ebp
004D3135 C20400 ret $0004
*)
end;
procedure TFrmFDBViewer._PROC_004D3145(Sender : TObject);
begin
(*
004D3145 8BEC mov ebp, esp
004D3147 B915000000 mov ecx, $00000015
004D314C 6A00 push $00
004D314E 6A00 push $00
004D3150 49 dec ecx
004D3151 75F9 jnz 004D314C
004D3153 51 push ecx
004D3154 53 push ebx
004D3155 56 push esi
004D3156 8BD8 mov ebx, eax
004D3158 8D75FC lea esi, [ebp-$04]
004D315B 33C0 xor eax, eax
004D315D 55 push ebp
* Possible String Reference to: '樨
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -