📄 viewonlinehuman.pas
字号:
00542DD5 E88E40FDFF call 00516E68
00542DDA A1A4B56500 mov eax, dword ptr [$0065B5A4]
00542DDF 8B8037010000 mov eax, [eax+$0137]
00542DE5 50 push eax
00542DE6 33C9 xor ecx, ecx
00542DE8 BA0D000000 mov edx, $0000000D
00542DED 8B45FC mov eax, [ebp-$04]
00542DF0 8B80FC020000 mov eax, [eax+$02FC]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
00542DF6 E86D40FDFF call 00516E68
* Possible String Reference to: '在线状态'
|
00542DFB 68E02E5400 push $00542EE0
00542E00 33C9 xor ecx, ecx
00542E02 BA0E000000 mov edx, $0000000E
00542E07 8B45FC mov eax, [ebp-$04]
00542E0A 8B80FC020000 mov eax, [eax+$02FC]
* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
00542E10 E85340FDFF call 00516E68
00542E15 59 pop ecx
00542E16 59 pop ecx
00542E17 5D pop ebp
00542E18 C3 ret
*)
end;
procedure TfrmViewOnlineHuman.ButtonRefGridClick(Sender : TObject);
begin
(*
00542EEC 55 push ebp
00542EED 8BEC mov ebp, esp
00542EEF 83C4F8 add esp, -$08
00542EF2 8955F8 mov [ebp-$08], edx
00542EF5 8945FC mov [ebp-$04], eax
*)
end;
procedure TfrmViewOnlineHuman.FormDestroy(Sender : TObject);
begin
(*
00542F1C 55 push ebp
00542F1D 8BEC mov ebp, esp
00542F1F 83C4F8 add esp, -$08
00542F22 8955F8 mov [ebp-$08], edx
00542F25 8945FC mov [ebp-$04], eax
00542F28 8B45FC mov eax, [ebp-$04]
00542F2B 8B8044030000 mov eax, [eax+$0344]
* Reference to: System.TObject.Free(TObject);
|
00542F31 E89A12ECFF call 004041D0
00542F36 59 pop ecx
00542F37 59 pop ecx
00542F38 5D pop ebp
00542F39 C3 ret
*)
end;
procedure TfrmViewOnlineHuman.ComboBoxSortClick(Sender : TObject);
begin
(*
00542F3C 55 push ebp
00542F3D 8BEC mov ebp, esp
00542F3F 83C4F8 add esp, -$08
00542F42 8955F8 mov [ebp-$08], edx
00542F45 8945FC mov [ebp-$04], eax
00542F48 8B45FC mov eax, [ebp-$04]
00542F4B 8B8018030000 mov eax, [eax+$0318]
00542F51 8B10 mov edx, [eax]
00542F53 FF92CC000000 call dword ptr [edx+$00CC]
00542F59 85C0 test eax, eax
00542F5B 7C39 jl 00542F96
*)
end;
procedure TfrmViewOnlineHuman.GridHumanDblClick(Sender : TObject);
begin
(*
00543448 55 push ebp
00543449 8BEC mov ebp, esp
0054344B 83C4F8 add esp, -$08
0054344E 8955F8 mov [ebp-$08], edx
00543451 8945FC mov [ebp-$04], eax
00543454 8B45FC mov eax, [ebp-$04]
* Reference to : TfrmViewOnlineHuman._PROC_00543648()
|
00543457 E8EC010000 call 00543648
0054345C 59 pop ecx
0054345D 59 pop ecx
0054345E 5D pop ebp
0054345F C3 ret
*)
end;
procedure TfrmViewOnlineHuman.TimerTimer(Sender : TObject);
begin
(*
00543460 55 push ebp
00543461 8BEC mov ebp, esp
00543463 83C4F8 add esp, -$08
00543466 8955F8 mov [ebp-$08], edx
00543469 8945FC mov [ebp-$04], eax
0054346C 8B45FC mov eax, [ebp-$04]
0054346F 8B8044030000 mov eax, [eax+$0344]
00543475 8B10 mov edx, [eax]
00543477 FF5214 call dword ptr [edx+$14]
0054347A 85C0 test eax, eax
0054347C 7E51 jle 005434CF
*)
end;
procedure TfrmViewOnlineHuman.ButtonSearchClick(Sender : TObject);
begin
(*
005434D4 55 push ebp
005434D5 8BEC mov ebp, esp
005434D7 83C4E0 add esp, -$20
005434DA 33C9 xor ecx, ecx
005434DC 894DE0 mov [ebp-$20], ecx
005434DF 894DE4 mov [ebp-$1C], ecx
005434E2 894DF4 mov [ebp-$0C], ecx
005434E5 8955E8 mov [ebp-$18], edx
005434E8 8945FC mov [ebp-$04], eax
005434EB 33C0 xor eax, eax
005434ED 55 push ebp
005434EE 68E1355400 push $005435E1
***** TRY
|
005434F3 64FF30 push dword ptr fs:[eax]
005434F6 648920 mov fs:[eax], esp
005434F9 8D55E4 lea edx, [ebp-$1C]
005434FC 8B45FC mov eax, [ebp-$04]
005434FF 8B8014030000 mov eax, [eax+$0314]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
00543505 E83E5BF2FF call 00469048
0054350A 8B45E4 mov eax, [ebp-$1C]
0054350D 8D55F4 lea edx, [ebp-$0C]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
00543510 E8737BECFF call 0040B088
00543515 837DF400 cmp dword ptr [ebp-$0C], +$00
00543519 751D jnz 00543538
0054351B 6A30 push $30
* Possible String Reference to: '错误信息'
|
0054351D B9EC355400 mov ecx, $005435EC
* Possible String Reference to: '请输入一个人物名称！'
|
00543522 BAF8355400 mov edx, $005435F8
00543527 A1D0B36500 mov eax, dword ptr [$0065B3D0]
0054352C 8B00 mov eax, [eax]
* Reference to: Forms.TApplication.MessageBox(TApplication;PChar;PChar;Longint):Integer;
|
0054352E E8395BF4FF call 0048906C
00543533 E983000000 jmp 005435BB
00543538 8B45FC mov eax, [ebp-$04]
0054353B 8B8044030000 mov eax, [eax+$0344]
00543541 8B10 mov edx, [eax]
00543543 FF5214 call dword ptr [edx+$14]
00543546 48 dec eax
00543547 85C0 test eax, eax
00543549 7C58 jl 005435A3
0054354B 40 inc eax
0054354C 8945EC mov [ebp-$14], eax
0054354F C745F800000000 mov dword ptr [ebp-$08], $00000000
00543556 8B45FC mov eax, [ebp-$04]
00543559 8B8044030000 mov eax, [eax+$0344]
0054355F 8B55F8 mov edx, [ebp-$08]
00543562 8B08 mov ecx, [eax]
00543564 FF5118 call dword ptr [ecx+$18]
00543567 8945F0 mov [ebp-$10], eax
0054356A 8D45E0 lea eax, [ebp-$20]
0054356D 8B55F0 mov edx, [ebp-$10]
00543570 83C220 add edx, +$20
* Reference to: System.@LStrFromString(String;String;ShortString;ShortString);
| or: System.@WStrFromString(WideString;WideString;ShortString;ShortString);
|
00543573 E80C1DECFF call 00405284
00543578 8B45E0 mov eax, [ebp-$20]
0054357B 8B55F4 mov edx, [ebp-$0C]
* Reference to: SysUtils.CompareText(AnsiString;AnsiString):Integer;
|
0054357E E85D79ECFF call 0040AEE0
00543583 85C0 test eax, eax
00543585 7514 jnz 0054359B
00543587 8B55F8 mov edx, [ebp-$08]
0054358A 42 inc edx
0054358B 8B45FC mov eax, [ebp-$04]
0054358E 8B80FC020000 mov eax, [eax+$02FC]
* Reference to: Grids.TCustomGrid.SetRow(TCustomGrid;Longint);
|
00543594 E8E316FDFF call 00514C7C
00543599 EB20 jmp 005435BB
0054359B FF45F8 inc dword ptr [ebp-$08]
0054359E FF4DEC dec dword ptr [ebp-$14]
005435A1 75B3 jnz 00543556
005435A3 6A40 push $40
* Possible String Reference to: '提示信息'
|
005435A5 B910365400 mov ecx, $00543610
* Possible String Reference to: '人物/英雄没有在线！'
|
005435AA BA1C365400 mov edx, $0054361C
005435AF A1D0B36500 mov eax, dword ptr [$0065B3D0]
005435B4 8B00 mov eax, [eax]
* Reference to: Forms.TApplication.MessageBox(TApplication;PChar;PChar;Longint):Integer;
|
005435B6 E8B15AF4FF call 0048906C
005435BB 33C0 xor eax, eax
005435BD 5A pop edx
005435BE 59 pop ecx
005435BF 59 pop ecx
005435C0 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '嬪]么砦笮畔⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -