📄 imglist.pas
字号:
unit ImgList;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TCustomImageList=class(TForm)
procedure _PROC_00437B78(Sender : TObject);
procedure _PROC_00437B98(Sender : TObject);
procedure _PROC_00437BE4(Sender : TObject);
procedure _PROC_00437C38(Sender : TObject);
procedure _PROC_00437CA4(Sender : TObject);
procedure _PROC_00437D5C(Sender : TObject);
procedure _PROC_00437D64(Sender : TObject);
procedure _PROC_00437D70(Sender : TObject);
procedure _PROC_00437E34(Sender : TObject);
procedure _PROC_00437E6C(Sender : TObject);
procedure _PROC_00437EB0(Sender : TObject);
procedure _PROC_00437EF4(Sender : TObject);
procedure _PROC_00437F20(Sender : TObject);
procedure _PROC_00437F30(Sender : TObject);
procedure _PROC_00437F40(Sender : TObject);
procedure _PROC_00437F94(Sender : TObject);
procedure _PROC_00437FC8(Sender : TObject);
procedure _PROC_00438064(Sender : TObject);
procedure _PROC_00438130(Sender : TObject);
procedure _PROC_0043824C(Sender : TObject);
procedure _PROC_00438270(Sender : TObject);
procedure _PROC_00438498(Sender : TObject);
procedure _PROC_00438524(Sender : TObject);
procedure _PROC_00438530(Sender : TObject);
procedure _PROC_00438568(Sender : TObject);
procedure _PROC_00438590(Sender : TObject);
procedure _PROC_00438768(Sender : TObject);
procedure _PROC_004387B4(Sender : TObject);
procedure _PROC_0043894C(Sender : TObject);
procedure _PROC_0043896C(Sender : TObject);
procedure _PROC_00438A2C(Sender : TObject);
procedure _PROC_00438AD0(Sender : TObject);
procedure _PROC_00438ADC(Sender : TObject);
procedure _PROC_00438B54(Sender : TObject);
procedure _PROC_00438B70(Sender : TObject);
procedure _PROC_00438B80(Sender : TObject);
procedure _PROC_00438BD0(Sender : TObject);
procedure _PROC_00438C14(Sender : TObject);
procedure _PROC_00438C28(Sender : TObject);
procedure _PROC_00438C68(Sender : TObject);
procedure _PROC_00438D58(Sender : TObject);
procedure _PROC_00438DB4(Sender : TObject);
procedure _PROC_00438E0D(Sender : TObject);
procedure _PROC_0043909C(Sender : TObject);
procedure _PROC_00439120(Sender : TObject);
procedure _PROC_004391A8(Sender : TObject);
procedure _PROC_0043922A(Sender : TObject);
procedure ImgList.Finalization(Sender : TObject);
procedure ImgList.Initialization(Sender : TObject);
private
{ Private declarations }
public
{ Public declarations }
end ;
var
CustomImageList: TCustomImageList;
{This file is generated by DeDe Ver 3.50.04 Copyright (c) 1999-2002 DaFixer}
implementation
{$R *.DFM}
procedure TCustomImageList._PROC_00437B78(Sender : TObject);
begin
(*
00437B78 8BD0 mov edx, eax
00437B7A 81EA000000FF sub edx, $FF000000
00437B80 740E jz 00437B90
00437B82 81EAFFFFFF00 sub edx, $00FFFFFF
00437B88 750B jnz 00437B95
00437B8A B8FFFFFF1F mov eax, $1FFFFFFF
00437B8F C3 ret
00437B90 B800000020 mov eax, $20000000
00437B95 C3 ret
*)
end;
procedure TCustomImageList._PROC_00437B98(Sender : TObject);
begin
(*
00437B98 53 push ebx
00437B99 56 push esi
00437B9A 84D2 test dl, dl
00437B9C 7408 jz 00437BA6
00437B9E 83C4F0 add esp, -$10
* Reference to: System.Proc_0040326C
|
00437BA1 E8C6B6FCFF call 0040326C
00437BA6 8BDA mov ebx, edx
00437BA8 8BF0 mov esi, eax
00437BAA 33D2 xor edx, edx
00437BAC 8BC6 mov eax, esi
* Reference to: Classes.Proc_0041714C
|
00437BAE E899F5FDFF call 0041714C
* Reference to field TCustomImageList.OFFS_0028
|
00437BB3 C7462810000000 mov dword ptr [esi+$28], $00000010
* Reference to field TCustomImageList.OFFS_0024
|
00437BBA C7462410000000 mov dword ptr [esi+$24], $00000010
00437BC1 8BC6 mov eax, esi
00437BC3 8B10 mov edx, [eax]
* Possible reference to virtual method TCustomImageList.OFFS_34
|
00437BC5 FF5234 call dword ptr [edx+$34]
00437BC8 8BC6 mov eax, esi
00437BCA 84DB test bl, bl
00437BCC 740F jz 00437BDD
* Reference to: System.Proc_004032C4
|
00437BCE E8F1B6FCFF call 004032C4
00437BD3 648F0500000000 pop dword ptr fs:[$00000000]
00437BDA 83C40C add esp, +$0C
00437BDD 8BC6 mov eax, esi
00437BDF 5E pop esi
00437BE0 5B pop ebx
00437BE1 C3 ret
*)
end;
procedure TCustomImageList._PROC_00437BE4(Sender : TObject);
begin
(*
00437BE4 55 push ebp
00437BE5 8BEC mov ebp, esp
00437BE7 53 push ebx
00437BE8 56 push esi
00437BE9 57 push edi
00437BEA 84D2 test dl, dl
00437BEC 7408 jz 00437BF6
00437BEE 83C4F0 add esp, -$10
* Reference to: System.Proc_0040326C
|
00437BF1 E876B6FCFF call 0040326C
00437BF6 8BF1 mov esi, ecx
00437BF8 8BDA mov ebx, edx
00437BFA 8BF8 mov edi, eax
00437BFC 33C9 xor ecx, ecx
00437BFE 33D2 xor edx, edx
00437C00 8BC7 mov eax, edi
* Reference to: Classes.Proc_0041714C
|
00437C02 E845F5FDFF call 0041714C
00437C07 897728 mov [edi+$28], esi
00437C0A 8B4508 mov eax, [ebp+$08]
00437C0D 894724 mov [edi+$24], eax
00437C10 8BC7 mov eax, edi
00437C12 8B10 mov edx, [eax]
00437C14 FF5234 call dword ptr [edx+$34]
00437C17 8BC7 mov eax, edi
00437C19 84DB test bl, bl
00437C1B 740F jz 00437C2C
* Reference to: System.Proc_004032C4
|
00437C1D E8A2B6FCFF call 004032C4
00437C22 648F0500000000 pop dword ptr fs:[$00000000]
00437C29 83C40C add esp, +$0C
00437C2C 8BC7 mov eax, edi
00437C2E 5F pop edi
00437C2F 5E pop esi
00437C30 5B pop ebx
00437C31 5D pop ebp
00437C32 C20400 ret $0004
*)
end;
procedure TCustomImageList._PROC_00437C38(Sender : TObject);
begin
(*
00437C38 53 push ebx
00437C39 56 push esi
00437C3A 57 push edi
* Reference to: System.Proc_004032CC
|
00437C3B E88CB6FCFF call 004032CC
00437C40 8BDA mov ebx, edx
00437C42 8BF8 mov edi, eax
00437C44 EB10 jmp 00437C56
00437C46 8BC6 mov eax, esi
* Reference to: Classes.Proc_00411BC4
|
00437C48 E8779FFDFF call 00411BC4
00437C4D 8BD0 mov edx, eax
00437C4F 8BC7 mov eax, edi
* Reference to : TCustomImageList._PROC_00438BD0()
|
00437C51 E87A0F0000 call 00438BD0
00437C56 8B7740 mov esi, [edi+$40]
00437C59 837E0800 cmp dword ptr [esi+$08], +$00
00437C5D 7FE7 jnle 00437C46
00437C5F 8B4744 mov eax, [edi+$44]
* Reference to: System.Proc_00402F6C
|
00437C62 E805B3FCFF call 00402F6C
00437C67 8BC7 mov eax, edi
* Reference to : TCustomImageList._PROC_00437F94()
|
00437C69 E826030000 call 00437F94
00437C6E 8B4740 mov eax, [edi+$40]
* Reference to: System.Proc_00402F6C
|
00437C71 E8F6B2FCFF call 00402F6C
00437C76 33C0 xor eax, eax
00437C78 894740 mov [edi+$40], eax
00437C7B 8B4748 mov eax, [edi+$48]
00437C7E 85C0 test eax, eax
00437C80 7405 jz 00437C87
* Reference to: System.Proc_00402F6C
|
00437C82 E8E5B2FCFF call 00402F6C
00437C87 8BD3 mov edx, ebx
00437C89 80E2FC and dl, $FC
00437C8C 8BC7 mov eax, edi
* Reference to: Classes.Proc_00417198
|
00437C8E E805F5FDFF call 00417198
00437C93 84DB test bl, bl
00437C95 7E07 jle 00437C9E
00437C97 8BC7 mov eax, edi
* Reference to: System.Proc_004032BC
|
00437C99 E81EB6FCFF call 004032BC
00437C9E 5F pop edi
00437C9F 5E pop esi
00437CA0 5B pop ebx
00437CA1 C3 ret
*)
end;
procedure TCustomImageList._PROC_00437CA4(Sender : TObject);
begin
(*
00437CA4 55 push ebp
00437CA5 8BEC mov ebp, esp
00437CA7 6A00 push $00
00437CA9 53 push ebx
00437CAA 8BD8 mov ebx, eax
00437CAC 33C0 xor eax, eax
00437CAE 55 push ebp
* Possible String Reference to: '⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -