📄 buttons.pas
字号:
0045644E 8BD8 mov ebx, eax
* Reference to field TGlyphList.OFFS_0004
|
00456450 8B7304 mov esi, [ebx+$04]
00456453 3BD6 cmp edx, esi
00456455 7520 jnz 00456477
00456457 8BC6 mov eax, esi
* Reference to : TBitmapCanvas._PROC_0041F060()
|
00456459 E8028CFCFF call 0041F060
* Reference to field TGlyphList.OFFS_001C
|
0045645E 89431C mov [ebx+$1C], eax
00456461 8BC3 mov eax, ebx
* Reference to : TGlyphList._PROC_00456404()
|
00456463 E89CFFFFFF call 00456404
* Reference to field TGlyphList.OFFS_002A
|
00456468 66837B2A00 cmp word ptr [ebx+$2A], +$00
0045646D 7408 jz 00456477
0045646F 8BD3 mov edx, ebx
* Reference to field TGlyphList.OFFS_002C
|
00456471 8B432C mov eax, [ebx+$2C]
* Possible reference to virtual method TGlyphList.OFFS_28
|
00456474 FF5328 call dword ptr [ebx+$28]
00456477 5E pop esi
00456478 5B pop ebx
00456479 C3 ret
*)
end;
procedure TGlyphList._PROC_0045647C(Sender : TObject);
begin
(*
0045647C 53 push ebx
0045647D 56 push esi
0045647E 8BDA mov ebx, edx
00456480 8BF0 mov esi, eax
00456482 8BC6 mov eax, esi
* Reference to : TGlyphList._PROC_00456404()
|
00456484 E87BFFFFFF call 00456404
00456489 8BD3 mov edx, ebx
* Reference to field TGlyphList.OFFS_0004
|
0045648B 8B4604 mov eax, [esi+$04]
0045648E 8B08 mov ecx, [eax]
00456490 FF5108 call dword ptr [ecx+$08]
00456493 85DB test ebx, ebx
00456495 7458 jz 004564EF
00456497 8BC3 mov eax, ebx
00456499 8B10 mov edx, [eax]
0045649B FF5220 call dword ptr [edx+$20]
0045649E 85C0 test eax, eax
004564A0 7E4D jle 004564EF
004564A2 8BC3 mov eax, ebx
* Reference to : TBitmapCanvas._PROC_0041F060()
|
004564A4 E8B78BFCFF call 0041F060
* Reference to field TGlyphList.OFFS_001C
|
004564A9 89461C mov [esi+$1C], eax
004564AC 8BC3 mov eax, ebx
004564AE 8B10 mov edx, [eax]
004564B0 FF522C call dword ptr [edx+$2C]
004564B3 50 push eax
004564B4 8BC3 mov eax, ebx
004564B6 8B10 mov edx, [eax]
004564B8 FF5220 call dword ptr [edx+$20]
004564BB 5A pop edx
004564BC 92 xchg eax, edx
004564BD 8BCA mov ecx, edx
004564BF 99 cdq
004564C0 F7F9 idiv ecx
004564C2 85D2 test edx, edx
004564C4 7529 jnz 004564EF
004564C6 8BC3 mov eax, ebx
004564C8 8B10 mov edx, [eax]
004564CA FF522C call dword ptr [edx+$2C]
004564CD 50 push eax
004564CE 8BC3 mov eax, ebx
004564D0 8B10 mov edx, [eax]
004564D2 FF5220 call dword ptr [edx+$20]
004564D5 5A pop edx
004564D6 92 xchg eax, edx
004564D7 8BCA mov ecx, edx
004564D9 99 cdq
004564DA F7F9 idiv ecx
004564DC 83F804 cmp eax, +$04
004564DF 7E05 jle 004564E6
004564E1 B801000000 mov eax, $00000001
004564E6 8BD0 mov edx, eax
004564E8 8BC6 mov eax, esi
* Reference to : TGlyphList._PROC_004564F4()
|
004564EA E805000000 call 004564F4
004564EF 5E pop esi
004564F0 5B pop ebx
004564F1 C3 ret
*)
end;
procedure TGlyphList._PROC_004564F4(Sender : TObject);
begin
(*
004564F4 53 push ebx
004564F5 56 push esi
004564F6 8BDA mov ebx, edx
004564F8 8BF0 mov esi, eax
* Reference to field TGlyphList.OFFS_0020
|
004564FA 3A5E20 cmp bl, byte ptr [esi+$20]
004564FD 7418 jz 00456517
004564FF 84DB test bl, bl
00456501 7614 jbe 00456517
00456503 8BC6 mov eax, esi
* Reference to : TGlyphList._PROC_00456404()
|
00456505 E8FAFEFFFF call 00456404
* Reference to field TGlyphList.OFFS_0020
|
0045650A 885E20 mov [esi+$20], bl
* Reference to field TGlyphList.OFFS_0004
|
0045650D 8B5604 mov edx, [esi+$04]
00456510 8BC6 mov eax, esi
* Reference to : TGlyphList._PROC_0045644C()
|
00456512 E835FFFFFF call 0045644C
00456517 5E pop esi
00456518 5B pop ebx
00456519 C3 ret
*)
end;
procedure TGlyphList._PROC_0045651C(Sender : TObject);
begin
(*
0045651C 55 push ebp
0045651D 8BEC mov ebp, esp
0045651F 83C4C8 add esp, -$38
00456522 53 push ebx
00456523 56 push esi
00456524 57 push edi
00456525 8855FB mov [ebp-$05], dl
00456528 8945FC mov [ebp-$04], eax
0045652B 807DFB02 cmp byte ptr [ebp-$05], $02
0045652F 750D jnz 0045653E
00456531 8B45FC mov eax, [ebp-$04]
* Reference to field TGlyphList.OFFS_0020
|
00456534 80782003 cmp byte ptr [eax+$20], $03
00456538 7304 jnb 0045653E
0045653A C645FB00 mov byte ptr [ebp-$05], $00
0045653E 33C0 xor eax, eax
00456540 8A45FB mov al, byte ptr [ebp-$05]
00456543 8B55FC mov edx, [ebp-$04]
00456546 8B5C820C mov ebx, [edx+eax*4+$0C]
0045654A 83FBFF cmp ebx, -$01
0045654D 0F8596050000 jnz 00456AE9
00456553 8B45FC mov eax, [ebp-$04]
* Reference to field TGlyphList.OFFS_0004
|
00456556 8B4004 mov eax, [eax+$04]
00456559 8B10 mov edx, [eax]
0045655B FF522C call dword ptr [edx+$2C]
0045655E 8BF0 mov esi, eax
00456560 8B45FC mov eax, [ebp-$04]
* Reference to field TGlyphList.OFFS_0004
|
00456563 8B4004 mov eax, [eax+$04]
00456566 8B10 mov edx, [eax]
00456568 FF5220 call dword ptr [edx+$20]
0045656B 0BF0 or esi, eax
0045656D 0F8476050000 jz 00456AE9
00456573 8B45FC mov eax, [ebp-$04]
* Reference to field TGlyphList.OFFS_0004
|
00456576 8B4004 mov eax, [eax+$04]
00456579 8B10 mov edx, [eax]
0045657B FF522C call dword ptr [edx+$2C]
0045657E 8B55FC mov edx, [ebp-$04]
00456581 0FB65220 movzx edx, byte ptr [edx+$20]
00456585 8BCA mov ecx, edx
00456587 99 cdq
00456588 F7F9 idiv ecx
0045658A 8BF8 mov edi, eax
0045658C 8B45FC mov eax, [ebp-$04]
* Reference to field TGlyphList.OFFS_0004
|
0045658F 8B4004 mov eax, [eax+$04]
00456592 8B10 mov edx, [eax]
00456594 FF5220 call dword ptr [edx+$20]
00456597 8BF0 mov esi, eax
00456599 8B45FC mov eax, [ebp-$04]
* Reference to field TGlyphList.OFFS_0008
|
0045659C 83780800 cmp dword ptr [eax+$08], +$00
004565A0 752E jnz 004565D0
004565A2 833DEC0C500000 cmp dword ptr [$00500CEC], +$00
004565A9 7511 jnz 004565BC
004565AB B201 mov dl, $01
* Reference to class TGlyphCache
|
004565AD A14C604500 mov eax, dword ptr [$0045604C]
* Reference to : TGlyphList._PROC_00456214()
|
004565B2 E85DFCFFFF call 00456214
004565B7 A3EC0C5000 mov dword ptr [$00500CEC], eax
004565BC 8BCE mov ecx, esi
004565BE 8BD7 mov edx, edi
004565C0 A1EC0C5000 mov eax, dword ptr [$00500CEC]
* Reference to : TGlyphList._PROC_00456288()
|
004565C5 E8BEFCFFFF call 00456288
004565CA 8B55FC mov edx, [ebp-$04]
* Reference to field TGlyphList.OFFS_0008
|
004565CD 894208 mov [edx+$08], eax
004565D0 B201 mov dl, $01
* Reference to class TBitmap
|
004565D2 A1A48E4100 mov eax, dword ptr [$00418EA4]
* Reference to : TBitmapCanvas._PROC_0041EA10()
|
004565D7 E83484FCFF call 0041EA10
004565DC 8945F4 mov [ebp-$0C], eax
004565DF 33C0 xor eax, eax
004565E1 55 push ebp
004565E2 68CB6A4500 push $00456ACB
***** TRY
|
004565E7 64FF30 push dword ptr fs:[eax]
004565EA 648920 mov fs:[eax], esp
004565ED 8BD7 mov edx, edi
004565EF 8B45F4 mov eax, [ebp-$0C]
004565F2 8B08 mov ecx, [eax]
* Possible reference to virtual method TBitmap.OFFS_40
|
004565F4 FF5140 call dword ptr [ecx+$40]
004565F7 8BD6 mov edx, esi
004565F9 8B45F4 mov eax, [ebp-$0C]
004565FC 8B08 mov ecx, [eax]
* Possible reference to virtual method TBitmap.OFFS_34
|
004565FE FF5134 call dword ptr [ecx+$34]
00456601 56 push esi
00456602 8D45D8 lea eax, [ebp-$28]
00456605 50 push eax
00456606 8BCF mov ecx, edi
00456608 33D2 xor edx, edx
0045660A 33C0 xor eax, eax
* Reference to: Classes.Proc_00411014
|
0045660C E803AAFBFF call 00411014
00456611 8B45F4 mov eax, [ebp-$0C]
* Reference to : TBitmapCanvas._PROC_0041EF7C()
|
00456614 E86389FCFF call 0041EF7C
* Reference to field TBitmap.OFFS_0014
|
00456619 8B4014 mov eax, [eax+$14]
0045661C BA0F000080 mov edx, $8000000F
* Reference to : TIcon._PROC_0041A530()
|
00456621 E80A3FFCFF call 0041A530
00456626 8B45FC mov eax, [ebp-$04]
* Reference to field TGlyphList.OFFS_0004
|
00456629 8B4004 mov eax, [eax+$04]
0045662C 8B10 mov edx, [eax]
0045662E FF5224 call dword ptr [edx+$24]
* Reference to : TBitmapCanvas._PROC_0041E7A0()
|
00456631 E86A81FCFF call 0041E7A0
00456636 8BD0 mov edx, eax
00456638 8B45F4 mov eax, [ebp-$0C]
0045663B 8B08 mov ecx, [eax]
* Possible reference to virtual method TBitmap.OFFS_38
|
0045663D FF5138 call dword ptr [ecx+$38]
00456640 8A5DFB mov bl, byte ptr [ebp-$05]
00456643 8B45FC mov eax, [ebp-$04]
* Reference to field TGlyphList.OFFS_0020
|
00456646 3A5820 cmp bl, byte ptr [eax+$20]
00456649 7C02 jl 0045664D
0045664B 33DB xor ebx, ebx
0045664D 56 push esi
0045664E 8D45C8 lea eax, [ebp-$38]
00456651 50 push eax
00456652 33C9 xor ecx, ecx
00456654 8ACB mov cl, bl
00456656 41 inc ecx
00456657 0FAFCF imul ecx, edi
0045665A 33C0 xor eax, eax
0045665C 8AC3 mov al, bl
0045665E F7EF imul edi
00456660 33D2 xor edx, edx
* Reference to: Classes.Proc_00411014
|
00456662 E8ADA9FBFF call 00411014
00456667 8A45FB mov al, byte ptr [ebp-$05]
0045666A 2C01 sub al, $01
0045666C 720B jb 00456679
0045666E 747F jz 004566EF
00456670 48 dec eax
00456671 2C02 sub al, $02
00456673 0F833C040000 jnb 00456AB5
00456679 8D45C8 lea eax, [ebp-$38]
0045667C 50 push eax
0045667D 8B45FC mov eax, [ebp-$04]
* Reference to field TGlyphList.OFFS_0004
|
00456680 8B4004 mov eax, [eax+$04]
* Reference to : TBitmapCanvas._PROC_0041EF7C()
|
00456683 E8F488FCFF call 0041EF7C
00456688 50 push eax
00456689 8B45F4 mov eax, [ebp-$0C]
* Reference to : TBitmapCanvas._PROC_0041EF7C()
|
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -