📄 spin.pas
字号:
* Reference to : TTimerSpeedButton._PROC_00459EA8()
|
00459DDA E8C9000000 call 00459EA8
* Reference to field TTimerSpeedButton.OFFS_01FC
|
00459DDF 8BBEFC010000 mov edi, [esi+$01FC]
00459DE5 85FF test edi, edi
00459DE7 743E jz 00459E27
00459DE9 80BF7401000000 cmp byte ptr [edi+$0174], $00
00459DF0 7435 jz 00459E27
00459DF2 8BC7 mov eax, edi
* Possible reference to dynamic method TPersistent.OFFS_FFBC
|
00459DF4 66BBBCFF mov bx, $FFBC
* Reference to: System.Proc_00403148
|
00459DF8 E84B93FAFF call 00403148
00459DFD 84C0 test al, al
00459DFF 7426 jz 00459E27
* Reference to field TTimerSpeedButton.OFFS_01FC
|
00459E01 8B86FC010000 mov eax, [esi+$01FC]
* Reference to: Controls.Proc_00432394
|
00459E07 E88885FDFF call 00432394
00459E0C 8BD8 mov ebx, eax
* Reference to: user32.GetFocus()
|
00459E0E E805E2FAFF call 00408018
00459E13 3BD8 cmp ebx, eax
00459E15 7410 jz 00459E27
* Reference to field TTimerSpeedButton.OFFS_01FC
|
00459E17 8B86FC010000 mov eax, [esi+$01FC]
00459E1D 8B10 mov edx, [eax]
00459E1F FF92B0000000 call dword ptr [edx+$00B0]
00459E25 EB34 jmp 00459E5B
* Reference to field TTimerSpeedButton.OFFS_0174
|
00459E27 80BE7401000000 cmp byte ptr [esi+$0174], $00
00459E2E 742B jz 00459E5B
00459E30 8BC6 mov eax, esi
* Reference to: Controls.Proc_00432394
|
00459E32 E85D85FDFF call 00432394
00459E37 8BD8 mov ebx, eax
* Reference to: user32.GetFocus()
|
00459E39 E8DAE1FAFF call 00408018
00459E3E 3BD8 cmp ebx, eax
00459E40 7419 jz 00459E5B
00459E42 8BC6 mov eax, esi
* Possible reference to dynamic method TTimerSpeedButton.OFFS_FFBC
|
00459E44 66BBBCFF mov bx, $FFBC
* Reference to: System.Proc_00403148
|
00459E48 E8FB92FAFF call 00403148
00459E4D 84C0 test al, al
00459E4F 740A jz 00459E5B
00459E51 8BC6 mov eax, esi
00459E53 8B10 mov edx, [eax]
* Possible reference to virtual method TTimerSpeedButton.OFFS_00B0
|
00459E55 FF92B0000000 call dword ptr [edx+$00B0]
00459E5B 5F pop edi
00459E5C 5E pop esi
00459E5D 5B pop ebx
00459E5E 5D pop ebp
00459E5F C20C00 ret $000C
*)
end;
procedure TTimerSpeedButton._PROC_00459E64(Sender : TObject);
begin
(*
00459E64 53 push ebx
* Reference to field TTimerSpeedButton.OFFS_01F0
|
00459E65 3B90F0010000 cmp edx, [eax+$01F0]
00459E6B 751C jnz 00459E89
* Reference to field TTimerSpeedButton.OFFS_0202
|
00459E6D 6683B80202000000 cmp word ptr [eax+$0202], +$00
00459E75 742C jz 00459EA3
00459E77 8BD8 mov ebx, eax
00459E79 8BD0 mov edx, eax
* Reference to field TTimerSpeedButton.OFFS_0204
|
00459E7B 8B8304020000 mov eax, [ebx+$0204]
* Possible reference to virtual method TTimerSpeedButton.OFFS_0200
|
00459E81 FF9300020000 call dword ptr [ebx+$0200]
00459E87 5B pop ebx
00459E88 C3 ret
00459E89 6683B80A02000000 cmp word ptr [eax+$020A], +$00
00459E91 7410 jz 00459EA3
00459E93 8BD8 mov ebx, eax
00459E95 8BD0 mov edx, eax
00459E97 8B830C020000 mov eax, [ebx+$020C]
00459E9D FF9308020000 call dword ptr [ebx+$0208]
00459EA3 5B pop ebx
00459EA4 C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_00459EA8(Sender : TObject);
begin
(*
00459EA8 53 push ebx
00459EA9 56 push esi
00459EAA 57 push edi
00459EAB 8BFA mov edi, edx
00459EAD 8BF0 mov esi, eax
* Reference to field TTimerSpeedButton.OFFS_0174
|
00459EAF 80BE7401000000 cmp byte ptr [esi+$0174], $00
00459EB6 7467 jz 00459F1F
00459EB8 8BC6 mov eax, esi
* Possible reference to dynamic method TTimerSpeedButton.OFFS_FFBC
|
00459EBA 66BBBCFF mov bx, $FFBC
* Reference to: System.Proc_00403148
|
00459EBE E88592FAFF call 00403148
00459EC3 84C0 test al, al
00459EC5 7458 jz 00459F1F
* Reference to field TTimerSpeedButton.OFFS_01F8
|
00459EC7 3BBEF8010000 cmp edi, [esi+$01F8]
00459ECD 7450 jz 00459F1F
* Reference to field TTimerSpeedButton.OFFS_01F8
|
00459ECF 8B9EF8010000 mov ebx, [esi+$01F8]
00459ED5 A0249F4500 mov al, byte ptr [$00459F24]
00459EDA F7D0 not eax
00459EDC 22834C010000 and al, byte ptr [ebx+$014C]
00459EE2 88834C010000 mov [ebx+$014C], al
* Reference to field TTimerSpeedButton.OFFS_01F8
|
00459EE8 89BEF8010000 mov [esi+$01F8], edi
00459EEE 8BC6 mov eax, esi
* Reference to: Controls.Proc_00432394
|
00459EF0 E89F84FDFF call 00432394
00459EF5 8BD8 mov ebx, eax
* Reference to: user32.GetFocus()
|
00459EF7 E81CE1FAFF call 00408018
00459EFC 3BD8 cmp ebx, eax
00459EFE 751F jnz 00459F1F
* Reference to field TTimerSpeedButton.OFFS_01F8
|
00459F00 8B9EF8010000 mov ebx, [esi+$01F8]
00459F06 8A834C010000 mov al, byte ptr [ebx+$014C]
00459F0C 0A05249F4500 or al, byte ptr [$00459F24]
00459F12 88834C010000 mov [ebx+$014C], al
00459F18 8BC6 mov eax, esi
00459F1A 8B10 mov edx, [eax]
* Possible reference to virtual method TTimerSpeedButton.OFFS_74
|
00459F1C FF5274 call dword ptr [edx+$74]
00459F1F 5F pop edi
00459F20 5E pop esi
00459F21 5B pop ebx
00459F22 C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_00459F23(Sender : TObject);
begin
(*
00459F23 0001 add [ecx], al
00459F25 0000 add [eax], al
*)
end;
procedure TTimerSpeedButton._PROC_00459F32(Sender : TObject);
begin
(*
00459F32 C4F8 les edi, ax
00459F34 8BD8 mov ebx, eax
00459F36 8BC3 mov eax, ebx
* Reference to: Controls.Proc_0042DF8C
|
00459F38 E84F40FDFF call 0042DF8C
* Reference to field TTimerSpeedButton.OFFS_0038
|
00459F3D 8B4338 mov eax, [ebx+$38]
00459F40 890424 mov [esp], eax
* Reference to field TTimerSpeedButton.OFFS_003C
|
00459F43 8B433C mov eax, [ebx+$3C]
00459F46 89442404 mov [esp+$04], eax
00459F4A 8D4C2404 lea ecx, [esp+$04]
00459F4E 8BD4 mov edx, esp
00459F50 8BC3 mov eax, ebx
* Reference to: Spin.Proc_00459BFC
|
00459F52 E8A5FCFFFF call 00459BFC
00459F57 8B0424 mov eax, [esp]
* Reference to field TTimerSpeedButton.OFFS_0038
|
00459F5A 3B4338 cmp eax, [ebx+$38]
00459F5D 7509 jnz 00459F68
00459F5F 8B442404 mov eax, [esp+$04]
* Reference to field TTimerSpeedButton.OFFS_003C
|
00459F63 3B433C cmp eax, [ebx+$3C]
00459F66 7416 jz 00459F7E
00459F68 8B0424 mov eax, [esp]
00459F6B 50 push eax
00459F6C 8B442408 mov eax, [esp+$08]
00459F70 50 push eax
* Reference to field TTimerSpeedButton.OFFS_0034
|
00459F71 8B4B34 mov ecx, [ebx+$34]
* Reference to field TTimerSpeedButton.OFFS_0030
|
00459F74 8B5330 mov edx, [ebx+$30]
00459F77 8BC3 mov eax, ebx
* Reference to: Controls.Proc_00431E08
|
00459F79 E88A7EFDFF call 00431E08
00459F7E 59 pop ecx
00459F7F 5A pop edx
00459F80 5B pop ebx
00459F81 C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_00459F84(Sender : TObject);
begin
(*
* Reference to field TTimerSpeedButton.OFFS_01F0
|
00459F84 8B80F0010000 mov eax, [eax+$01F0]
* Reference to : TGlyphList._PROC_004575E0()
|
00459F8A E851D6FFFF call 004575E0
00459F8F C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_00459F90(Sender : TObject);
begin
(*
00459F90 53 push ebx
00459F91 8BD8 mov ebx, eax
00459F93 85D2 test edx, edx
00459F95 740D jz 00459FA4
* Reference to field TTimerSpeedButton.OFFS_01F0
|
00459F97 8B83F0010000 mov eax, [ebx+$01F0]
* Reference to : TGlyphList._PROC_004575EC()
|
00459F9D E84AD6FFFF call 004575EC
00459FA2 5B pop ebx
00459FA3 C3 ret
* Possible String Reference to: 'SpinUp'
|
00459FA4 68E09F4500 push $00459FE0
00459FA9 A1DC345000 mov eax, dword ptr [$005034DC]
00459FAE 50 push eax
* Reference to: user32.LoadBitmapA()
|
00459FAF E8DCE1FAFF call 00408190
00459FB4 50 push eax
00459FB5 8B83F0010000 mov eax, [ebx+$01F0]
* Reference to : TGlyphList._PROC_004575E0()
|
00459FBB E820D6FFFF call 004575E0
00459FC0 5A pop edx
* Reference to : TBitmapCanvas._PROC_0041FA10()
|
00459FC1 E84A5AFCFF call 0041FA10
00459FC6 B201 mov dl, $01
00459FC8 8B83F0010000 mov eax, [ebx+$01F0]
* Reference to : TGlyphList._PROC_00457610()
|
00459FCE E83DD6FFFF call 00457610
00459FD3 8B83F0010000 mov eax, [ebx+$01F0]
00459FD9 8B10 mov edx, [eax]
00459FDB FF5274 call dword ptr [edx+$74]
00459FDE 5B pop ebx
00459FDF C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_00459FE0(Sender : TObject);
begin
(*
00459FE0 53 push ebx
00459FE1 7069 jo 0045A04C
00459FE3 6E outsb
00459FE4 55 push ebp
00459FE5 7000 jo 00459FE7
00459FE7 008B80F00100 add [ebx+$1F080], cl
00459FED 00E8 add al, ch
00459FEF 11D6 adc esi, edx
00459FF1 FFFF DB $FF, $FF //
00459FF3 C3 ret
00459FF4 8B80F0010000 mov eax, [eax+$01F0]
* Reference to : TGlyphList._PROC_00457610()
|
00459FFA E811D6FFFF call 00457610
00459FFF C3 ret
0045A000 8B80F4010000 mov eax, [eax+$01F4]
* Reference to : TGlyphList._PROC_004575E0()
|
0045A006 E8D5D5FFFF call 004575E0
0045A00B C3 ret
0045A00C 53 push ebx
0045A00D 8BD8 mov ebx, eax
0045A00F 85D2 test edx, edx
0045A011 740D jz 0045A020
0045A013 8B83F4010000 mov eax, [ebx+$01F4]
* Reference to : TGlyphList._PROC_004575EC()
|
0045A019 E8CED5FFFF call 004575EC
0045A01E 5B pop ebx
0045A01F C3 ret
* Possible String Reference to: 'SpinDown'
|
0045A020 685CA04500 push $0045A05C
0045A025 A1DC345000 mov eax, dword ptr [$005034DC]
0045A02A 50 push eax
* Reference to: user32.LoadBitmapA()
|
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -