📄 msggg.pas
字号:
* Reference to: Unit_007605C8.Proc_007606A8
|
00604AF3 E8B0BB1500 call 007606A8
* Reference to field TfrmGGInfo.OFFS_0340
|
00604AF8 668B9340030000 mov dx, word ptr [ebx+$0340]
00604AFF 8BC3 mov eax, ebx
00604B01 8B08 mov ecx, [eax]
* Possible reference to virtual method TfrmGGInfo.OFFS_0144
|
00604B03 FF9144010000 call dword ptr [ecx+$0144]
00604B09 5B pop ebx
00604B0A C3 ret
*)
end;
procedure TfrmGGInfo._PROC_00604B0C(Sender : TObject);
begin
(*
00604B0C 53 push ebx
00604B0D 56 push esi
00604B0E 8BD8 mov ebx, eax
* Reference to field TfrmGGInfo.OFFS_0340
|
00604B10 663B9340030000 cmp dx, word ptr [ebx+$0340]
00604B17 7465 jz 00604B7E
* Reference to field TfrmGGInfo.OFFS_0340
|
00604B19 66899340030000 mov [ebx+$0340], dx
* Reference to pointer to GlobalVar_0078CF10
|
00604B20 A1DCCA7700 mov eax, dword ptr [$0077CADC]
00604B25 8B00 mov eax, [eax]
* Reference to: Unit_00762200.Proc_00762E10
|
00604B27 E8E4E21500 call 00762E10
00604B2C 8BF0 mov esi, eax
00604B2E 85F6 test esi, esi
00604B30 744C jz 00604B7E
* Reference to field TfrmGGInfo.OFFS_0348 : String
|
00604B32 8D8348030000 lea eax, [ebx+$0348]
* Reference to field GlobalVar_0078CF10.OFFS_00DC
|
00604B38 8D96DC000000 lea edx, [esi+$00DC]
* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
|
00604B3E E8D5F7DFFF call 00404318
* Reference to field GlobalVar_0078CF10.OFFS_00EA
|
00604B43 8A86EA000000 mov al, byte ptr [esi+$00EA]
* Reference to field TfrmGGInfo.OFFS_0342 : Byte
|
00604B49 888342030000 mov [ebx+$0342], al
* Reference to field TfrmGGInfo.OFFS_0344 : String
|
00604B4F 8D8344030000 lea eax, [ebx+$0344]
* Reference to field GlobalVar_0078CF10.OFFS_00D3
|
00604B55 8D96D3000000 lea edx, [esi+$00D3]
* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
|
00604B5B E8B8F7DFFF call 00404318
* Reference to field TfrmGGInfo.OFFS_0348 : String
|
00604B60 8B8348030000 mov eax, [ebx+$0348]
00604B66 50 push eax
* Reference to field TfrmGGInfo.OFFS_0344 : String
|
00604B67 8B8B44030000 mov ecx, [ebx+$0344]
* Reference to field TfrmGGInfo.OFFS_0342 : Byte
|
00604B6D 8A9342030000 mov dl, byte ptr [ebx+$0342]
* Reference to field TfrmGGInfo.OFFS_033C
|
00604B73 8B833C030000 mov eax, [ebx+$033C]
* Reference to: Unit_00604EE0.Proc_0060590C
|
00604B79 E88E0D0000 call 0060590C
00604B7E 5E pop esi
00604B7F 5B pop ebx
00604B80 C3 ret
*)
end;
procedure TfrmGGInfo._PROC_00604B88(Sender : TObject);
begin
(*
* Reference to field TfrmGGInfo.OFFS_033C
|
00604B88 8B803C030000 mov eax, [eax+$033C]
* Reference to: Unit_00604EE0.Proc_006056AC
|
00604B8E E8190B0000 call 006056AC
00604B93 C3 ret
*)
end;
procedure TfrmGGInfo._PROC_00604BE8(Sender : TObject);
begin
(*
00604BE8 56 push esi
00604BE9 57 push edi
00604BEA 83C4F8 add esp, -$08
00604BED 8BF2 mov esi, edx
00604BEF 8D3C24 lea edi, [esp]
00604BF2 A5 movsd
00604BF3 A5 movsd
00604BF4 8A1424 mov dl, byte ptr [esp]
00604BF7 80EA06 sub dl, $06
00604BFA 750D jnz 00604C09
00604BFC 668B542404 mov dx, word ptr [esp+$04]
00604C01 8B08 mov ecx, [eax]
* Possible reference to virtual method TfrmGGInfo.OFFS_0144
|
00604C03 FF9144010000 call dword ptr [ecx+$0144]
00604C09 59 pop ecx
00604C0A 5A pop edx
00604C0B 5F pop edi
00604C0C 5E pop esi
00604C0D C3 ret
*)
end;
procedure TfrmGGInfo._PROC_00604C24(Sender : TObject);
begin
(*
00604C24 55 push ebp
00604C25 8BEC mov ebp, esp
00604C27 51 push ecx
00604C28 53 push ebx
00604C29 56 push esi
00604C2A 894DFC mov [ebp-$04], ecx
00604C2D 8BDA mov ebx, edx
00604C2F 8BF0 mov esi, eax
00604C31 8B45FC mov eax, [ebp-$04]
* Reference to: system.@LStrAddRef;
|
00604C34 E80BF9DFFF call 00404544
00604C39 33C0 xor eax, eax
00604C3B 55 push ebp
00604C3C 68AB4C6000 push $00604CAB
***** TRY
|
00604C41 64FF30 push dword ptr fs:[eax]
00604C44 648920 mov fs:[eax], esp
* Reference to field TfrmGGInfo.OFFS_0342 : Byte
|
00604C47 3A9E42030000 cmp bl, byte ptr [esi+$0342]
00604C4D 7546 jnz 00604C95
00604C4F 8B45FC mov eax, [ebp-$04]
* Reference to field TfrmGGInfo.OFFS_0344 : String
|
00604C52 8B9644030000 mov edx, [esi+$0344]
* Reference to: system.@LStrCmp;
|
00604C58 E843F8DFFF call 004044A0
00604C5D 7536 jnz 00604C95
00604C5F B201 mov dl, $01
* Reference to field TfrmGGInfo.OFFS_033C
|
00604C61 8B863C030000 mov eax, [esi+$033C]
* Reference to: Unit_00604EE0.Proc_0060577C
|
00604C67 E8100B0000 call 0060577C
* Reference to field TfrmGGInfo.OFFS_0340
|
00604C6C 668B8640030000 mov ax, word ptr [esi+$0340]
* Reference to field TfrmGGInfo.OFFS_0340
|
00604C73 66C78640030000FFFF mov word ptr [esi+$0340], $FFFF
00604C7C 8BD0 mov edx, eax
00604C7E 8BC6 mov eax, esi
00604C80 8B08 mov ecx, [eax]
* Possible reference to virtual method TfrmGGInfo.OFFS_0144
|
00604C82 FF9144010000 call dword ptr [ecx+$0144]
00604C88 33D2 xor edx, edx
* Reference to field TfrmGGInfo.OFFS_033C
|
00604C8A 8B863C030000 mov eax, [esi+$033C]
* Reference to: Unit_00604EE0.Proc_0060577C
|
00604C90 E8E70A0000 call 0060577C
00604C95 33C0 xor eax, eax
00604C97 5A pop edx
00604C98 59 pop ecx
00604C99 59 pop ecx
00604C9A 648910 mov fs:[eax], edx
****** FINALLY
|
00604C9D 68B24C6000 push $00604CB2
00604CA2 8D45FC lea eax, [ebp-$04]
* Reference to: system.@LStrClr(String;String);
|
00604CA5 E84AF4DFFF call 004040F4
00604CAA C3 ret
* Reference to: system.@HandleFinally;
|
00604CAB E97CEDDFFF jmp 00403A2C
00604CB0 EBF0 jmp 00604CA2
****** END
|
00604CB2 5E pop esi
00604CB3 5B pop ebx
00604CB4 59 pop ecx
00604CB5 5D pop ebp
00604CB6 C3 ret
*)
end;
procedure TfrmGGInfo._PROC_00604CB8(Sender : TObject);
begin
(*
00604CB8 55 push ebp
00604CB9 8BEC mov ebp, esp
00604CBB 51 push ecx
00604CBC 53 push ebx
00604CBD 56 push esi
00604CBE 894DFC mov [ebp-$04], ecx
00604CC1 8BDA mov ebx, edx
00604CC3 8BF0 mov esi, eax
00604CC5 8B45FC mov eax, [ebp-$04]
* Reference to: system.@LStrAddRef;
|
00604CC8 E877F8DFFF call 00404544
00604CCD 33C0 xor eax, eax
00604CCF 55 push ebp
00604CD0 68064D6000 push $00604D06
***** TRY
|
00604CD5 64FF30 push dword ptr fs:[eax]
00604CD8 648920 mov fs:[eax], esp
00604CDB 668B4508 mov ax, word ptr [ebp+$08]
00604CDF 50 push eax
00604CE0 8B4DFC mov ecx, [ebp-$04]
00604CE3 8BD3 mov edx, ebx
* Reference to field TfrmGGInfo.OFFS_033C
|
00604CE5 8B863C030000 mov eax, [esi+$033C]
* Reference to: Unit_00604EE0.Proc_00605D7C
|
00604CEB E88C100000 call 00605D7C
00604CF0 33C0 xor eax, eax
00604CF2 5A pop edx
00604CF3 59 pop ecx
00604CF4 59 pop ecx
00604CF5 648910 mov fs:[eax], edx
****** FINALLY
|
00604CF8 680D4D6000 push $00604D0D
00604CFD 8D45FC lea eax, [ebp-$04]
* Reference to: system.@LStrClr(String;String);
|
00604D00 E8EFF3DFFF call 004040F4
00604D05 C3 ret
* Reference to: system.@HandleFinally;
|
00604D06 E921EDDFFF jmp 00403A2C
00604D0B EBF0 jmp 00604CFD
****** END
|
00604D0D 5E pop esi
00604D0E 5B pop ebx
00604D0F 59 pop ecx
00604D10 5D pop ebp
00604D11 C20400 ret $0004
*)
end;
procedure TfrmGGInfo._PROC_00604D14(Sender : TObject);
begin
(*
00604D14 55 push ebp
00604D15 8BEC mov ebp, esp
00604D17 83C4F8 add esp, -$08
00604D1A 53 push ebx
00604D1B 56 push esi
00604D1C 57 push edi
00604D1D 8B750C mov esi, [ebp+$0C]
00604D20 8D7DF8 lea edi, [ebp-$08]
00604D23 A5 movsd
00604D24 A5 movsd
00604D25 8BD8 mov ebx, eax
00604D27 8B4508 mov eax, [ebp+$08]
00604D2A C60001 mov byte ptr [eax], $01
00604D2D 837D1000 cmp dword ptr [ebp+$10], +$00
00604D31 7E18 jle 00604D4B
00604D33 6A00 push $00
00604D35 6A26 push $26
00604D37 6800010000 push $00000100
00604D3C 8BC3 mov eax, ebx
* Reference to: controls.TWinControl.GetHandle(TWinControl):HWND;
|
00604D3E E845B0E3FF call 0043FD88
00604D43 50 push eax
* Reference to: user32.PostMessageA()
|
00604D44 E80F3FE0FF call 00408C58
00604D49 EB16 jmp 00604D61
00604D4B 6A00 push $00
00604D4D 6A28 push $28
00604D4F 6800010000 push $00000100
00604D54 8BC3 mov eax, ebx
* Reference to: controls.TWinControl.GetHandle(TWinControl):HWND;
|
00604D56 E82DB0E3FF call 0043FD88
00604D5B 50 push eax
* Reference to: user32.PostMessageA()
|
00604D5C E8F73EE0FF call 00408C58
00604D61 5F pop edi
00604D62 5E pop esi
00604D63 5B pop ebx
00604D64 59 pop ecx
00604D65 59 pop ecx
00604D66 5D pop ebp
00604D67 C20C00 ret $000C
*)
end;
procedure TfrmGGInfo._PROC_00604EA8(Sender : TObject);
begin
(*
00604EA8 55 push ebp
00604EA9 8BEC mov ebp, esp
00604EAB 33C0 xor eax, eax
00604EAD 55 push ebp
* Possible String Reference to: '閆脒⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -