📄 ifggzs.pas
字号:
|
0061A6A4 8B8308030000 mov eax, [ebx+$0308]
* Reference to: Unit_0061EA74.Proc_0061FAD4
|
0061A6AA E825540000 call 0061FAD4
0061A6AF 8BC3 mov eax, ebx
* Reference to : TFrmInfoGgZs._PROC_0061BC24()
|
0061A6B1 E86E150000 call 0061BC24
* Reference to field TFrmInfoGgZs.OFFS_037C : Byte
|
0061A6B6 C6837C03000000 mov byte ptr [ebx+$037C], $00
0061A6BD 5E pop esi
0061A6BE 5B pop ebx
0061A6BF C3 ret
*)
end;
procedure TFrmInfoGgZs._PROC_0061A6C0(Sender : TObject);
begin
(*
0061A6C0 55 push ebp
0061A6C1 8BEC mov ebp, esp
0061A6C3 83C4F0 add esp, -$10
0061A6C6 53 push ebx
0061A6C7 56 push esi
0061A6C8 33DB xor ebx, ebx
0061A6CA 895DF4 mov [ebp-$0C], ebx
0061A6CD 895DF0 mov [ebp-$10], ebx
0061A6D0 884DFD mov [ebp-$03], cl
0061A6D3 668955FE mov [ebp-$02], dx
0061A6D7 8BF0 mov esi, eax
0061A6D9 33C0 xor eax, eax
0061A6DB 55 push ebp
0061A6DC 6881A86100 push $0061A881
***** TRY
|
0061A6E1 64FF30 push dword ptr fs:[eax]
0061A6E4 648920 mov fs:[eax], esp
* Reference to field TFrmInfoGgZs.OFFS_032C
|
0061A6E7 8D862C030000 lea eax, [esi+$032C]
0061A6ED 33D2 xor edx, edx
0061A6EF 8910 mov [eax], edx
0061A6F1 33D2 xor edx, edx
0061A6F3 895004 mov [eax+$04], edx
0061A6F6 33D2 xor edx, edx
0061A6F8 895008 mov [eax+$08], edx
0061A6FB 33D2 xor edx, edx
0061A6FD 89500C mov [eax+$0C], edx
0061A700 33D2 xor edx, edx
0061A702 895010 mov [eax+$10], edx
0061A705 33D2 xor edx, edx
0061A707 895014 mov [eax+$14], edx
0061A70A 33D2 xor edx, edx
0061A70C 895018 mov [eax+$18], edx
0061A70F 33D2 xor edx, edx
0061A711 89501C mov [eax+$1C], edx
0061A714 33D2 xor edx, edx
0061A716 895028 mov [eax+$28], edx
0061A719 33D2 xor edx, edx
0061A71B 89502C mov [eax+$2C], edx
0061A71E 33D2 xor edx, edx
0061A720 895030 mov [eax+$30], edx
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061A723 8B9ED0020000 mov ebx, [esi+$02D0]
0061A729 85DB test ebx, ebx
0061A72B 7411 jz 0061A73E
0061A72D 8B03 mov eax, [ebx]
* Reference to: Unit_00767B88.Proc_00768060
|
0061A72F E82CD91400 call 00768060
0061A734 663B45FE cmp ax, word ptr [ebp-$02]
0061A738 0F8428010000 jz 0061A866
* Reference to field TFrmInfoGgZs.OFFS_0370
|
0061A73E 8B8670030000 mov eax, [esi+$0370]
0061A744 85C0 test eax, eax
0061A746 7412 jz 0061A75A
* Reference to: dzhlist.Proc_006BC490
|
0061A748 E8431D0A00 call 006BC490
0061A74D 8BD6 mov edx, esi
* Reference to field TFrmInfoGgZs.OFFS_0370
|
0061A74F 8B8670030000 mov eax, [esi+$0370]
* Reference to: dzhlist.Proc_006BAC2C
|
0061A755 E8D2040A00 call 006BAC2C
* Reference to field TFrmInfoGgZs.OFFS_02D8
|
0061A75A 8B86D8020000 mov eax, [esi+$02D8]
0061A760 85C0 test eax, eax
0061A762 7412 jz 0061A776
0061A764 668B5004 mov dx, word ptr [eax+$04]
* Reference to pointer to GlobalVar_0078CF10
|
0061A768 A1DCCA7700 mov eax, dword ptr [$0077CADC]
0061A76D 8B00 mov eax, [eax]
0061A76F 33C9 xor ecx, ecx
0061A771 8B18 mov ebx, [eax]
* Possible reference to virtual method TGlobalVar_0078CF10.OFFS_04
|
0061A773 FF5304 call dword ptr [ebx+$04]
* Reference to pointer to GlobalVar_0078CF18
|
0061A776 A1E8D07700 mov eax, dword ptr [$0077D0E8]
0061A77B 8B00 mov eax, [eax]
* Reference to class TDataGenDZH
|
0061A77D 8B15EC656000 mov edx, [$006065EC]
* Reference to: system.@AsClass;
|
0061A783 E8D48CDEFF call 0040345C
0061A788 668B55FE mov dx, word ptr [ebp-$02]
* Reference to: Unit_006065EC.Proc_0060D280
|
0061A78C E8EF2AFFFF call 0060D280
* Reference to pointer to GlobalVar_0078CF10
|
0061A791 A1DCCA7700 mov eax, dword ptr [$0077CADC]
0061A796 8B00 mov eax, [eax]
0061A798 33C9 xor ecx, ecx
0061A79A 668B55FE mov dx, word ptr [ebp-$02]
0061A79E 8B18 mov ebx, [eax]
0061A7A0 FF13 call dword ptr [ebx]
* Reference to field TFrmInfoGgZs.OFFS_02D8
|
0061A7A2 8986D8020000 mov [esi+$02D8], eax
0061A7A8 33C0 xor eax, eax
* Reference to field TFrmInfoGgZs.OFFS_0328
|
0061A7AA 898628030000 mov [esi+$0328], eax
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061A7B0 8D8ED0020000 lea ecx, [esi+$02D0]
* Reference to pointer to GlobalVar_0078CF10
|
0061A7B6 A1DCCA7700 mov eax, dword ptr [$0077CADC]
0061A7BB 8B00 mov eax, [eax]
0061A7BD 668B55FE mov dx, word ptr [ebp-$02]
* Reference to: Unit_00762200.Proc_00762C90
|
0061A7C1 E8CA841400 call 00762C90
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061A7C6 83BED002000000 cmp dword ptr [esi+$02D0], +$00
0061A7CD 0F8493000000 jz 0061A866
* Reference to field TFrmInfoGgZs.OFFS_031C : Byte
|
0061A7D3 80BE1C03000000 cmp byte ptr [esi+$031C], $00
0061A7DA 7450 jz 0061A82C
0061A7DC 33C0 xor eax, eax
0061A7DE 8945F8 mov [ebp-$08], eax
0061A7E1 8D45F8 lea eax, [ebp-$08]
0061A7E4 50 push eax
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061A7E5 8B86D0020000 mov eax, [esi+$02D0]
0061A7EB 8B00 mov eax, [eax]
0061A7ED 33C9 xor ecx, ecx
0061A7EF B205 mov dl, $05
* Reference to: Unit_00767B88.Proc_00768C9C
|
0061A7F1 E8A6E41400 call 00768C9C
0061A7F6 FF75F8 push dword ptr [ebp-$08]
0061A7F9 8D55F4 lea edx, [ebp-$0C]
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061A7FC 8B86D0020000 mov eax, [esi+$02D0]
0061A802 8B00 mov eax, [eax]
* Reference to: Unit_00767B88.Proc_00768124
|
0061A804 E81BD91400 call 00768124
0061A809 8B45F4 mov eax, [ebp-$0C]
0061A80C 50 push eax
0061A80D 8D55F0 lea edx, [ebp-$10]
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061A810 8B86D0020000 mov eax, [esi+$02D0]
0061A816 8B00 mov eax, [eax]
* Reference to: Unit_00767B88.Proc_00768084
|
0061A818 E867D81400 call 00768084
0061A81D 8B55F0 mov edx, [ebp-$10]
* Reference to field TFrmInfoGgZs.OFFS_0320
|
0061A820 8B8620030000 mov eax, [esi+$0320]
0061A826 59 pop ecx
* Reference to: Unit_0061C03C.Proc_0061C24C
|
0061A827 E8201A0000 call 0061C24C
0061A82C 668B55FE mov dx, word ptr [ebp-$02]
0061A830 8BC6 mov eax, esi
0061A832 8B08 mov ecx, [eax]
* Possible reference to virtual method TFrmInfoGgZs.OFFS_00EC
|
0061A834 FF91EC000000 call dword ptr [ecx+$00EC]
0061A83A 8BC6 mov eax, esi
* Reference to : TFrmInfoGgZs.Proc_0061AC00()
|
0061A83C E8BF030000 call 0061AC00
0061A841 8BC6 mov eax, esi
* Reference to : TFrmInfoGgZs._PROC_0061B430()
|
0061A843 E8E80B0000 call 0061B430
0061A848 807DFD00 cmp byte ptr [ebp-$03], $00
0061A84C 7407 jz 0061A855
0061A84E 8BC6 mov eax, esi
* Reference to : TFrmInfoGgZs._PROC_0061B52C()
|
0061A850 E8D70C0000 call 0061B52C
0061A855 8BC6 mov eax, esi
* Reference to : TFrmInfoGgZs._PROC_0061BA88()
|
0061A857 E82C120000 call 0061BA88
0061A85C 8BC6 mov eax, esi
0061A85E 8B10 mov edx, [eax]
* Possible reference to virtual method TFrmInfoGgZs.OFFS_00FC
|
0061A860 FF92FC000000 call dword ptr [edx+$00FC]
0061A866 33C0 xor eax, eax
0061A868 5A pop edx
0061A869 59 pop ecx
0061A86A 59 pop ecx
0061A86B 648910 mov fs:[eax], edx
****** FINALLY
|
0061A86E 6888A86100 push $0061A888
0061A873 8D45F0 lea eax, [ebp-$10]
0061A876 BA02000000 mov edx, $00000002
* Reference to: system.@LStrArrayClr;
|
0061A87B E89898DEFF call 00404118
0061A880 C3 ret
* Reference to: system.@HandleFinally;
|
0061A881 E9A691DEFF jmp 00403A2C
0061A886 EBEB jmp 0061A873
****** END
|
0061A888 5E pop esi
0061A889 5B pop ebx
0061A88A 8BE5 mov esp, ebp
0061A88C 5D pop ebp
0061A88D C3 ret
*)
end;
procedure TFrmInfoGgZs._PROC_0061A890(Sender : TObject);
begin
(*
0061A890 53 push ebx
0061A891 56 push esi
0061A892 8BF0 mov esi, eax
* Reference to field TFrmInfoGgZs.OFFS_036E
|
0061A894 663B966E030000 cmp dx, word ptr [esi+$036E]
0061A89B 740C jz 0061A8A9
0061A89D B101 mov cl, $01
0061A89F 8BC6 mov eax, esi
0061A8A1 8B18 mov ebx, [eax]
* Possible reference to virtual method TFrmInfoGgZs.OFFS_00E4
|
0061A8A3 FF93E4000000 call dword ptr [ebx+$00E4]
0061A8A9 5E pop esi
0061A8AA 5B pop ebx
0061A8AB C3 ret
*)
end;
procedure TFrmInfoGgZs._PROC_0061A8AC(Sender : TObject);
begin
(*
0061A8AC 55 push ebp
0061A8AD 8BEC mov ebp, esp
0061A8AF 53 push ebx
0061A8B0 8BD8 mov ebx, eax
* Reference to field TFrmInfoGgZs.OFFS_031C : Byte
|
0061A8B2 80BB1C03000000 cmp byte ptr [ebx+$031C], $00
0061A8B9 7430 jz 0061A8EB
0061A8BB FF7508 push dword ptr [ebp+$08]
* Reference to field TFrmInfoGgZs.OFFS_0320
|
0061A8BE 8B8320030000 mov eax, [ebx+$0320]
* Reference to: Unit_0061C03C.Proc_0061C304
|
0061A8C4 E83B1A0000 call 0061C304
* Reference to field TFrmInfoGgZs.OFFS_031D : Byte
|
0061A8C9 80BB1D03000000 cmp byte ptr [ebx+$031D], $00
0061A8D0 7419 jz 0061A8EB
* Reference to control TFrmInfoGgZs.PaintBox1 : TPaintBox
|
0061A8D2 8B83E0020000 mov eax, [ebx+$02E0]
* Reference to field TPaintBox.Canvas : TCanvas
|
0061A8D8 8B9020010000 mov edx, [eax+$0120]
0061A8DE 33C9 xor ecx, ecx
* Reference to field TFrmInfoGgZs.OFFS_0320
|
0061A8E0 8B8320030000 mov eax, [ebx+$0320]
* Reference to: Unit_0061C03C.Proc_0061D934
|
0061A8E6 E849300000 call 0061D934
0061A8EB 5B pop ebx
0061A8EC 5D pop ebp
0061A8ED C20400 ret $0004
*)
end;
procedure TFrmInfoGgZs._PROC_0061A8F0(Sender : TObject);
begin
(*
0061A8F0 53 push ebx
0061A8F1 56 push esi
0061A8F2 57 push edi
0061A8F3 8BFA mov edi, edx
0061A8F5 8BD8 mov ebx, eax
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -