📄 viewhighrank.pas
字号:
unit ViewHighRank;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TfrmHighRank=class(TForm)
ButtonClear: TButton;
ButtonRefShow: TButton;
TimerClean: TTimer;
GroupBox1: TGroupBox;
ListViewServerHighRank: TListView;
GroupBox2: TGroupBox;
ListViewOnlineHighRank: TListView;
CheckBoxRefRealTime: TCheckBox;
procedure ButtonRefShowClick(Sender : TObject);
procedure FormCreate(Sender : TObject);
procedure FormDestroy(Sender : TObject);
procedure ButtonClearClick(Sender : TObject);
procedure TimerCleanTimer(Sender : TObject);
procedure ListViewServerHighRankColumnClick(Sender : TObject);
procedure _PROC_0056CBBD(Sender : TObject);
procedure _PROC_0056CFB3(Sender : TObject);
procedure _PROC_0056D284(Sender : TObject);
procedure _PROC_0056D2B4(Sender : TObject);
procedure _PROC_0056D2BC(Sender : TObject);
procedure _PROC_0056D2D5(Sender : TObject);
procedure _PROC_0056D304(Sender : TObject);
procedure _PROC_0056D30C(Sender : TObject);
private
{ Private declarations }
public
{ Public declarations }
end ;
var
frmHighRank: TfrmHighRank;
{This file is generated by DaRk Ver 3.50.04 Copyright (c) 1999-2002 DaFixer}
implementation
{$R *.DFM}
procedure TfrmHighRank.ButtonRefShowClick(Sender : TObject);
begin
(*
0056D090 55 push ebp
0056D091 8BEC mov ebp, esp
0056D093 83C4F8 add esp, -$08
0056D096 8955F8 mov [ebp-$08], edx
0056D099 8945FC mov [ebp-$04], eax
*)
end;
procedure TfrmHighRank.FormCreate(Sender : TObject);
begin
(*
0056D0D4 55 push ebp
0056D0D5 8BEC mov ebp, esp
0056D0D7 83C4F8 add esp, -$08
0056D0DA 8955F8 mov [ebp-$08], edx
0056D0DD 8945FC mov [ebp-$04], eax
*)
end;
procedure TfrmHighRank.FormDestroy(Sender : TObject);
begin
(*
0056D118 55 push ebp
0056D119 8BEC mov ebp, esp
0056D11B 83C4F8 add esp, -$08
0056D11E 8955F8 mov [ebp-$08], edx
0056D121 8945FC mov [ebp-$04], eax
0056D124 8B45FC mov eax, [ebp-$04]
0056D127 8B8018030000 mov eax, [eax+$0318]
* Reference to: System.TObject.Free(TObject);
|
0056D12D E89E70E9FF call 004041D0
0056D132 59 pop ecx
0056D133 59 pop ecx
0056D134 5D pop ebp
0056D135 C3 ret
*)
end;
procedure TfrmHighRank.ButtonClearClick(Sender : TObject);
begin
(*
0056D138 55 push ebp
0056D139 8BEC mov ebp, esp
0056D13B 83C4F8 add esp, -$08
0056D13E 8955F8 mov [ebp-$08], edx
0056D141 8945FC mov [ebp-$04], eax
*)
end;
procedure TfrmHighRank.TimerCleanTimer(Sender : TObject);
begin
(*
0056D1A8 55 push ebp
0056D1A9 8BEC mov ebp, esp
0056D1AB 83C4F8 add esp, -$08
0056D1AE 8955F8 mov [ebp-$08], edx
0056D1B1 8945FC mov [ebp-$04], eax
0056D1B4 8B45FC mov eax, [ebp-$04]
0056D1B7 8B8014030000 mov eax, [eax+$0314]
0056D1BD 8B10 mov edx, [eax]
0056D1BF FF92C8000000 call dword ptr [edx+$00C8]
0056D1C5 84C0 test al, al
0056D1C7 7430 jz 0056D1F9
*)
end;
procedure TfrmHighRank.ListViewServerHighRankColumnClick(Sender : TObject);
begin
(*
0056D220 55 push ebp
0056D221 8BEC mov ebp, esp
0056D223 83C4F4 add esp, -$0C
0056D226 894DF4 mov [ebp-$0C], ecx
0056D229 8955F8 mov [ebp-$08], edx
0056D22C 8945FC mov [ebp-$04], eax
0056D22F 8B45F4 mov eax, [ebp-$0C]
* Reference to: Classes.TCollectionItem.GetIndex(TCollectionItem):Integer;
|
0056D232 E8952AEBFF call 0041FCCC
0056D237 83E802 sub eax, +$02
0056D23A 7408 jz 0056D244
0056D23C 83C0FE add eax, -$02
0056D23F 83E806 sub eax, +$06
0056D242 733B jnb 0056D27F
*)
end;
procedure TfrmHighRank._PROC_0056CBBD(Sender : TObject);
begin
(*
0056CBBD 8BEC mov ebp, esp
0056CBBF B906000000 mov ecx, $00000006
0056CBC4 6A00 push $00
0056CBC6 6A00 push $00
0056CBC8 49 dec ecx
0056CBC9 75F9 jnz 0056CBC4
0056CBCB 53 push ebx
0056CBCC 8955F8 mov [ebp-$08], edx
0056CBCF 8945FC mov [ebp-$04], eax
0056CBD2 33C0 xor eax, eax
0056CBD4 55 push ebp
0056CBD5 687ECF5600 push $0056CF7E
***** TRY
|
0056CBDA 64FF30 push dword ptr fs:[eax]
0056CBDD 648920 mov fs:[eax], esp
0056CBE0 B201 mov dl, $01
0056CBE2 A18C014900 mov eax, dword ptr [$0049018C]
* Reference to : TQuickList._PROC_00490420()
|
0056CBE7 E83438F2FF call 00490420
0056CBEC 8945F0 mov [ebp-$10], eax
0056CBEF 8B45F8 mov eax, [ebp-$08]
0056CBF2 83F809 cmp eax, +$09
0056CBF5 0F873D030000 jnbe 0056CF38
0056CBFB FF248502CC5600 jmp dword ptr [$56CC02+eax*4]
0056CC02 38CF5600 DB 0056CF38
0056CC06 38CF5600 DB 0056CF38
0056CC0A 2ACC5600 DB 0056CC2A
0056CC0E 38CF5600 DB 0056CF38
0056CC12 94CC5600 DB 0056CC94
0056CC16 08CD5600 DB 0056CD08
0056CC1A 7CCD5600 DB 0056CD7C
0056CC1E F0CD5600 DB 0056CDF0
0056CC22 64CE5600 DB 0056CE64
0056CC26 D5CE5600 DB 0056CED5
0056CC2A 8B45FC mov eax, [ebp-$04]
0056CC2D 8B8018030000 mov eax, [eax+$0318]
0056CC33 8B10 mov edx, [eax]
0056CC35 FF5214 call dword ptr [edx+$14]
0056CC38 48 dec eax
0056CC39 85C0 test eax, eax
0056CC3B 0F8CF7020000 jl 0056CF38
0056CC41 40 inc eax
0056CC42 8945EC mov [ebp-$14], eax
0056CC45 C745F400000000 mov dword ptr [ebp-$0C], $00000000
0056CC4C 8B55F4 mov edx, [ebp-$0C]
0056CC4F 8B45FC mov eax, [ebp-$04]
0056CC52 8B8018030000 mov eax, [eax+$0318]
0056CC58 8B08 mov ecx, [eax]
0056CC5A FF5118 call dword ptr [ecx+$18]
0056CC5D 50 push eax
0056CC5E 8B55F4 mov edx, [ebp-$0C]
0056CC61 8B45FC mov eax, [ebp-$04]
0056CC64 8B8018030000 mov eax, [eax+$0318]
0056CC6A 8B08 mov ecx, [eax]
0056CC6C FF5118 call dword ptr [ecx+$18]
0056CC6F 0FB7404C movzx eax, word ptr [eax+$4C]
0056CC73 8D55E8 lea edx, [ebp-$18]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
0056CC76 E8FDE7E9FF call 0040B478
0056CC7B 8B55E8 mov edx, [ebp-$18]
0056CC7E 8B45F0 mov eax, [ebp-$10]
0056CC81 59 pop ecx
0056CC82 8B18 mov ebx, [eax]
0056CC84 FF533C call dword ptr [ebx+$3C]
0056CC87 FF45F4 inc dword ptr [ebp-$0C]
0056CC8A FF4DEC dec dword ptr [ebp-$14]
0056CC8D 75BD jnz 0056CC4C
0056CC8F E9A4020000 jmp 0056CF38
0056CC94 8B45FC mov eax, [ebp-$04]
0056CC97 8B8018030000 mov eax, [eax+$0318]
0056CC9D 8B10 mov edx, [eax]
0056CC9F FF5214 call dword ptr [edx+$14]
0056CCA2 48 dec eax
0056CCA3 85C0 test eax, eax
0056CCA5 0F8C8D020000 jl 0056CF38
0056CCAB 40 inc eax
0056CCAC 8945EC mov [ebp-$14], eax
0056CCAF C745F400000000 mov dword ptr [ebp-$0C], $00000000
0056CCB6 8B55F4 mov edx, [ebp-$0C]
0056CCB9 8B45FC mov eax, [ebp-$04]
0056CCBC 8B8018030000 mov eax, [eax+$0318]
0056CCC2 8B08 mov ecx, [eax]
0056CCC4 FF5118 call dword ptr [ecx+$18]
0056CCC7 50 push eax
0056CCC8 8B55F4 mov edx, [ebp-$0C]
0056CCCB 8B45FC mov eax, [ebp-$04]
0056CCCE 8B8018030000 mov eax, [eax+$0318]
0056CCD4 8B08 mov ecx, [eax]
0056CCD6 FF5118 call dword ptr [ecx+$18]
0056CCD9 8B8072050000 mov eax, [eax+$0572]
|
0056CCDF E864B5E9FF call 00408248
0056CCE4 0FB7C0 movzx eax, ax
0056CCE7 8D55E4 lea edx, [ebp-$1C]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
0056CCEA E889E7E9FF call 0040B478
0056CCEF 8B55E4 mov edx, [ebp-$1C]
0056CCF2 8B45F0 mov eax, [ebp-$10]
0056CCF5 59 pop ecx
0056CCF6 8B18 mov ebx, [eax]
0056CCF8 FF533C call dword ptr [ebx+$3C]
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -