⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 extctrls.pas

📁 传奇3delphi代码 请自己看吧 包括地图
💻 PAS
📖 第 1 页 / 共 2 页
字号:
0044CB11   8945F8                 mov     [ebp-$08], eax
0044CB14   8B5D08                 mov     ebx, [ebp+$08]
0044CB17   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TPanel.OFFS_0010
|
0044CB1A   8B4010                 mov     eax, [eax+$10]
0044CB1D   BA01000000             mov     edx, $00000001

* Reference to : TIcon._PROC_0041A358()
|
0044CB22   E831D8FCFF             call    0041A358
0044CB27   8B45FC                 mov     eax, [ebp-$04]
0044CB2A   FF480C                 dec     dword ptr [eax+$0C]
0044CB2D   8B45FC                 mov     eax, [ebp-$04]
0044CB30   FF4808                 dec     dword ptr [eax+$08]
0044CB33   85DB                   test    ebx, ebx
0044CB35   7E19                   jle     0044CB50
0044CB37   4B                     dec     ebx
0044CB38   55                     push    ebp

* Reference to: ExtCtrls.Proc_0044CA40
|
0044CB39   E802FFFFFF             call    0044CA40
0044CB3E   59                     pop     ecx
0044CB3F   6AFF                   push    $FF
0044CB41   6AFF                   push    $FF
0044CB43   8B45FC                 mov     eax, [ebp-$04]
0044CB46   50                     push    eax

* Reference to: user32.InflateRect()
|
0044CB47   E8D4B5FBFF             call    00408120
0044CB4C   85DB                   test    ebx, ebx
0044CB4E   7FE7                   jnle    0044CB37
0044CB50   8B45FC                 mov     eax, [ebp-$04]
0044CB53   FF400C                 inc     dword ptr [eax+$0C]
0044CB56   8B45FC                 mov     eax, [ebp-$04]
0044CB59   FF4008                 inc     dword ptr [eax+$08]
0044CB5C   5B                     pop     ebx
0044CB5D   8BE5                   mov     esp, ebp
0044CB5F   5D                     pop     ebp
0044CB60   C20800                 ret     $0008

*)
end;

procedure TPanel._PROC_0044CB64(Sender : TObject);
begin
(*
0044CB64   55                     push    ebp
0044CB65   8BEC                   mov     ebp, esp
0044CB67   51                     push    ecx
0044CB68   53                     push    ebx
0044CB69   56                     push    esi
0044CB6A   84D2                   test    dl, dl
0044CB6C   7408                   jz      0044CB76
0044CB6E   83C4F0                 add     esp, -$10

* Reference to: System.Proc_0040326C
|
0044CB71   E8F666FBFF             call    0040326C
0044CB76   8855FF                 mov     [ebp-$01], dl
0044CB79   8BD8                   mov     ebx, eax
0044CB7B   33D2                   xor     edx, edx
0044CB7D   8BC3                   mov     eax, ebx

* Reference to: Controls.Proc_00433430
|
0044CB7F   E8AC68FEFF             call    00433430
0044CB84   A1F4CB4400             mov     eax, dword ptr [$0044CBF4]
0044CB89   0B4340                 or      eax, [ebx+$40]

* Reference to field TPanel.OFFS_0040
|
0044CB8C   894340                 mov     [ebx+$40], eax
0044CB8F   B201                   mov     dl, $01

* Reference to class TPicture
|
0044CB91   A1008C4100             mov     eax, dword ptr [$00418C00]

* Reference to: Graphics.Proc_0041CA24
|
0044CB96   E889FEFCFF             call    0041CA24
0044CB9B   8BF0                   mov     esi, eax

* Reference to field TPanel.OFFS_0128
|
0044CB9D   89B328010000           mov     [ebx+$0128], esi

* Reference to field TPicture.OFFS_000C
|
0044CBA3   895E0C                 mov     [esi+$0C], ebx

* Reference to field TPicture.OFFS_0008
|
0044CBA6   C7460800CF4400         mov     dword ptr [esi+$08], $0044CF00

* Reference to field TPicture.OFFS_001C
|
0044CBAD   895E1C                 mov     [esi+$1C], ebx
0044CBB0   8BC3                   mov     eax, ebx
0044CBB2   66BACDFF               mov     dx, $FFCD

* Reference to: System.Proc_00403160
|
0044CBB6   E8A565FBFF             call    00403160

* Reference to field TPicture.OFFS_0018
|
0044CBBB   894618                 mov     [esi+$18], eax
0044CBBE   BA69000000             mov     edx, $00000069
0044CBC3   8BC3                   mov     eax, ebx

* Reference to: Controls.Proc_0042BB40
|
0044CBC5   E876EFFDFF             call    0042BB40
0044CBCA   BA69000000             mov     edx, $00000069
0044CBCF   8BC3                   mov     eax, ebx

* Reference to: Controls.Proc_0042BB20
|
0044CBD1   E84AEFFDFF             call    0042BB20
0044CBD6   8BC3                   mov     eax, ebx
0044CBD8   807DFF00               cmp     byte ptr [ebp-$01], $00
0044CBDC   740F                   jz      0044CBED

* Reference to: System.Proc_004032C4
|
0044CBDE   E8E166FBFF             call    004032C4
0044CBE3   648F0500000000         pop     dword ptr fs:[$00000000]
0044CBEA   83C40C                 add     esp, +$0C
0044CBED   8BC3                   mov     eax, ebx
0044CBEF   5E                     pop     esi
0044CBF0   5B                     pop     ebx
0044CBF1   59                     pop     ecx
0044CBF2   5D                     pop     ebp
0044CBF3   C3                     ret

*)
end;

procedure TPanel._PROC_0044CBF4(Sender : TObject);
begin
(*
0044CBF4   0008                   add     [eax], cl
0044CBF6   0000                   add     [eax], al

*)
end;

procedure TPanel._PROC_0044CC6A(Sender : TObject);
begin
(*
0044CC6A   2801                   sub     [ecx], al
0044CC6C   0000                   add     [eax], al

*)
end;

procedure TPanel._PROC_0044CC77(Sender : TObject);
begin
(*
0044CC77   2801                   sub     [ecx], al
0044CC79   0000                   add     [eax], al

*)
end;

procedure TPanel._PROC_0044CC8A(Sender : TObject);
begin
(*
0044CC8A   D200                   rol     byte ptr [eax], cl
0044CC8C   52                     push    edx
0044CC8D   8B8328010000           mov     eax, [ebx+$0128]

* Reference to: Graphics.Proc_0041CF14
|
0044CC93   E87C02FDFF             call    0041CF14
0044CC98   8B5338                 mov     edx, [ebx+$38]
0044CC9B   2BD0                   sub     edx, eax
0044CC9D   D1FA                   sar     edx, 1
0044CC9F   7903                   jns     0044CCA4
0044CCA1   83D200                 adc     edx, +$00
0044CCA4   52                     push    edx
0044CCA5   8B8328010000           mov     eax, [ebx+$0128]

* Reference to: Graphics.Proc_0041CF14
|
0044CCAB   E86402FDFF             call    0041CF14
0044CCB0   8BC8                   mov     ecx, eax
0044CCB2   58                     pop     eax
0044CCB3   5A                     pop     edx

* Reference to: Classes.Proc_00411030
|
0044CCB4   E87743FCFF             call    00411030
0044CCB9   EB23                   jmp     0044CCDE
0044CCBB   8B8328010000           mov     eax, [ebx+$0128]

* Reference to: Graphics.Proc_0041CF2C
|
0044CCC1   E86602FDFF             call    0041CF2C
0044CCC6   50                     push    eax
0044CCC7   56                     push    esi
0044CCC8   8B8328010000           mov     eax, [ebx+$0128]

* Reference to: Graphics.Proc_0041CF14
|
0044CCCE   E84102FDFF             call    0041CF14
0044CCD3   8BC8                   mov     ecx, eax
0044CCD5   33D2                   xor     edx, edx
0044CCD7   33C0                   xor     eax, eax

* Reference to: Classes.Proc_00411014
|
0044CCD9   E83643FCFF             call    00411014
0044CCDE   5E                     pop     esi
0044CCDF   5B                     pop     ebx
0044CCE0   C3                     ret

*)
end;

procedure TPanel._PROC_0044CCE4(Sender : TObject);
begin
(*
0044CCE4   55                     push    ebp
0044CCE5   8BEC                   mov     ebp, esp
0044CCE7   83C4E8                 add     esp, -$18
0044CCEA   53                     push    ebx
0044CCEB   8945FC                 mov     [ebp-$04], eax
0044CCEE   8B45FC                 mov     eax, [ebp-$04]
0044CCF1   F6402010               test    byte ptr [eax+$20], $10
0044CCF5   7436                   jz      0044CD2D
0044CCF7   8B45FC                 mov     eax, [ebp-$04]

* Reference to field TPanel.OFFS_0120
|
0044CCFA   8B9820010000           mov     ebx, [eax+$0120]
0044CD00   8B4310                 mov     eax, [ebx+$10]
0044CD03   B201                   mov     dl, $01

* Reference to : TIcon._PROC_0041A328()
|
0044CD05   E81ED6FCFF             call    0041A328
0044CD0A   8B4314                 mov     eax, [ebx+$14]
0044CD0D   B201                   mov     dl, $01

* Reference to : TIcon._PROC_0041A64C()
|
0044CD0F   E838D9FCFF             call    0041A64C
0044CD14   8B45FC                 mov     eax, [ebp-$04]

* Reference to field TPanel.OFFS_0038
|
0044CD17   8B4038                 mov     eax, [eax+$38]
0044CD1A   50                     push    eax
0044CD1B   8B45FC                 mov     eax, [ebp-$04]

* Reference to field TPanel.OFFS_003C
|
0044CD1E   8B403C                 mov     eax, [eax+$3C]
0044CD21   50                     push    eax
0044CD22   33C9                   xor     ecx, ecx
0044CD24   33D2                   xor     edx, edx
0044CD26   8BC3                   mov     eax, ebx

* Reference to: Graphics.Proc_0041AA10
|
0044CD28   E8E3DCFCFF             call    0041AA10
0044CD2D   8B45FC                 mov     eax, [ebp-$04]

* Reference to field TPanel.OFFS_013C
|
0044CD30   8A803C010000           mov     al, byte ptr [eax+$013C]
0044CD36   8845FB                 mov     [ebp-$05], al
0044CD39   8B45FC                 mov     eax, [ebp-$04]

* Reference to field TPanel.OFFS_013C
|
0044CD3C   C6803C01000001         mov     byte ptr [eax+$013C], $01
0044CD43   33C0                   xor     eax, eax
0044CD45   55                     push    ebp

* Possible String Reference to: '轵h

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -