📄 spin.pas
字号:
|
0045A352 E83D80FDFF call 00432394
0045A357 50 push eax
* Reference to: user32.SendMessageA()
|
0045A358 E80BDFFAFF call 00408268
0045A35D 83C410 add esp, +$10
0045A360 5B pop ebx
0045A361 C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_0045A364(Sender : TObject);
begin
(*
0045A364 53 push ebx
0045A365 56 push esi
0045A366 57 push edi
0045A367 8BF0 mov esi, eax
0045A369 8BC6 mov eax, esi
* Reference to: Controls.Proc_004307E4
|
0045A36B E87464FDFF call 004307E4
0045A370 8BC6 mov eax, esi
* Reference to : TTimerSpeedButton._PROC_0045A3FC()
|
0045A372 E885000000 call 0045A3FC
* Reference to field TTimerSpeedButton.OFFS_003C
|
0045A377 3B463C cmp eax, [esi+$3C]
0045A37A 7E0B jle 0045A387
0045A37C 8BD0 mov edx, eax
0045A37E 8BC6 mov eax, esi
* Reference to: Controls.Proc_0042BB40
|
0045A380 E8BB17FDFF call 0042BB40
0045A385 EB71 jmp 0045A3F8
* Reference to field TTimerSpeedButton.OFFS_0214
|
0045A387 83BE1402000000 cmp dword ptr [esi+$0214], +$00
0045A38E 7468 jz 0045A3F8
* Reference to pointer to GlobalVar_0050374C
|
0045A390 A1802B5000 mov eax, dword ptr [$00502B80]
0045A395 803800 cmp byte ptr [eax], $00
0045A398 7431 jz 0045A3CB
* Reference to field TTimerSpeedButton.OFFS_0138
|
0045A39A 80BE3801000000 cmp byte ptr [esi+$0138], $00
0045A3A1 7428 jz 0045A3CB
* Reference to field TTimerSpeedButton.OFFS_0214
|
0045A3A3 8B9614020000 mov edx, [esi+$0214]
0045A3A9 8B7A38 mov edi, [edx+$38]
0045A3AC 57 push edi
* Reference to field TTimerSpeedButton.OFFS_003C
|
0045A3AD 8B563C mov edx, [esi+$3C]
0045A3B0 83EA05 sub edx, +$05
0045A3B3 52 push edx
* Reference to field TTimerSpeedButton.OFFS_0214
|
0045A3B4 8B8614020000 mov eax, [esi+$0214]
* Reference to field TTimerSpeedButton.OFFS_0038
|
0045A3BA 8B5638 mov edx, [esi+$38]
0045A3BD 2BD7 sub edx, edi
0045A3BF 83EA05 sub edx, +$05
0045A3C2 33C9 xor ecx, ecx
0045A3C4 8B18 mov ebx, [eax]
0045A3C6 FF537C call dword ptr [ebx+$7C]
0045A3C9 EB26 jmp 0045A3F1
* Reference to field TTimerSpeedButton.OFFS_0214
|
0045A3CB 8B9614020000 mov edx, [esi+$0214]
0045A3D1 8B7A38 mov edi, [edx+$38]
0045A3D4 57 push edi
* Reference to field TTimerSpeedButton.OFFS_003C
|
0045A3D5 8B563C mov edx, [esi+$3C]
0045A3D8 83EA03 sub edx, +$03
0045A3DB 52 push edx
* Reference to field TTimerSpeedButton.OFFS_0214
|
0045A3DC 8B8614020000 mov eax, [esi+$0214]
* Reference to field TTimerSpeedButton.OFFS_0038
|
0045A3E2 8B5638 mov edx, [esi+$38]
0045A3E5 2BD7 sub edx, edi
0045A3E7 B901000000 mov ecx, $00000001
0045A3EC 8B18 mov ebx, [eax]
0045A3EE FF537C call dword ptr [ebx+$7C]
0045A3F1 8BC6 mov eax, esi
* Reference to : TTimerSpeedButton._PROC_0045A2E4()
|
0045A3F3 E8ECFEFFFF call 0045A2E4
0045A3F8 5F pop edi
0045A3F9 5E pop esi
0045A3FA 5B pop ebx
0045A3FB C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_0045A3FC(Sender : TObject);
begin
(*
0045A3FC 53 push ebx
0045A3FD 56 push esi
0045A3FE 83C490 add esp, -$70
0045A401 8BF0 mov esi, eax
0045A403 6A00 push $00
* Reference to: user32.GetDC()
|
0045A405 E8F6DBFAFF call 00408000
0045A40A 8BD8 mov ebx, eax
0045A40C 54 push esp
0045A40D 53 push ebx
* Reference to: gdi32.GetTextMetricsA()
|
0045A40E E85DD9FAFF call 00407D70
* Reference to field TTimerSpeedButton.OFFS_0058
|
0045A413 8B4658 mov eax, [esi+$58]
* Reference to : TIcon._PROC_00419D74()
|
0045A416 E859F9FBFF call 00419D74
0045A41B 50 push eax
0045A41C 53 push ebx
* Reference to: gdi32.SelectObject()
|
0045A41D E8CED9FAFF call 00407DF0
0045A422 8BF0 mov esi, eax
0045A424 8D442438 lea eax, [esp+$38]
0045A428 50 push eax
0045A429 53 push ebx
* Reference to: gdi32.GetTextMetricsA()
|
0045A42A E841D9FAFF call 00407D70
0045A42F 56 push esi
0045A430 53 push ebx
* Reference to: gdi32.SelectObject()
|
0045A431 E8BAD9FAFF call 00407DF0
0045A436 53 push ebx
0045A437 6A00 push $00
* Reference to: user32.ReleaseDC()
|
0045A439 E802DEFAFF call 00408240
0045A43E 8B1C24 mov ebx, [esp]
0045A441 8B742438 mov esi, [esp+$38]
0045A445 3BDE cmp ebx, esi
0045A447 7E02 jle 0045A44B
0045A449 8BDE mov ebx, esi
0045A44B 6A06 push $06
* Reference to: user32.GetSystemMetrics()
|
0045A44D E886DCFAFF call 004080D8
0045A452 C1E002 shl eax, $02
0045A455 85DB test ebx, ebx
0045A457 7903 jns 0045A45C
0045A459 83C303 add ebx, +$03
0045A45C C1FB02 sar ebx, $02
0045A45F 03DE add ebx, esi
0045A461 03C3 add eax, ebx
0045A463 83C002 add eax, +$02
0045A466 83C470 add esp, +$70
0045A469 5E pop esi
0045A46A 5B pop ebx
0045A46B C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_0045A46C(Sender : TObject);
begin
(*
0045A46C 53 push ebx
0045A46D 8BD8 mov ebx, eax
* Reference to field TTimerSpeedButton.OFFS_01F6
|
0045A46F 80BBF601000000 cmp byte ptr [ebx+$01F6], $00
0045A476 7409 jz 0045A481
0045A478 6A00 push $00
* Reference to: user32.MessageBeep()
|
0045A47A E849DDFAFF call 004081C8
0045A47F 5B pop ebx
0045A480 C3 ret
0045A481 8BC3 mov eax, ebx
* Reference to : TTimerSpeedButton._PROC_0045A548()
|
0045A483 E8C0000000 call 0045A548
0045A488 8BD0 mov edx, eax
0045A48A 039310020000 add edx, [ebx+$0210]
0045A490 8BC3 mov eax, ebx
* Reference to : TTimerSpeedButton._PROC_0045A5D0()
|
0045A492 E839010000 call 0045A5D0
0045A497 5B pop ebx
0045A498 C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_0045A49C(Sender : TObject);
begin
(*
0045A49C 53 push ebx
0045A49D 8BD8 mov ebx, eax
* Reference to field TTimerSpeedButton.OFFS_01F6
|
0045A49F 80BBF601000000 cmp byte ptr [ebx+$01F6], $00
0045A4A6 7409 jz 0045A4B1
0045A4A8 6A00 push $00
* Reference to: user32.MessageBeep()
|
0045A4AA E819DDFAFF call 004081C8
0045A4AF 5B pop ebx
0045A4B0 C3 ret
0045A4B1 8BC3 mov eax, ebx
* Reference to : TTimerSpeedButton._PROC_0045A548()
|
0045A4B3 E890000000 call 0045A548
0045A4B8 8BD0 mov edx, eax
0045A4BA 2B9310020000 sub edx, dword ptr [ebx+$0210]
0045A4C0 8BC3 mov eax, ebx
* Reference to : TTimerSpeedButton._PROC_0045A5D0()
|
0045A4C2 E809010000 call 0045A5D0
0045A4C7 5B pop ebx
0045A4C8 C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_0045A4CC(Sender : TObject);
begin
(*
0045A4CC 56 push esi
0045A4CD 8BF0 mov esi, eax
* Reference to field TTimerSpeedButton.OFFS_0218
|
0045A4CF 80BE1802000000 cmp byte ptr [esi+$0218], $00
0045A4D6 7410 jz 0045A4E8
* Reference to field TTimerSpeedButton.OFFS_01F6
|
0045A4D8 80BEF601000000 cmp byte ptr [esi+$01F6], $00
0045A4DF 7507 jnz 0045A4E8
0045A4E1 8BC6 mov eax, esi
0045A4E3 8B08 mov ecx, [eax]
* Possible reference to virtual method TTimerSpeedButton.OFFS_10
|
0045A4E5 FF51F0 call dword ptr [ecx-$10]
0045A4E8 5E pop esi
0045A4E9 C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_0045A4EC(Sender : TObject);
begin
(*
0045A4EC 56 push esi
0045A4ED 8BF0 mov esi, eax
* Reference to field TTimerSpeedButton.OFFS_0218
|
0045A4EF 80BE1802000000 cmp byte ptr [esi+$0218], $00
0045A4F6 7410 jz 0045A508
* Reference to field TTimerSpeedButton.OFFS_01F6
|
0045A4F8 80BEF601000000 cmp byte ptr [esi+$01F6], $00
0045A4FF 7507 jnz 0045A508
0045A501 8BC6 mov eax, esi
0045A503 8B08 mov ecx, [eax]
* Possible reference to virtual method TTimerSpeedButton.OFFS_10
|
0045A505 FF51F0 call dword ptr [ecx-$10]
0045A508 5E pop esi
0045A509 C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_0045A50C(Sender : TObject);
begin
(*
0045A50C 53 push ebx
0045A50D 56 push esi
0045A50E 8BD8 mov ebx, eax
0045A510 8BC3 mov eax, ebx
* Reference to: Controls.Proc_00431860
|
0045A512 E84973FDFF call 00431860
0045A517 8BC3 mov eax, ebx
* Reference to : TTimerSpeedButton._PROC_0045A548()
|
0045A519 E82A000000 call 0045A548
0045A51E 8BD0 mov edx, eax
0045A520 8BC3 mov eax, ebx
* Reference to : TTimerSpeedButton._PROC_0045A628()
|
0045A522 E801010000 call 0045A628
0045A527 8BF0 mov esi, eax
0045A529 8BC3 mov eax, ebx
* Reference to : TTimerSpeedButton._PROC_0045A548()
|
0045A52B E818000000 call 0045A548
0045A530 3BF0 cmp esi, eax
0045A532 7410 jz 0045A544
0045A534 8BC3 mov eax, ebx
* Reference to : TTimerSpeedButton._PROC_0045A548()
|
0045A536 E80D000000 call 0045A548
0045A53B 8BD0 mov edx, eax
0045A53D 8BC3 mov eax, ebx
* Reference to : TTimerSpeedButton._PROC_0045A5D0()
|
0045A53F E88C000000 call 0045A5D0
0045A544 5E pop esi
0045A545 5B pop ebx
0045A546 C3 ret
*)
end;
procedure TTimerSpeedButton._PROC_0045A548(Sender : TObject);
begin
(*
0045A548 55 push ebp
0045A549 8BEC mov ebp, esp
0045A54B 83C4F8 add esp, -$08
0045A54E 53 push ebx
0045A54F 56 push esi
0045A550 57 push edi
0045A551 33D2 xor edx, edx
0045A553 8955F8 mov [ebp-$08], edx
0045A556 8945FC mov [ebp-$04], eax
0045A559 33C0 xor eax, eax
0045A55B 55 push ebp
* Possible String Reference to: '槭慂
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -