📄 speedtest.pas
字号:
0061293C E87B87E0FF call 0041B0BC
00612941 83C410 add esp, +$10
00612944 5B pop ebx
00612945 C3 ret
*)
end;
procedure TfrmPing._PROC_00612948(Sender : TObject);
begin
(*
00612948 53 push ebx
00612949 56 push esi
0061294A 8BD8 mov ebx, eax
* Reference to field TfrmPing.Left : Integer
|
0061294C 8B4330 mov eax, [ebx+$30]
* Reference to field Integer.OFFS_020C
|
0061294F 8B800C020000 mov eax, [eax+$020C]
* Reference to field TfrmPing.Top : Integer
|
00612955 8B5334 mov edx, [ebx+$34]
* Reference to: comctrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
00612958 E80FB0E6FF call 0047D96C
0061295D 8B4008 mov eax, [eax+$08]
* Possible String Reference to: '正在连接'
|
00612960 B99C296100 mov ecx, $0061299C
00612965 BA01000000 mov edx, $00000001
0061296A 8B30 mov esi, [eax]
0061296C FF5620 call dword ptr [esi+$20]
* Reference to field TfrmPing.Left : Integer
|
0061296F 8B4330 mov eax, [ebx+$30]
* Reference to field Integer.OFFS_020C
|
00612972 8B800C020000 mov eax, [eax+$020C]
* Reference to field TfrmPing.Top : Integer
|
00612978 8B5334 mov edx, [ebx+$34]
* Reference to: comctrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
0061297B E8ECAFE6FF call 0047D96C
00612980 8B4008 mov eax, [eax+$08]
00612983 33C9 xor ecx, ecx
00612985 BA02000000 mov edx, $00000002
0061298A 8B18 mov ebx, [eax]
0061298C FF5320 call dword ptr [ebx+$20]
0061298F 5E pop esi
00612990 5B pop ebx
00612991 C3 ret
*)
end;
procedure TfrmPing._PROC_006129A9(Sender : TObject);
begin
(*
006129A9 8BEC mov ebp, esp
006129AB 6A00 push $00
006129AD 6A00 push $00
006129AF 53 push ebx
006129B0 56 push esi
006129B1 8BD8 mov ebx, eax
006129B3 33C0 xor eax, eax
006129B5 55 push ebp
006129B6 68952B6100 push $00612B95
***** TRY
|
006129BB 64FF30 push dword ptr fs:[eax]
006129BE 648920 mov fs:[eax], esp
006129C1 69433494020000 imul eax, [ebx+$34], $00000294
006129C8 034338 add eax, [ebx+$38]
006129CB 8BB08C020000 mov esi, [eax+$028C]
006129D1 81FEFFFF0000 cmp esi, $0000FFFF
006129D7 750F jnz 006129E8
006129D9 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '未知'
|
006129DC BAAC2B6100 mov edx, $00612BAC
* Reference to: system.@LStrLAsg;
|
006129E1 E8A617DFFF call 0040418C
006129E6 EB69 jmp 00612A51
006129E8 81FEC8000000 cmp esi, $000000C8
006129EE 730F jnb 006129FF
006129F0 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '快'
|
006129F3 BABC2B6100 mov edx, $00612BBC
* Reference to: system.@LStrLAsg;
|
006129F8 E88F17DFFF call 0040418C
006129FD EB52 jmp 00612A51
006129FF 81FE90010000 cmp esi, $00000190
00612A05 730F jnb 00612A16
00612A07 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '较快'
|
00612A0A BAC82B6100 mov edx, $00612BC8
* Reference to: system.@LStrLAsg;
|
00612A0F E87817DFFF call 0040418C
00612A14 EB3B jmp 00612A51
00612A16 81FE20030000 cmp esi, $00000320
00612A1C 730F jnb 00612A2D
00612A1E 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '一般'
|
00612A21 BAD82B6100 mov edx, $00612BD8
* Reference to: system.@LStrLAsg;
|
00612A26 E86117DFFF call 0040418C
00612A2B EB24 jmp 00612A51
00612A2D 81FEE8030000 cmp esi, $000003E8
00612A33 730F jnb 00612A44
00612A35 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '较慢'
|
00612A38 BAE82B6100 mov edx, $00612BE8
* Reference to: system.@LStrLAsg;
|
00612A3D E84A17DFFF call 0040418C
00612A42 EB0D jmp 00612A51
00612A44 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '慢'
|
00612A47 BAF82B6100 mov edx, $00612BF8
* Reference to: system.@LStrLAsg;
|
00612A4C E83B17DFFF call 0040418C
00612A51 FF75FC push dword ptr [ebp-$04]
00612A54 68042C6100 push $00612C04
00612A59 8BC6 mov eax, esi
00612A5B 33D2 xor edx, edx
00612A5D 52 push edx
00612A5E 50 push eax
00612A5F 8D45F8 lea eax, [ebp-$08]
* Reference to: Unit_00409434.Proc_0040A594
|
00612A62 E82D7BDFFF call 0040A594
00612A67 FF75F8 push dword ptr [ebp-$08]
00612A6A 68102C6100 push $00612C10
00612A6F 8D45FC lea eax, [ebp-$04]
00612A72 BA04000000 mov edx, $00000004
* Reference to: system.@LStrCatN;
|
00612A77 E8D419DFFF call 00404450
* Reference to field TfrmPing.Left : Integer
|
00612A7C 8B4330 mov eax, [ebx+$30]
* Reference to field Integer.OFFS_020C
|
00612A7F 8B800C020000 mov eax, [eax+$020C]
* Reference to field TfrmPing.Top : Integer
|
00612A85 8B5334 mov edx, [ebx+$34]
* Reference to: comctrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
00612A88 E8DFAEE6FF call 0047D96C
00612A8D 8B4008 mov eax, [eax+$08]
00612A90 8B4DFC mov ecx, [ebp-$04]
00612A93 BA01000000 mov edx, $00000001
00612A98 8B30 mov esi, [eax]
00612A9A FF5620 call dword ptr [esi+$20]
* Reference to field TfrmPing.Top : Integer
|
00612A9D 8B7334 mov esi, [ebx+$34]
00612AA0 69D694020000 imul edx, esi, $00000294
00612AA6 035338 add edx, [ebx+$38]
00612AA9 81BA8C020000FFFF0000 cmp dword ptr [edx+$028C], $0000FFFF
00612AB3 7512 jnz 00612AC7
00612AB5 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '未知'
|
00612AB8 BAAC2B6100 mov edx, $00612BAC
* Reference to: system.@LStrLAsg;
|
00612ABD E8CA16DFFF call 0040418C
00612AC2 E993000000 jmp 00612B5A
00612AC7 D98290020000 fld dword ptr [edx+$0290]
00612ACD D835142C6100 fdiv dword ptr [$00612C14]
00612AD3 D81D182C6100 fcomp dword ptr [$00612C18]
00612AD9 DFE0 fstsw ax
00612ADB 9E sahf
00612ADC 730F jnb 00612AED
00612ADE 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '空闲'
|
00612AE1 BA242C6100 mov edx, $00612C24
* Reference to: system.@LStrLAsg;
|
00612AE6 E8A116DFFF call 0040418C
00612AEB EB6D jmp 00612B5A
00612AED 69433494020000 imul eax, [ebx+$34], $00000294
00612AF4 034338 add eax, [ebx+$38]
00612AF7 D98090020000 fld dword ptr [eax+$0290]
00612AFD D835142C6100 fdiv dword ptr [$00612C14]
00612B03 D81D2C2C6100 fcomp dword ptr [$00612C2C]
00612B09 DFE0 fstsw ax
00612B0B 9E sahf
00612B0C 730F jnb 00612B1D
00612B0E 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '一般'
|
00612B11 BAD82B6100 mov edx, $00612BD8
* Reference to: system.@LStrLAsg;
|
00612B16 E87116DFFF call 0040418C
00612B1B EB3D jmp 00612B5A
00612B1D 69433494020000 imul eax, [ebx+$34], $00000294
00612B24 034338 add eax, [ebx+$38]
00612B27 D98090020000 fld dword ptr [eax+$0290]
00612B2D D835142C6100 fdiv dword ptr [$00612C14]
00612B33 D81D302C6100 fcomp dword ptr [$00612C30]
00612B39 DFE0 fstsw ax
00612B3B 9E sahf
00612B3C 730F jnb 00612B4D
00612B3E 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '较满'
|
00612B41 BA3C2C6100 mov edx, $00612C3C
* Reference to: system.@LStrLAsg;
|
00612B46 E84116DFFF call 0040418C
00612B4B EB0D jmp 00612B5A
00612B4D 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '满'
|
00612B50 BA4C2C6100 mov edx, $00612C4C
* Reference to: system.@LStrLAsg;
|
00612B55 E83216DFFF call 0040418C
* Reference to field TfrmPing.Left : Integer
|
00612B5A 8B4330 mov eax, [ebx+$30]
* Reference to field Integer.OFFS_020C
|
00612B5D 8B800C020000 mov eax, [eax+$020C]
00612B63 8BD6 mov edx, esi
* Reference to: comctrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
00612B65 E802AEE6FF call 0047D96C
00612B6A 8B4008 mov eax, [eax+$08]
00612B6D 8B4DFC mov ecx, [ebp-$04]
00612B70 BA02000000 mov edx, $00000002
00612B75 8B18 mov ebx, [eax]
00612B77 FF5320 call dword ptr [ebx+$20]
00612B7A 33C0 xor eax, eax
00612B7C 5A pop edx
00612B7D 59 pop ecx
00612B7E 59 pop ecx
00612B7F 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[YY]⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -