-
-
[旧帖] 请帮忙看看IP地址的加密方法 0.00雪花
-
发表于: 2007-3-3 22:47 5703
-
该程序的clientsocket的IP地址由监控得到是:218.83.161.25我想修改地址确不知如何下手,请高手指教
delphi反编译源码如下:
unit MainP;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TMainForm=class(TForm)
ToolBar1: TToolBar;
ImageList1: TImageList;
ImageList2: TImageList;
PopupMenu1: TPopupMenu;
N4: TMenuItem;
N5: TMenuItem;
N7: TMenuItem;
PopupMenu2: TPopupMenu;
N8: TMenuItem;
VPop: TMenuItem;
VPop2: TMenuItem;
N11: TMenuItem;
N14: TMenuItem;
N15: TMenuItem;
N16: TMenuItem;
N17: TMenuItem;
SBar: TStatusBar;
ServerSocket: TServerSocket;
Timer1: TTimer;
ImageList3: TImageList;
ToolButton2: TToolButton;
ToolButton3: TToolButton;
ToolButton4: TToolButton;
ToolButton5: TToolButton;
ToolButton6: TToolButton;
ToolButton8: TToolButton;
ToolButton9: TToolButton;
ToolButton10: TToolButton;
ToolButton11: TToolButton;
ToolButton12: TToolButton;
ToolButton13: TToolButton;
AutoCheck: TToolButton;
N26: TMenuItem;
N27: TMenuItem;
N28: TMenuItem;
N29: TMenuItem;
N30: TMenuItem;
N31: TMenuItem;
ClientSocket: TClientSocket;
LinkSvrBtn: TToolButton;
LinkSpr: TToolButton;
ImageList4: TImageList;
MemTable: TkbmMemTable;
MemTableSock: TIntegerField;
MemTableSvrID: TSmallintField;
MemTableGameID: TStringField;
MemTableGold: TIntegerField;
MemTableMapID: TSmallintField;
MainPanel: TPanel;
Splitter1: TSplitter;
Panel2: TPanel;
Panel3: TPanel;
Label1: TLabel;
SpeedButton1: TSpeedButton;
LocaIDEdit: TEdit;
N2: TMenuItem;
N6: TMenuItem;
ScrPanel: TPanel;
Image1: TImage;
ToolBar3: TToolBar;
ToolButton15: TToolButton;
ScroolBox: TScrollBox;
Panel1: TPanel;
ServerInfoList: TListView;
Panel4: TPanel;
Splitter2: TSplitter;
Panel5: TPanel;
GMOLCheck: TCheckBox;
GMRoomCheck: TCheckBox;
SeeGMCheck: TCheckBox;
FHCheck: TCheckBox;
ISeeBtn: TButton;
MList: TListBox;
GameMessList: TListBox;
Splitter3: TSplitter;
MapInfo: TPanel;
ToolButton1: TToolButton;
Page: TPageControl;
TabSheet1: TTabSheet;
ToolBar2: TToolBar;
VBtn: TToolButton;
VBtn2: TToolButton;
ToolButton18: TToolButton;
IDList: TListView;
TabSheet2: TTabSheet;
GameSocket: TClientSocket;
Panel6: TPanel;
GroupBox1: TGroupBox;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Edit1: TEdit;
FloatEdit1: TFloatEdit;
Edit2: TEdit;
Edit3: TEdit;
GroupBox2: TGroupBox;
Label6: TLabel;
Label7: TLabel;
Edit4: TEdit;
Edit5: TEdit;
GroupBox3: TGroupBox;
Panel7: TPanel;
GroupBox4: TGroupBox;
Label8: TLabel;
FloatEdit2: TFloatEdit;
CheckBox1: TCheckBox;
Panel8: TPanel;
StartBtn: TButton;
StopBtn: TButton;
GroupBox5: TGroupBox;
Label10: TLabel;
Label11: TLabel;
Label12: TLabel;
Label13: TLabel;
Label9: TLabel;
N1: TMenuItem;
N3: TMenuItem;
N9: TMenuItem;
N10: TMenuItem;
MemTableErrCount: TSmallintField;
UnGMCheck: TCheckBox;
procedure FormCreate(Sender : TObject);
procedure FormClose(Sender : TObject);
procedure ServerSocketAccept(Sender : TObject);
procedure Timer1Timer(Sender : TObject);
procedure ServerSocketClientDisconnect(Sender : TObject);
procedure ServerSocketClientRead(Sender : TObject);
procedure ServerSocketClientError(Sender : TObject);
procedure ToolButton9Click(Sender : TObject);
procedure FormCloseQuery(Sender : TObject);
procedure ToolButton6Click(Sender : TObject);
procedure ToolButton11Click(Sender : TObject);
procedure ToolButton5Click(Sender : TObject);
procedure ToolButton12Click(Sender : TObject);
procedure ToolButton3Click(Sender : TObject);
procedure ToolButton4Click(Sender : TObject);
procedure N27Click(Sender : TObject);
procedure N29Click(Sender : TObject);
procedure N14Click(Sender : TObject);
procedure N15Click(Sender : TObject);
procedure N31Click(Sender : TObject);
procedure ClientSocketConnect(Sender : TObject);
procedure ClientSocketConnecting(Sender : TObject);
procedure ClientSocketDisconnect(Sender : TObject);
procedure ClientSocketError(Sender : TObject);
procedure ToolButton10Click(Sender : TObject);
procedure LinkSvrBtnClick(Sender : TObject);
procedure FormActivate(Sender : TObject);
procedure ClientSocketRead(Sender : TObject);
procedure PopupMenu1Popup(Sender : TObject);
procedure VBtnClick(Sender : TObject);
procedure IDListDblClick(Sender : TObject);
procedure SpeedButton1Click(Sender : TObject);
procedure ToolButton15Click(Sender : TObject);
procedure N28Click(Sender : TObject);
procedure PopupMenu2Popup(Sender : TObject);
procedure AutoCheckClick(Sender : TObject);
procedure ServerInfoListCustomDrawItem(Sender : TObject);
procedure IDListCustomDrawItem(Sender : TObject);
procedure N17Click(Sender : TObject);
procedure N4Click(Sender : TObject);
procedure N5Click(Sender : TObject);
procedure N7Click(Sender : TObject);
procedure N6Click(Sender : TObject);
procedure ISeeBtnClick(Sender : TObject);
procedure ServerInfoListCustomDrawSubItem(Sender : TObject);
procedure MemTableBeforeInsert(Sender : TObject);
procedure MemTableBeforeDelete(Sender : TObject);
procedure MemTableAfterPost(Sender : TObject);
procedure ServerInfoListSelectItem(Sender : TObject);
procedure ToolButton1Click(Sender : TObject);
procedure FormShow(Sender : TObject);
procedure N1Click(Sender : TObject);
procedure N3Click(Sender : TObject);
procedure N10Click(Sender : TObject);
procedure GameSocketRead(Sender : TObject);
procedure GameSocketError(Sender : TObject);
procedure StartBtnClick(Sender : TObject);
procedure GameSocketDisconnect(Sender : TObject);
procedure GameSocketConnect(Sender : TObject);
procedure _PROC_004D53D1(Sender : TObject);
procedure _PROC_004D54AD(Sender : TObject);
procedure _PROC_004D5588(Sender : TObject);
procedure _PROC_004D55EC(Sender : TObject);
procedure _PROC_004D5B29(Sender : TObject);
procedure _PROC_004D5B5D(Sender : TObject);
procedure _PROC_004D5EC1(Sender : TObject);
procedure _PROC_004D5ED7(Sender : TObject);
procedure _PROC_004D5EF4(Sender : TObject);
procedure _PROC_004D67C7(Sender : TObject);
procedure _PROC_004D6971(Sender : TObject);
procedure _PROC_004D6AB1(Sender : TObject);
procedure _PROC_004D6DC5(Sender : TObject);
procedure _PROC_004D7214(Sender : TObject);
procedure _PROC_004D7389(Sender : TObject);
procedure _PROC_004D74FD(Sender : TObject);
procedure _PROC_004D77C4(Sender : TObject);
procedure _PROC_004D7D91(Sender : TObject);
procedure _PROC_004D842C(Sender : TObject);
procedure _PROC_004D860D(Sender : TObject);
private
{ Private declarations }
public
{ Public declarations }
end ;
var
MainForm: TMainForm;
{This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer}
implementation
{$R *.DFM}
procedure TMainForm.FormCreate(Sender : TObject);
begin
(*
004D5664 55 push ebp
004D5665 8BEC mov ebp, esp
004D5667 81C448FDFFFF add esp, $FFFFFD48
004D566D 53 push ebx
004D566E 56 push esi
004D566F 57 push edi
004D5670 33C9 xor ecx, ecx
004D5672 898D48FDFFFF mov [ebp+$FFFFFD48], ecx
004D5678 898D4CFEFFFF mov [ebp+$FFFFFE4C], ecx
004D567E 898D50FEFFFF mov [ebp+$FFFFFE50], ecx
004D5684 898D5CFEFFFF mov [ebp+$FFFFFE5C], ecx
004D568A 898D64FEFFFF mov [ebp+$FFFFFE64], ecx
004D5690 898D60FEFFFF mov [ebp+$FFFFFE60], ecx
004D5696 8BD8 mov ebx, eax
004D5698 33C0 xor eax, eax
004D569A 55 push ebp
* Possible String Reference to: '殛狎?沁^[?]?
|
004D569B 68A15A4D00 push $004D5AA1
***** TRY
|
004D56A0 64FF30 push dword ptr fs:[eax]
004D56A3 648920 mov fs:[eax], esp
004D56A6 8D9560FEFFFF lea edx, [ebp+$FFFFFE60]
* Reference to TApplication instance
|
004D56AC A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D56B1 8B00 mov eax, [eax]
* Reference to: Forms.TApplication.GetExeName(TApplication):AnsiString;
|
004D56B3 E80434FBFF call 00488ABC
004D56B8 8B8560FEFFFF mov eax, [ebp+$FFFFFE60]
004D56BE 8D9564FEFFFF lea edx, [ebp+$FFFFFE64]
* Reference to: SysUtils.ExtractFilePath(AnsiString):AnsiString;
|
004D56C4 E8BF3DF3FF call 00409488
004D56C9 8D8564FEFFFF lea eax, [ebp+$FFFFFE64]
* Possible String Reference to: 'Setup.ini'
|
004D56CF BAB85A4D00 mov edx, $004D5AB8
* Reference to: System.@LStrCat;
|
004D56D4 E87FEEF2FF call 00404558
004D56D9 8B8D64FEFFFF mov ecx, [ebp+$FFFFFE64]
004D56DF B201 mov dl, $01
* Reference to class TIniFile
|
004D56E1 A18CDF4300 mov eax, dword ptr [$0043DF8C]
* Reference to: IniFiles.TCustomIniFile.Create(TCustomIniFile;boolean;AnsiString);
|
004D56E6 E85189F6FF call 0043E03C
* Reference to GlobalVar_004DD4B8
|
004D56EB A3B8D44D00 mov dword ptr [$004DD4B8], eax
* Reference to control TMainForm.GMOLCheck : TCheckBox
|
004D56F0 8BB304040000 mov esi, [ebx+$0404]
004D56F6 8BC6 mov eax, esi
004D56F8 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D56FA FF92C8000000 call dword ptr [edx+$00C8]
004D5700 50 push eax
* Possible String Reference to: 'GMOLCheck'
|
004D5701 B9CC5A4D00 mov ecx, $004D5ACC
* Possible String Reference to: 'Setup'
|
004D5706 BAE05A4D00 mov edx, $004D5AE0
004D570B A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5710 8B38 mov edi, [eax]
004D5712 FF5710 call dword ptr [edi+$10]
004D5715 8BD0 mov edx, eax
004D5717 8BC6 mov eax, esi
004D5719 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
004D571B FF91CC000000 call dword ptr [ecx+$00CC]
* Reference to control TMainForm.GMRoomCheck : TCheckBox
|
004D5721 8BB308040000 mov esi, [ebx+$0408]
004D5727 8BC6 mov eax, esi
004D5729 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D572B FF92C8000000 call dword ptr [edx+$00C8]
004D5731 50 push eax
* Possible String Reference to: 'GMRoomCheck'
|
004D5732 B9F05A4D00 mov ecx, $004D5AF0
* Possible String Reference to: 'Setup'
|
004D5737 BAE05A4D00 mov edx, $004D5AE0
004D573C A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5741 8B38 mov edi, [eax]
004D5743 FF5710 call dword ptr [edi+$10]
004D5746 8BD0 mov edx, eax
004D5748 8BC6 mov eax, esi
004D574A 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
004D574C FF91CC000000 call dword ptr [ecx+$00CC]
* Reference to control TMainForm.SeeGMCheck : TCheckBox
|
004D5752 8BB30C040000 mov esi, [ebx+$040C]
004D5758 8BC6 mov eax, esi
004D575A 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D575C FF92C8000000 call dword ptr [edx+$00C8]
004D5762 50 push eax
* Possible String Reference to: 'SeeGMCheck'
|
004D5763 B9045B4D00 mov ecx, $004D5B04
* Possible String Reference to: 'Setup'
|
004D5768 BAE05A4D00 mov edx, $004D5AE0
004D576D A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5772 8B38 mov edi, [eax]
004D5774 FF5710 call dword ptr [edi+$10]
004D5777 8BD0 mov edx, eax
004D5779 8BC6 mov eax, esi
004D577B 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
004D577D FF91CC000000 call dword ptr [ecx+$00CC]
* Reference to control TMainForm.FHCheck : TCheckBox
|
004D5783 8BB310040000 mov esi, [ebx+$0410]
004D5789 8BC6 mov eax, esi
004D578B 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D578D FF92C8000000 call dword ptr [edx+$00C8]
004D5793 50 push eax
* Possible String Reference to: 'FHCheck'
|
004D5794 B9185B4D00 mov ecx, $004D5B18
* Possible String Reference to: 'Setup'
|
004D5799 BAE05A4D00 mov edx, $004D5AE0
004D579E A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D57A3 8B38 mov edi, [eax]
004D57A5 FF5710 call dword ptr [edi+$10]
004D57A8 8BD0 mov edx, eax
004D57AA 8BC6 mov eax, esi
004D57AC 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
004D57AE FF91CC000000 call dword ptr [ecx+$00CC]
* Reference to control TMainForm.UnGMCheck : TCheckBox
|
004D57B4 8BB3DC040000 mov esi, [ebx+$04DC]
004D57BA 8BC6 mov eax, esi
004D57BC 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D57BE FF92C8000000 call dword ptr [edx+$00C8]
004D57C4 50 push eax
* Possible String Reference to: 'UnGMCheck'
|
004D57C5 B9285B4D00 mov ecx, $004D5B28
* Possible String Reference to: 'Setup'
|
004D57CA BAE05A4D00 mov edx, $004D5AE0
004D57CF A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D57D4 8B38 mov edi, [eax]
004D57D6 FF5710 call dword ptr [edi+$10]
004D57D9 8BD0 mov edx, eax
004D57DB 8BC6 mov eax, esi
004D57DD 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
004D57DF FF91CC000000 call dword ptr [ecx+$00CC]
* Reference to control TMainForm.ServerInfoList : TListView
|
004D57E5 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to field TListView.DoubleBuffered : Boolean
|
004D57EB C680F801000001 mov byte ptr [eax+$01F8], $01
004D57F2 C745FC01000000 mov dword ptr [ebp-$04], $00000001
* Reference to control TMainForm.ServerInfoList : TListView
|
004D57F9 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to field TListView.Items : TListItems
|
004D57FF 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TListItems.Add(TListItems):TListItem;
|
004D5805 E8A661F7FF call 0044B9B0
004D580A 8BF0 mov esi, eax
004D580C 8D855CFEFFFF lea eax, [ebp+$FFFFFE5C]
004D5812 50 push eax
004D5813 8B45FC mov eax, [ebp-$04]
004D5816 898554FEFFFF mov [ebp+$FFFFFE54], eax
004D581C C68558FEFFFF00 mov byte ptr [ebp+$FFFFFE58], $00
004D5823 8D9554FEFFFF lea edx, [ebp+$FFFFFE54]
004D5829 33C9 xor ecx, ecx
* Possible String Reference to: '韩 %02.d 服务器'
|
004D582B B83C5B4D00 mov eax, $004D5B3C
|
004D5830 E89344F3FF call 00409CC8
004D5835 8B955CFEFFFF mov edx, [ebp+$FFFFFE5C]
004D583B 8BC6 mov eax, esi
* Reference to: ComCtrls.TListItem.SetCaption(TListItem;AnsiString);
|
004D583D E80E5CF7FF call 0044B450
004D5842 6A01 push $01
* Reference to field TListItems.OFFS_0024
|
004D5844 8B4E24 mov ecx, [esi+$24]
* Possible String Reference to: 'Select'
|
004D5847 BA545B4D00 mov edx, $004D5B54
004D584C A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5851 8B38 mov edi, [eax]
004D5853 FF5710 call dword ptr [edi+$10]
004D5856 8BD0 mov edx, eax
004D5858 8BC6 mov eax, esi
* Reference to: ComCtrls.TListItem.SetChecked(TListItem;Boolean);
|
004D585A E8895BF7FF call 0044B3E8
004D585F FF45FC inc dword ptr [ebp-$04]
004D5862 837DFC2E cmp dword ptr [ebp-$04], +$2E
004D5866 7591 jnz 004D57F9
004D5868 B201 mov dl, $01
* Reference to class TMemoryStream
|
004D586A A1B0BE4100 mov eax, dword ptr [$0041BEB0]
* Reference to: System.TObject.Create(TObject;Boolean);
|
004D586F E8D8DBF2FF call 0040344C
* Reference to GlobalVar_004DD4A4
|
004D5874 A3A4D44D00 mov dword ptr [$004DD4A4], eax
004D5879 B201 mov dl, $01
* Reference to class TGIFImage
|
004D587B A1FCD94B00 mov eax, dword ptr [$004BD9FC]
|
004D5880 E88340FFFF call 004C9908
* Possible reference to GlobalVar_004DD4B0
|
004D5885 A3B0D44D00 mov dword ptr [$004DD4B0], eax
004D588A B201 mov dl, $01
* Reference to class TBitmap
|
004D588C A1408E4200 mov eax, dword ptr [$00428E40]
* Reference to: Graphics.TBitmap.Create(TBitmap;boolean);
|
004D5891 E86A95F5FF call 0042EE00
* Possible reference to GlobalVar_004DD4AC
|
004D5896 A3ACD44D00 mov dword ptr [$004DD4AC], eax
004D589B BA00040000 mov edx, $00000400
* Reference to GlobalVar_004DD4AC
|
004D58A0 A1ACD44D00 mov eax, dword ptr [$004DD4AC]
004D58A5 8B08 mov ecx, [eax]
* Possible reference to virtual method TGlobalVar_004DD4AC.OFFS_40
|
004D58A7 FF5140 call dword ptr [ecx+$40]
004D58AA BA00030000 mov edx, $00000300
* Reference to GlobalVar_004DD4AC
|
004D58AF A1ACD44D00 mov eax, dword ptr [$004DD4AC]
004D58B4 8B08 mov ecx, [eax]
* Possible reference to virtual method TGlobalVar_004DD4AC.OFFS_34
|
004D58B6 FF5134 call dword ptr [ecx+$34]
* Reference to field TMainForm.DoubleBuffered : Boolean
|
004D58B9 C683F801000001 mov byte ptr [ebx+$01F8], $01
004D58C0 B205 mov dl, $05
* Reference to control TMainForm.ScrPanel : TPanel
|
004D58C2 8B83DC030000 mov eax, [ebx+$03DC]
* Reference to: Controls.TControl.SetAlign(TControl;TAlign);
|
004D58C8 E82317F9FF call 00466FF0
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D58CD 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to: DB.TDataSet.Open(TDataSet);
|
004D58D3 E898E7FCFF call 004A4070
004D58D8 8D9550FEFFFF lea edx, [ebp+$FFFFFE50]
004D58DE 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004D58E0 E81F22F9FF call 00467B04
004D58E5 8B9550FEFFFF mov edx, [ebp+$FFFFFE50]
* Reference to TApplication instance
|
004D58EB A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D58F0 8B00 mov eax, [eax]
* Reference to: Forms.TApplication.SetTitle(TApplication;AnsiString);
|
004D58F2 E81527FBFF call 0048800C
004D58F7 8D8568FEFFFF lea eax, [ebp+$FFFFFE68]
004D58FD 50 push eax
004D58FE 6801010000 push $00000101
|
004D5903 E8E841FBFF call 00489AF0
004D5908 6A00 push $00
004D590A 6A02 push $02
004D590C 6A02 push $02
|
004D590E E89541FBFF call 00489AA8
004D5913 8BF0 mov esi, eax
* Reference to field TMainForm.OFFS_04E4
|
004D5915 89B3E4040000 mov [ebx+$04E4], esi
004D591B 83FEFF cmp esi, -$01
004D591E 7506 jnz 004D5926
004D5920 56 push esi
|
004D5921 E80A41FBFF call 00489A30
* Reference to field TMainForm.OFFS_04E8
|
004D5926 66C783E80400000200 mov word ptr [ebx+$04E8], $0002
004D592F 33C0 xor eax, eax
* Reference to field TMainForm.OFFS_04EC
|
004D5931 8983EC040000 mov [ebx+$04EC], eax
004D5937 6862040000 push $00000462
|
004D593C E80741FBFF call 00489A48
* Reference to field TMainForm.OFFS_04EA
|
004D5941 668983EA040000 mov [ebx+$04EA], ax
004D5948 6A10 push $10
* Reference to field TMainForm.OFFS_04E8
|
004D594A 8D83E8040000 lea eax, [ebx+$04E8]
004D5950 50 push eax
* Reference to field TMainForm.OFFS_04E4
|
004D5951 8B83E4040000 mov eax, [ebx+$04E4]
004D5957 50 push eax
|
004D5958 E8CB40FBFF call 00489A28
004D595D C745FC01000000 mov dword ptr [ebp-$04], $00000001
004D5964 6A04 push $04
004D5966 8D45FC lea eax, [ebp-$04]
004D5969 50 push eax
004D596A 6A20 push $20
004D596C 68FFFF0000 push $0000FFFF
* Reference to field TMainForm.OFFS_04E4
|
004D5971 8B83E4040000 mov eax, [ebx+$04E4]
004D5977 50 push eax
|
004D5978 E82341FBFF call 00489AA0
004D597D 40 inc eax
004D597E 6A01 push $01
004D5980 6801040000 push $00000401
004D5985 8BC3 mov eax, ebx
* Reference to: QForms.TCustomForm.GetClientHandle(TCustomForm):QWorkspaceH;
|
004D5987 E8AC8AF9FF call 0046E438
004D598C 50 push eax
* Reference to field TMainForm.OFFS_04E4
|
004D598D 8B83E4040000 mov eax, [ebx+$04E4]
004D5993 50 push eax
|
004D5994 E82F41FBFF call 00489AC8
* Reference to field TMainForm.OFFS_04F8
|
004D5999 66C783F80400000200 mov word ptr [ebx+$04F8], $0002
004D59A2 68B9080000 push $000008B9
|
004D59A7 E89C40FBFF call 00489A48
* Reference to field TMainForm.OFFS_04FA
|
004D59AC 668983FA040000 mov [ebx+$04FA], ax
004D59B3 B828CF4D00 mov eax, $004DCF28
004D59B8 BA67040000 mov edx, $00000467
* Reference to: Classes.TStream.WriteComponent(TStream;TComponent);
| or: Classes.TWriter.WriteRootComponent(TWriter;TComponent);
| or: DB.TWideStringField.GetAsWideString(TWideStringField):WideString;
| or: DB.TDateTimeField.GetValue(TDateTimeField;TDateTime;TDateTime):Boolean;
| or: DB.TSQLTimeStampField.GetValue(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp):Boolean;
| or: DB.TSQLTimeStampField.SetAsSQLTimeStamp(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp);
|
004D59BD E8161AF3FF call 004073D8
004D59C2 B894D34D00 mov eax, $004DD394
004D59C7 BA0E010000 mov edx, $0000010E
* Reference to: Classes.TStream.WriteComponent(TStream;TComponent);
| or: Classes.TWriter.WriteRootComponent(TWriter;TComponent);
| or: DB.TWideStringField.GetAsWideString(TWideStringField):WideString;
| or: DB.TDateTimeField.GetValue(TDateTimeField;TDateTime;TDateTime):Boolean;
| or: DB.TSQLTimeStampField.GetValue(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp):Boolean;
| or: DB.TSQLTimeStampField.SetAsSQLTimeStamp(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp);
|
004D59CC E8071AF3FF call 004073D8
004D59D1 B813000000 mov eax, $00000013
* Reference to: SysUtils.AllocMem(Cardinal):Pointer;
|
004D59D6 E8B52CF3FF call 00408690
* Reference to GlobalVar_004DD390
|
004D59DB A390D34D00 mov dword ptr [$004DD390], eax
004D59E0 C745F8DA53A119 mov dword ptr [ebp-$08], $19A153DA
004D59E7 FF75F8 push dword ptr [ebp-$08]
|
004D59EA E86940FBFF call 00489A58
004D59EF 8BD0 mov edx, eax
004D59F1 8D854CFEFFFF lea eax, [ebp+$FFFFFE4C]
* Reference to: System.@LStrFromPChar(String;String;PAnsiChar);
| or: System.@WStrFromPChar(WideString;WideString;PAnsiChar);
|
004D59F7 E88CEAF2FF call 00404488
004D59FC 8B954CFEFFFF mov edx, [ebp+$FFFFFE4C]
* Reference to control TMainForm.ClientSocket : TClientSocket
|
004D5A02 8B8390030000 mov eax, [ebx+$0390]
* Reference to: ScktComp.TAbstractSocket.SetHost(TAbstractSocket;AnsiString);
|
004D5A08 E8DF72FBFF call 0048CCEC
004D5A0D 8B3590D34D00 mov esi, [$004DD390]
004D5A13 66C7061300 mov word ptr [esi], $0013
004D5A18 C6460201 mov byte ptr [esi+$02], $01
004D5A1C 8D8548FDFFFF lea eax, [ebp+$FFFFFD48]
|
004D5A22 E85DFBFFFF call 004D5584
004D5A27 8B9548FDFFFF mov edx, [ebp+$FFFFFD48]
004D5A2D 8D854CFDFFFF lea eax, [ebp+$FFFFFD4C]
004D5A33 B9FF000000 mov ecx, $000000FF
* Reference to: System.@LStrToString;
|
004D5A38 E8EFEAF2FF call 0040452C
004D5A3D 8D954CFDFFFF lea edx, [ebp+$FFFFFD4C]
004D5A43 8D4603 lea eax, [esi+$03]
004D5A46 B10F mov cl, $0F
* Reference to: System.@PStrNCpy(PShortString;PShortString;Byte);
|
004D5A48 E843D2F2FF call 00402C90
* Reference to control TMainForm.Timer1 : TTimer
|
004D5A4D 8BB340030000 mov esi, [ebx+$0340]
004D5A53 33D2 xor edx, edx
* Reference to field TTimer.OFFS_003C
|
004D5A55 8B463C mov eax, [esi+$3C]
* Possible reference to virtual method TTimer.OFFS_38
|
004D5A58 FF5638 call dword ptr [esi+$38]
* Reference to field TMainForm.DoubleBuffered : Boolean
|
004D5A5B C683F801000001 mov byte ptr [ebx+$01F8], $01
004D5A62 33C0 xor eax, eax
004D5A64 5A pop edx
004D5A65 59 pop ecx
004D5A66 59 pop ecx
004D5A67 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '_^[?]?
|
004D5A6A 68A85A4D00 push $004D5AA8
004D5A6F 8D8548FDFFFF lea eax, [ebp+$FFFFFD48]
* Reference to: System.@LStrClr(void;void);
|
004D5A75 E816E8F2FF call 00404290
004D5A7A 8D854CFEFFFF lea eax, [ebp+$FFFFFE4C]
* Reference to: System.@LStrClr(void;void);
|
004D5A80 E80BE8F2FF call 00404290
004D5A85 8D8550FEFFFF lea eax, [ebp+$FFFFFE50]
* Reference to: System.@LStrClr(void;void);
|
004D5A8B E800E8F2FF call 00404290
004D5A90 8D855CFEFFFF lea eax, [ebp+$FFFFFE5C]
004D5A96 BA03000000 mov edx, $00000003
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
004D5A9B E814E8F2FF call 004042B4
004D5AA0 C3 ret
* Reference to: System.@HandleFinally;
|
004D5AA1 E96AE1F2FF jmp 00403C10
004D5AA6 EBC7 jmp 004D5A6F
****** END
|
004D5AA8 5F pop edi
004D5AA9 5E pop esi
004D5AAA 5B pop ebx
004D5AAB 8BE5 mov esp, ebp
004D5AAD 5D pop ebp
004D5AAE C3 ret
*)
end;
procedure TMainForm.FormClose(Sender : TObject);
begin
(*
004D5CF4 53 push ebx
004D5CF5 56 push esi
004D5CF6 57 push edi
004D5CF7 55 push ebp
004D5CF8 8BD8 mov ebx, eax
* Reference to control TMainForm.ServerInfoList : TListView
|
004D5CFA 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to field TListView.Items : TListItems
|
004D5D00 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TListItems.GetCount(TListItems):Integer;
|
004D5D06 E8015DF7FF call 0044BA0C
004D5D0B 8BF8 mov edi, eax
004D5D0D 4F dec edi
004D5D0E 85FF test edi, edi
004D5D10 7C45 jl 004D5D57
004D5D12 47 inc edi
004D5D13 33F6 xor esi, esi
* Reference to control TMainForm.ServerInfoList : TListView
|
004D5D15 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to field TListView.Items : TListItems
|
004D5D1B 8B802C020000 mov eax, [eax+$022C]
004D5D21 8BD6 mov edx, esi
* Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
004D5D23 E8145DF7FF call 0044BA3C
* Reference to: ComCtrls.TListItem.GetChecked(TListItem):Boolean;
|
004D5D28 E87756F7FF call 0044B3A4
004D5D2D 50 push eax
* Reference to control TMainForm.ServerInfoList : TListView
|
004D5D2E 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to field TListView.Items : TListItems
|
004D5D34 8B802C020000 mov eax, [eax+$022C]
004D5D3A 8BD6 mov edx, esi
* Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
004D5D3C E8FB5CF7FF call 0044BA3C
* Reference to field TListItems.OFFS_0024
|
004D5D41 8B4824 mov ecx, [eax+$24]
* Possible String Reference to: 'Select'
|
004D5D44 BA545E4D00 mov edx, $004D5E54
004D5D49 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5D4E 8B28 mov ebp, [eax]
004D5D50 FF5514 call dword ptr [ebp+$14]
004D5D53 46 inc esi
004D5D54 4F dec edi
004D5D55 75BE jnz 004D5D15
* Reference to control TMainForm.GMOLCheck : TCheckBox
|
004D5D57 8B8304040000 mov eax, [ebx+$0404]
004D5D5D 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D5D5F FF92C8000000 call dword ptr [edx+$00C8]
004D5D65 50 push eax
* Possible String Reference to: 'GMOLCheck'
|
004D5D66 B9645E4D00 mov ecx, $004D5E64
* Possible String Reference to: 'Setup'
|
004D5D6B BA785E4D00 mov edx, $004D5E78
004D5D70 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5D75 8B30 mov esi, [eax]
004D5D77 FF5614 call dword ptr [esi+$14]
* Reference to control TMainForm.GMRoomCheck : TCheckBox
|
004D5D7A 8B8308040000 mov eax, [ebx+$0408]
004D5D80 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D5D82 FF92C8000000 call dword ptr [edx+$00C8]
004D5D88 50 push eax
* Possible String Reference to: 'GMRoomCheck'
|
004D5D89 B9885E4D00 mov ecx, $004D5E88
* Possible String Reference to: 'Setup'
|
004D5D8E BA785E4D00 mov edx, $004D5E78
004D5D93 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5D98 8B30 mov esi, [eax]
004D5D9A FF5614 call dword ptr [esi+$14]
* Reference to control TMainForm.SeeGMCheck : TCheckBox
|
004D5D9D 8B830C040000 mov eax, [ebx+$040C]
004D5DA3 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D5DA5 FF92C8000000 call dword ptr [edx+$00C8]
004D5DAB 50 push eax
* Possible String Reference to: 'SeeGMCheck'
|
004D5DAC B99C5E4D00 mov ecx, $004D5E9C
* Possible String Reference to: 'Setup'
|
004D5DB1 BA785E4D00 mov edx, $004D5E78
004D5DB6 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5DBB 8B30 mov esi, [eax]
004D5DBD FF5614 call dword ptr [esi+$14]
* Reference to control TMainForm.FHCheck : TCheckBox
|
004D5DC0 8B8310040000 mov eax, [ebx+$0410]
004D5DC6 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D5DC8 FF92C8000000 call dword ptr [edx+$00C8]
004D5DCE 50 push eax
* Possible String Reference to: 'FHCheck'
|
004D5DCF B9B05E4D00 mov ecx, $004D5EB0
* Possible String Reference to: 'Setup'
|
004D5DD4 BA785E4D00 mov edx, $004D5E78
004D5DD9 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5DDE 8B30 mov esi, [eax]
004D5DE0 FF5614 call dword ptr [esi+$14]
* Reference to control TMainForm.UnGMCheck : TCheckBox
|
004D5DE3 8B83DC040000 mov eax, [ebx+$04DC]
004D5DE9 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D5DEB FF92C8000000 call dword ptr [edx+$00C8]
004D5DF1 50 push eax
* Possible String Reference to: 'UnGMCheck'
|
004D5DF2 B9C05E4D00 mov ecx, $004D5EC0
* Possible String Reference to: 'Setup'
|
004D5DF7 BA785E4D00 mov edx, $004D5E78
004D5DFC A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5E01 8B30 mov esi, [eax]
004D5E03 FF5614 call dword ptr [esi+$14]
004D5E06 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
* Reference to: System.TObject.Free(TObject);
|
004D5E0B E86CD6F2FF call 0040347C
004D5E10 A1A4D44D00 mov eax, dword ptr [$004DD4A4]
* Reference to: System.TObject.Free(TObject);
|
004D5E15 E862D6F2FF call 0040347C
* Reference to GlobalVar_004DD4B0
|
004D5E1A A1B0D44D00 mov eax, dword ptr [$004DD4B0]
* Reference to: System.TObject.Free(TObject);
|
004D5E1F E858D6F2FF call 0040347C
* Reference to GlobalVar_004DD4AC
|
004D5E24 A1ACD44D00 mov eax, dword ptr [$004DD4AC]
* Reference to: System.TObject.Free(TObject);
|
004D5E29 E84ED6F2FF call 0040347C
* Reference to field TMainForm.OFFS_04E4
|
004D5E2E 8B83E4040000 mov eax, [ebx+$04E4]
004D5E34 50 push eax
|
004D5E35 E8F63BFBFF call 00489A30
004D5E3A A1C0D44D00 mov eax, dword ptr [$004DD4C0]
004D5E3F 50 push eax
|
004D5E40 E8930BF3FF call 004069D8
004D5E45 5D pop ebp
004D5E46 5F pop edi
004D5E47 5E pop esi
004D5E48 5B pop ebx
004D5E49 C3 ret
*)
end;
procedure TMainForm.ServerSocketAccept(Sender : TObject);
begin
(*
004D5F10 53 push ebx
004D5F11 56 push esi
004D5F12 83C4D8 add esp, -$28
004D5F15 8BF1 mov esi, ecx
004D5F17 8BD8 mov ebx, eax
004D5F19 8B4604 mov eax, [esi+$04]
004D5F1C 890424 mov [esp], eax
004D5F1F C644240400 mov byte ptr [esp+$04], $00
004D5F24 C7442408FFFFFFFF mov dword ptr [esp+$08], $FFFFFFFF
004D5F2C C644240C00 mov byte ptr [esp+$0C], $00
004D5F31 33C0 xor eax, eax
004D5F33 89442410 mov [esp+$10], eax
004D5F37 C64424140B mov byte ptr [esp+$14], $0B
004D5F3C C7442418FFFFFFFF mov dword ptr [esp+$18], $FFFFFFFF
004D5F44 C644241C00 mov byte ptr [esp+$1C], $00
004D5F49 33C0 xor eax, eax
004D5F4B 89442420 mov [esp+$20], eax
004D5F4F C644242400 mov byte ptr [esp+$24], $00
004D5F54 8BD4 mov edx, esp
004D5F56 B904000000 mov ecx, $00000004
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D5F5B 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to: DB.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
004D5F61 E8AA0EFDFF call 004A6E10
004D5F66 83C428 add esp, +$28
004D5F69 5E pop esi
004D5F6A 5B pop ebx
004D5F6B C3 ret
*)
end;
procedure TMainForm.Timer1Timer(Sender : TObject);
begin
(*
004D5F6C 55 push ebp
004D5F6D 8BEC mov ebp, esp
004D5F6F 83C4F0 add esp, -$10
004D5F72 53 push ebx
004D5F73 56 push esi
004D5F74 33C9 xor ecx, ecx
004D5F76 894DF0 mov [ebp-$10], ecx
004D5F79 894DFC mov [ebp-$04], ecx
004D5F7C 8BD8 mov ebx, eax
004D5F7E 33C0 xor eax, eax
004D5F80 55 push ebp
004D5F81 68B7604D00 push $004D60B7
***** TRY
|
004D5F86 64FF30 push dword ptr fs:[eax]
004D5F89 648920 mov fs:[eax], esp
004D5F8C 803DBCD44D0000 cmp byte ptr [$004DD4BC], $00
004D5F93 7419 jz 004D5FAE
004D5F95 B201 mov dl, $01
* Reference to control TMainForm.ISeeBtn : TButton
|
004D5F97 8B8314040000 mov eax, [ebx+$0414]
004D5F9D 8B08 mov ecx, [eax]
* Reference to method TButton.SetEnabled(Boolean)
|
004D5F9F FF5164 call dword ptr [ecx+$64]
004D5FA2 6A50 push $50
004D5FA4 68C4090000 push $000009C4
|
004D5FA9 E87209F3FF call 00406920
|
004D5FAE E8E50AF3FF call 00406A98
004D5FB3 8BF0 mov esi, eax
004D5FB5 8BC6 mov eax, esi
004D5FB7 2B05B4D44D00 sub eax, dword ptr [$004DD4B4]
004D5FBD 3D88130000 cmp eax, $00001388
004D5FC2 761B jbe 004D5FDF
004D5FC4 A190D34D00 mov eax, dword ptr [$004DD390]
004D5FC9 0FB708 movzx ecx, word ptr [eax]
004D5FCC 8B1590D34D00 mov edx, [$004DD390]
004D5FD2 8BC3 mov eax, ebx
|
004D5FD4 E8F3FEFFFF call 004D5ECC
004D5FD9 8935B4D44D00 mov [$004DD4B4], esi
* Reference to control TMainForm.ServerSocket : TServerSocket
|
004D5FDF 8B833C030000 mov eax, [ebx+$033C]
* Reference to field TServerSocket.Socket : TServerWinSocket
|
004D5FE5 8B8090000000 mov eax, [eax+$0090]
* Reference to: ScktComp.TServerWinSocket.GetActiveConnections(TServerWinSocket):Integer;
|
004D5FEB E85862FBFF call 0048C248
004D5FF0 3B0550B74D00 cmp eax, [$004DB750]
004D5FF6 7455 jz 004D604D
* Reference to control TMainForm.ServerSocket : TServerSocket
|
004D5FF8 8B833C030000 mov eax, [ebx+$033C]
* Reference to field TServerSocket.Socket : TServerWinSocket
|
004D5FFE 8B8090000000 mov eax, [eax+$0090]
* Reference to: ScktComp.TServerWinSocket.GetActiveConnections(TServerWinSocket):Integer;
|
004D6004 E83F62FBFF call 0048C248
004D6009 A350B74D00 mov dword ptr [$004DB750], eax
004D600E 8D45FC lea eax, [ebp-$04]
004D6011 50 push eax
004D6012 A150B74D00 mov eax, dword ptr [$004DB750]
004D6017 8945F4 mov [ebp-$0C], eax
004D601A C645F800 mov byte ptr [ebp-$08], $00
004D601E 8D55F4 lea edx, [ebp-$0C]
004D6021 33C9 xor ecx, ecx
* Possible String Reference to: '共 %D 台机器'
|
004D6023 B8CC604D00 mov eax, $004D60CC
|
004D6028 E89B3CF3FF call 00409CC8
004D602D 8B45FC mov eax, [ebp-$04]
004D6030 50 push eax
* Reference to control TMainForm.SBar : TStatusBar
|
004D6031 8B8338030000 mov eax, [ebx+$0338]
* Reference to field TStatusBar.Panels : TStatusPanels
|
004D6037 8B8008020000 mov eax, [eax+$0208]
004D603D BA06000000 mov edx, $00000006
* Reference to: ComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel;
| or: QComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel;
|
004D6042 E83939F7FF call 00449980
004D6047 5A pop edx
* Reference to: ComCtrls.TStatusPanel.SetText(TStatusPanel;AnsiString);
| or: ComCtrls.THeaderSection.SetText(THeaderSection;AnsiString);
|
004D6048 E88F38F7FF call 004498DC
* Reference to control TMainForm.Timer1 : TTimer
|
004D604D 8B8340030000 mov eax, [ebx+$0340]
004D6053 FF400C inc dword ptr [eax+$0C]
* Reference to control TMainForm.Timer1 : TTimer
|
004D6056 8B8340030000 mov eax, [ebx+$0340]
* Reference to field TTimer.Tag : Longint
|
004D605C 83780C0F cmp dword ptr [eax+$0C], +$0F
004D6060 7E37 jle 004D6099
* Reference to control TMainForm.ClientSocket : TClientSocket
|
004D6062 8BB390030000 mov esi, [ebx+$0390]
* Reference to field TClientSocket.Active : Boolean
|
004D6068 807E3000 cmp byte ptr [esi+$30], $00
004D606C 7420 jz 004D608E
004D606E B864000000 mov eax, $00000064
|
004D6073 E848CDF2FF call 00402DC0
004D6078 8D55F0 lea edx, [ebp-$10]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D607B E8BC2CF3FF call 00408D3C
004D6080 8B55F0 mov edx, [ebp-$10]
* Reference to field TClientSocket.Socket : TClientWinSocket
|
004D6083 8B8690000000 mov eax, [esi+$0090]
* Reference to: ScktComp.TCustomWinSocket.SendText(TCustomWinSocket;AnsiString):Integer;
|
004D6089 E8FE56FBFF call 0048B78C
* Reference to control TMainForm.Timer1 : TTimer
|
004D608E 8B8340030000 mov eax, [ebx+$0340]
004D6094 33D2 xor edx, edx
* Reference to field TTimer.Tag : Longint
|
004D6096 89500C mov [eax+$0C], edx
004D6099 33C0 xor eax, eax
004D609B 5A pop edx
004D609C 59 pop ecx
004D609D 59 pop ecx
004D609E 648910 mov fs:[eax], edx
****** FINALLY
|
004D60A1 68BE604D00 push $004D60BE
004D60A6 8D45F0 lea eax, [ebp-$10]
* Reference to: System.@LStrClr(void;void);
|
004D60A9 E8E2E1F2FF call 00404290
004D60AE 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D60B1 E8DAE1F2FF call 00404290
004D60B6 C3 ret
* Reference to: System.@HandleFinally;
|
004D60B7 E954DBF2FF jmp 00403C10
004D60BC EBE8 jmp 004D60A6
****** END
|
004D60BE 5E pop esi
004D60BF 5B pop ebx
004D60C0 8BE5 mov esp, ebp
004D60C2 5D pop ebp
004D60C3 C3 ret
*)
end;
procedure TMainForm.ServerSocketClientDisconnect(Sender : TObject);
begin
(*
004D60DC 55 push ebp
004D60DD 8BEC mov ebp, esp
004D60DF 6A00 push $00
004D60E1 6A00 push $00
004D60E3 6A00 push $00
004D60E5 6A00 push $00
004D60E7 53 push ebx
004D60E8 56 push esi
004D60E9 8BF1 mov esi, ecx
004D60EB 8BD8 mov ebx, eax
004D60ED 33C0 xor eax, eax
004D60EF 55 push ebp
* Possible String Reference to: '轷隍?疝[?]?
|
004D60F0 6896614D00 push $004D6196
***** TRY
|
004D60F5 64FF30 push dword ptr fs:[eax]
004D60F8 648920 mov fs:[eax], esp
004D60FB A0A4614D00 mov al, byte ptr [$004D61A4]
004D6100 50 push eax
004D6101 8D45F0 lea eax, [ebp-$10]
004D6104 8B5604 mov edx, [esi+$04]
004D6107 B1FC mov cl, $FC
|
004D6109 E82EEAF3FF call 00414B3C
004D610E 8D4DF0 lea ecx, [ebp-$10]
* Possible String Reference to: 'Sock'
|
004D6111 BAB0614D00 mov edx, $004D61B0
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6116 8B83A0030000 mov eax, [ebx+$03A0]
004D611C 8B30 mov esi, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0244
|
004D611E FF9644020000 call dword ptr [esi+$0244]
004D6124 84C0 test al, al
004D6126 7458 jz 004D6180
* Possible String Reference to: 'SvrID'
|
004D6128 BAC0614D00 mov edx, $004D61C0
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D612D 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6133 E8D4EEFCFF call 004A500C
004D6138 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D613A FF5258 call dword ptr [edx+$58]
004D613D 85C0 test eax, eax
004D613F 7E34 jle 004D6175
004D6141 8D0440 lea eax, [eax+eax*2]
004D6144 8D34458ED34D00 lea esi, [$4DD38E+eax*2]
004D614B 66FF0E dec word ptr [esi]
* Possible String Reference to: 'Gold'
|
004D614E BAD0614D00 mov edx, $004D61D0
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6153 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6159 E8AEEEFCFF call 004A500C
004D615E 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D6160 FF5258 call dword ptr [edx+$58]
004D6163 294602 sub dword ptr [esi+$02], eax
* Reference to field TMainForm.OFFS_04E0
|
004D6166 8B93E0040000 mov edx, [ebx+$04E0]
004D616C 2BD0 sub edx, eax
004D616E 8BC3 mov eax, ebx
|
004D6170 E813120000 call 004D7388
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6175 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to: DB.TDataSet.Delete(TDataSet);
|
004D617B E84409FDFF call 004A6AC4
004D6180 33C0 xor eax, eax
004D6182 5A pop edx
004D6183 59 pop ecx
004D6184 59 pop ecx
004D6185 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[?]?
|
004D6188 689D614D00 push $004D619D
004D618D 8D45F0 lea eax, [ebp-$10]
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
004D6190 E8B3A5F3FF call 00410748
004D6195 C3 ret
* Reference to: System.@HandleFinally;
|
004D6196 E975DAF2FF jmp 00403C10
004D619B EBF0 jmp 004D618D
****** END
|
004D619D 5E pop esi
004D619E 5B pop ebx
004D619F 8BE5 mov esp, ebp
004D61A1 5D pop ebp
004D61A2 C3 ret
*)
end;
procedure TMainForm.ServerSocketClientRead(Sender : TObject);
begin
(*
004D61D8 55 push ebp
004D61D9 8BEC mov ebp, esp
004D61DB 51 push ecx
004D61DC B907000000 mov ecx, $00000007
004D61E1 6A00 push $00
004D61E3 6A00 push $00
004D61E5 49 dec ecx
004D61E6 75F9 jnz 004D61E1
004D61E8 51 push ecx
004D61E9 874DFC xchg [ebp-$04], ecx
004D61EC 53 push ebx
004D61ED 56 push esi
004D61EE 57 push edi
004D61EF 894DF8 mov [ebp-$08], ecx
004D61F2 8945FC mov [ebp-$04], eax
004D61F5 33C0 xor eax, eax
004D61F7 55 push ebp
* Possible String Reference to: '槟则?剡^[?]?
|
004D61F8 68C7674D00 push $004D67C7
***** TRY
|
004D61FD 64FF30 push dword ptr fs:[eax]
004D6200 648920 mov fs:[eax], esp
004D6203 8B45F8 mov eax, [ebp-$08]
* Reference to: ComCtrls.THeaderSections.Add(THeaderSections):THeaderSection;
| or: ComCtrls.TListItems.Add(TListItems):TListItem;
| or: ScktComp.TCustomWinSocket.ReceiveLength(TCustomWinSocket):Integer;
|
004D6206 E8615AFBFF call 0048BC6C
004D620B 8BD8 mov ebx, eax
004D620D 85DB test ebx, ebx
004D620F 0F8484050000 jz 004D6799
004D6215 8BC3 mov eax, ebx
* Reference to: SysUtils.AllocMem(Cardinal):Pointer;
|
004D6217 E87424F3FF call 00408690
004D621C 8945EC mov [ebp-$14], eax
004D621F 8B45EC mov eax, [ebp-$14]
004D6222 8945E8 mov [ebp-$18], eax
004D6225 8B55EC mov edx, [ebp-$14]
004D6228 8BCB mov ecx, ebx
004D622A 8B45F8 mov eax, [ebp-$08]
* Reference to: ScktComp.TCustomWinSocket.ReceiveBuf(TCustomWinSocket;void;void;Integer):Integer;
|
004D622D E8CE58FBFF call 0048BB00
004D6232 895DF0 mov [ebp-$10], ebx
004D6235 8B7DEC mov edi, [ebp-$14]
004D6238 0FB71F movzx ebx, word ptr [edi]
004D623B 33C0 xor eax, eax
004D623D 8A4702 mov al, byte ptr [edi+$02]
004D6240 83C0FA add eax, -$06
004D6243 83F80C cmp eax, +$0C
004D6246 0F8743050000 jnbe 004D678F
004D624C 8A8059624D00 mov al, byte ptr [eax+$4D6259]
004D6252 FF248566624D00 jmp dword ptr [$4D6266+eax*4]
004D6259 0102 add [edx], eax
004D625B 0000 add [eax], al
004D625D 0000 add [eax], al
004D625F 0000 add [eax], al
004D6261 0003 add [ebx], al
004D6263 0500048F67 add eax, +$678F0400
004D6268 4D dec ebp
004D6269 007E62 add [esi+$62], bh
004D626C 4D dec ebp
004D626D 007F64 add [edi+$64], bh
004D6270 4D dec ebp
004D6271 00B5654D000B add [ebp+$B004D65], dh
004D6277 664D dec bp
004D6279 005566 add [ebp+$66], dl
004D627C 4D dec ebp
004D627D 0083FB1B0F85 add [ebx+$850F1BFB], al
004D6283 120500008BDF adc al, byte ptr [$DF8B0000]
004D6289 836B0364 sub dword ptr [ebx+$03], +$64
004D628D 817B0300100000 cmp dword ptr [ebx+$03], $00001000
004D6294 0F9545E7 setnz byte ptr [ebp-$19]
004D6298 A0D8674D00 mov al, byte ptr [$004D67D8]
004D629D 50 push eax
004D629E 8D45D4 lea eax, [ebp-$2C]
004D62A1 8B55F8 mov edx, [ebp-$08]
004D62A4 8B5204 mov edx, [edx+$04]
004D62A7 B1FC mov cl, $FC
|
004D62A9 E88EE8F3FF call 00414B3C
004D62AE 8D4DD4 lea ecx, [ebp-$2C]
* Reference to MainForm
|
004D62B1 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D62B4 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'Sock'
|
004D62BA BAE4674D00 mov edx, $004D67E4
004D62BF 8B30 mov esi, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0244
|
004D62C1 FF9644020000 call dword ptr [esi+$0244]
004D62C7 84C0 test al, al
004D62C9 7479 jz 004D6344
004D62CB 33C0 xor eax, eax
004D62CD 8A4314 mov al, byte ptr [ebx+$14]
004D62D0 8D0440 lea eax, [eax+eax*2]
004D62D3 8D34458ED34D00 lea esi, [$4DD38E+eax*2]
* Reference to MainForm
|
004D62DA 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D62DD 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'SvrID'
|
004D62E3 BAF4674D00 mov edx, $004D67F4
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D62E8 E81FEDFCFF call 004A500C
004D62ED 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D62EF FF5258 call dword ptr [edx+$58]
004D62F2 85C0 test eax, eax
004D62F4 7D03 jnl 004D62F9
004D62F6 66FF06 inc word ptr [esi]
* Reference to MainForm
|
004D62F9 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D62FC 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'Gold'
|
004D6302 BA04684D00 mov edx, $004D6804
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6307 E800EDFCFF call 004A500C
004D630C 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D630E FF5258 call dword ptr [edx+$58]
004D6311 8BF8 mov edi, eax
004D6313 8B4602 mov eax, [esi+$02]
004D6316 2BC7 sub eax, edi
004D6318 034317 add eax, [ebx+$17]
004D631B 894602 mov [esi+$02], eax
* Reference to MainForm
|
004D631E 8B45FC mov eax, [ebp-$04]
* Reference to field TMainForm.OFFS_04E0
|
004D6321 8B90E0040000 mov edx, [eax+$04E0]
004D6327 2BD7 sub edx, edi
004D6329 035317 add edx, [ebx+$17]
* Reference to MainForm
|
004D632C 8B45FC mov eax, [ebp-$04]
|
004D632F E854100000 call 004D7388
* Reference to MainForm
|
004D6334 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6337 8B80A0030000 mov eax, [eax+$03A0]
* Reference to: DB.TDataSet.Edit(TDataSet);
|
004D633D E84A04FDFF call 004A678C
004D6342 EB3A jmp 004D637E
004D6344 33C0 xor eax, eax
004D6346 8A4314 mov al, byte ptr [ebx+$14]
004D6349 8D0440 lea eax, [eax+eax*2]
004D634C 8D04458ED34D00 lea eax, [$4DD38E+eax*2]
004D6353 66FF00 inc word ptr [eax]
004D6356 8B5317 mov edx, [ebx+$17]
004D6359 015002 add [eax+$02], edx
* Reference to MainForm
|
004D635C 8B45FC mov eax, [ebp-$04]
* Reference to field TMainForm.OFFS_04E0
|
004D635F 8B90E0040000 mov edx, [eax+$04E0]
004D6365 035317 add edx, [ebx+$17]
* Reference to MainForm
|
004D6368 8B45FC mov eax, [ebp-$04]
|
004D636B E818100000 call 004D7388
* Reference to MainForm
|
004D6370 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6373 8B80A0030000 mov eax, [eax+$03A0]
* Reference to: DB.TDataSet.Append(TDataSet);
|
004D6379 E85205FDFF call 004A68D0
* Reference to MainForm
|
004D637E 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6381 8BB0A0030000 mov esi, [eax+$03A0]
* Possible String Reference to: 'Sock'
|
004D6387 BAE4674D00 mov edx, $004D67E4
004D638C 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D638E E879ECFCFF call 004A500C
004D6393 8B55F8 mov edx, [ebp-$08]
004D6396 8B5204 mov edx, [edx+$04]
004D6399 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D639B FF91A8000000 call dword ptr [ecx+$00A8]
* Possible String Reference to: 'SvrID'
|
004D63A1 BAF4674D00 mov edx, $004D67F4
004D63A6 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D63A8 E85FECFCFF call 004A500C
004D63AD 33D2 xor edx, edx
004D63AF 8A5314 mov dl, byte ptr [ebx+$14]
004D63B2 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D63B4 FF91A8000000 call dword ptr [ecx+$00A8]
* Possible String Reference to: 'GameID'
|
004D63BA BA14684D00 mov edx, $004D6814
004D63BF 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D63C1 E846ECFCFF call 004A500C
004D63C6 50 push eax
004D63C7 8D45D0 lea eax, [ebp-$30]
004D63CA 8D5307 lea edx, [ebx+$07]
* Reference to: System.@LStrFromString(String;String;ShortString;ShortString);
| or: System.@WStrFromString(WideString;WideString;ShortString;ShortString);
|
004D63CD E822E1F2FF call 004044F4
004D63D2 8B55D0 mov edx, [ebp-$30]
004D63D5 58 pop eax
004D63D6 8B08 mov ecx, [eax]
004D63D8 FF91B0000000 call dword ptr [ecx+$00B0]
* Possible String Reference to: 'Gold'
|
004D63DE BA04684D00 mov edx, $004D6804
004D63E3 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D63E5 E822ECFCFF call 004A500C
004D63EA 8B5317 mov edx, [ebx+$17]
004D63ED 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D63EF FF91A8000000 call dword ptr [ecx+$00A8]
* Possible String Reference to: 'MapID'
|
004D63F5 BA24684D00 mov edx, $004D6824
004D63FA 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D63FC E80BECFCFF call 004A500C
004D6401 0FB75315 movzx edx, word ptr [ebx+$15]
004D6405 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D6407 FF91A8000000 call dword ptr [ecx+$00A8]
004D640D 807DE700 cmp byte ptr [ebp-$19], $00
004D6411 7428 jz 004D643B
* Possible String Reference to: 'ErrCount'
|
004D6413 BA34684D00 mov edx, $004D6834
004D6418 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D641A E8EDEBFCFF call 004A500C
004D641F 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D6421 FF5258 call dword ptr [edx+$58]
004D6424 40 inc eax
004D6425 50 push eax
* Possible String Reference to: 'ErrCount'
|
004D6426 BA34684D00 mov edx, $004D6834
004D642B 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D642D E8DAEBFCFF call 004A500C
004D6432 5A pop edx
004D6433 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D6435 FF91A8000000 call dword ptr [ecx+$00A8]
004D643B 8BC6 mov eax, esi
004D643D 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_024C
|
004D643F FF924C020000 call dword ptr [edx+$024C]
* Possible String Reference to: 'ErrCount'
|
004D6445 BA34684D00 mov edx, $004D6834
004D644A 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D644C E8BBEBFCFF call 004A500C
004D6451 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D6453 FF5258 call dword ptr [edx+$58]
004D6456 83F864 cmp eax, +$64
004D6459 7E12 jle 004D646D
004D645B 6AFF push $FF
004D645D 8B45F8 mov eax, [ebp-$08]
004D6460 8B4804 mov ecx, [eax+$04]
004D6463 B20B mov dl, $0B
* Reference to MainForm
|
004D6465 8B45FC mov eax, [ebp-$04]
|
004D6468 E803050000 call 004D6970
004D646D 33D2 xor edx, edx
004D646F 8A5314 mov dl, byte ptr [ebx+$14]
* Reference to MainForm
|
004D6472 8B45FC mov eax, [ebp-$04]
* Reference to : TMainForm._PROC_004D77C4()
|
004D6475 E84A130000 call 004D77C4
004D647A E910030000 jmp 004D678F
004D647F 83FB07 cmp ebx, +$07
004D6482 0F8511030000 jnz 004D6799
004D6488 A0D8674D00 mov al, byte ptr [$004D67D8]
004D648D 50 push eax
004D648E 8D45C0 lea eax, [ebp-$40]
004D6491 8B55F8 mov edx, [ebp-$08]
004D6494 8B5204 mov edx, [edx+$04]
004D6497 B1FC mov cl, $FC
|
004D6499 E89EE6F3FF call 00414B3C
004D649E 8D4DC0 lea ecx, [ebp-$40]
* Reference to MainForm
|
004D64A1 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D64A4 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'Sock'
|
004D64AA BAE4674D00 mov edx, $004D67E4
004D64AF 8B18 mov ebx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0244
|
004D64B1 FF9344020000 call dword ptr [ebx+$0244]
004D64B7 84C0 test al, al
004D64B9 0F84D0020000 jz 004D678F
* Reference to MainForm
|
004D64BF 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D64C2 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'SvrId'
|
004D64C8 BA48684D00 mov edx, $004D6848
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D64CD E83AEBFCFF call 004A500C
004D64D2 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D64D4 FF5258 call dword ptr [edx+$58]
004D64D7 8BF8 mov edi, eax
004D64D9 8D047F lea eax, [edi+edi*2]
004D64DC 8D1C458ED34D00 lea ebx, [$4DD38E+eax*2]
004D64E3 66FF0B dec word ptr [ebx]
* Reference to MainForm
|
004D64E6 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D64E9 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'Gold'
|
004D64EF BA04684D00 mov edx, $004D6804
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D64F4 E813EBFCFF call 004A500C
004D64F9 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D64FB FF5258 call dword ptr [edx+$58]
004D64FE 8BF8 mov edi, eax
004D6500 297B02 sub dword ptr [ebx+$02], edi
* Reference to MainForm
|
004D6503 8B45FC mov eax, [ebp-$04]
* Reference to field TMainForm.OFFS_04E0
|
004D6506 8B90E0040000 mov edx, [eax+$04E0]
004D650C 2BD7 sub edx, edi
* Reference to MainForm
|
004D650E 8B45FC mov eax, [ebp-$04]
|
004D6511 E8720E0000 call 004D7388
* Reference to MainForm
|
004D6516 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6519 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'SvrId'
|
004D651F BA48684D00 mov edx, $004D6848
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6524 E8E3EAFCFF call 004A500C
004D6529 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D652B FF5258 call dword ptr [edx+$58]
004D652E 8BD0 mov edx, eax
* Reference to MainForm
|
004D6530 8B45FC mov eax, [ebp-$04]
* Reference to : TMainForm._PROC_004D77C4()
|
004D6533 E88C120000 call 004D77C4
* Reference to MainForm
|
004D6538 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D653B 8B80A0030000 mov eax, [eax+$03A0]
* Reference to: DB.TDataSet.Edit(TDataSet);
|
004D6541 E84602FDFF call 004A678C
* Reference to MainForm
|
004D6546 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6549 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'SvrID'
|
004D654F BAF4674D00 mov edx, $004D67F4
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6554 E8B3EAFCFF call 004A500C
004D6559 83CAFF or edx, -$01
004D655C 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D655E FF91A8000000 call dword ptr [ecx+$00A8]
* Reference to MainForm
|
004D6564 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6567 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'Gold'
|
004D656D BA04684D00 mov edx, $004D6804
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6572 E895EAFCFF call 004A500C
004D6577 33D2 xor edx, edx
004D6579 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D657B FF91A8000000 call dword ptr [ecx+$00A8]
* Reference to MainForm
|
004D6581 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6584 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'MapID'
|
004D658A BA24684D00 mov edx, $004D6824
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D658F E878EAFCFF call 004A500C
004D6594 83CAFF or edx, -$01
004D6597 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D6599 FF91A8000000 call dword ptr [ecx+$00A8]
* Reference to MainForm
|
004D659F 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D65A2 8B80A0030000 mov eax, [eax+$03A0]
004D65A8 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_024C
|
004D65AA FF924C020000 call dword ptr [edx+$024C]
004D65B0 E9DA010000 jmp 004D678F
004D65B5 83FB19 cmp ebx, +$19
004D65B8 0F85DB010000 jnz 004D6799
* Reference to pointer to GlobalVar_004DCE60
|
004D65BE A164B94D00 mov eax, dword ptr [$004DB964]
004D65C3 833800 cmp dword ptr [eax], +$00
004D65C6 0F84C3010000 jz 004D678F
004D65CC 8D45F4 lea eax, [ebp-$0C]
004D65CF 8D5707 lea edx, [edi+$07]
* Reference to: System.@LStrFromString(String;String;ShortString;ShortString);
| or: System.@WStrFromString(WideString;WideString;ShortString;ShortString);
|
004D65D2 E81DDFF2FF call 004044F4
* Reference to pointer to GlobalVar_004DCE60
|
004D65D7 A164B94D00 mov eax, dword ptr [$004DB964]
004D65DC 8B00 mov eax, [eax]
* Reference to control GMROOMRadio : N.A.
|
004D65DE 8B80F8020000 mov eax, [eax+$02F8]
* Reference to field N.A..OFFS_0218
|
004D65E4 8B9818020000 mov ebx, [eax+$0218]
004D65EA 8B55F4 mov edx, [ebp-$0C]
004D65ED 8BC3 mov eax, ebx
004D65EF 8B08 mov ecx, [eax]
004D65F1 FF5154 call dword ptr [ecx+$54]
004D65F4 85C0 test eax, eax
004D65F6 0F8D93010000 jnl 004D678F
004D65FC 8B55F4 mov edx, [ebp-$0C]
004D65FF 8BC3 mov eax, ebx
* Reference to: Classes.TStrings.Append(TStrings;AnsiString);
| or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries);
|
004D6601 E88689F4FF call 0041EF8C
004D6606 E984010000 jmp 004D678F
004D660B 8D55F4 lea edx, [ebp-$0C]
004D660E 8B45E8 mov eax, [ebp-$18]
004D6611 83C007 add eax, +$07
* Reference to: Dialogs.FixFileName(AnsiString):AnsiString;
| or: SysUtils.StrPas(PChar):AnsiString;
|
004D6614 E8BF31F3FF call 004097D8
* Reference to MainForm
|
004D6619 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.GameMessList : TListBox
|
004D661C 8B801C040000 mov eax, [eax+$041C]
* Reference to field TListBox.Items : TStrings
|
004D6622 8B8018020000 mov eax, [eax+$0218]
004D6628 8B55F4 mov edx, [ebp-$0C]
* Reference to: Classes.TStrings.Append(TStrings;AnsiString);
|
004D662B E85C89F4FF call 0041EF8C
* Reference to MainForm
|
004D6630 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.GameMessList : TListBox
|
004D6633 8B981C040000 mov ebx, [eax+$041C]
004D6639 8BC3 mov eax, ebx
004D663B 8B10 mov edx, [eax]
* Possible reference to virtual method TListBox.OFFS_00C8
|
004D663D FF92C8000000 call dword ptr [edx+$00C8]
004D6643 8BD0 mov edx, eax
004D6645 4A dec edx
004D6646 8BC3 mov eax, ebx
004D6648 8B08 mov ecx, [eax]
* Reference to method TListBox.ItemIndex()
|
004D664A FF91D0000000 call dword ptr [ecx+$00D0]
004D6650 E93A010000 jmp 004D678F
004D6655 8D45EC lea eax, [ebp-$14]
004D6658 8BD3 mov edx, ebx
* Reference to: System.@ReallocMem(Pointer;Pointer;Integer):Pointer;
|
004D665A E869C1F2FF call 004027C8
004D665F 8B45EC mov eax, [ebp-$14]
004D6662 8945E8 mov [ebp-$18], eax
004D6665 33C0 xor eax, eax
004D6667 55 push ebp
004D6668 6868674D00 push $004D6768
***** TRY
|
004D666D 64FF30 push dword ptr fs:[eax]
004D6670 648920 mov fs:[eax], esp
004D6673 8BFB mov edi, ebx
004D6675 2B7DF0 sub edi, dword ptr [ebp-$10]
004D6678 8B75F0 mov esi, [ebp-$10]
004D667B 85FF test edi, edi
004D667D 7E38 jle 004D66B7
004D667F 6A00 push $00
004D6681 57 push edi
004D6682 8B45E8 mov eax, [ebp-$18]
004D6685 33D2 xor edx, edx
004D6687 52 push edx
004D6688 50 push eax
004D6689 8BC6 mov eax, esi
004D668B 99 cdq
004D668C 030424 add eax, [esp]
004D668F 13542404 adc edx, [esp+$04]
004D6693 83C408 add esp, +$08
004D6696 50 push eax
004D6697 8B45F8 mov eax, [ebp-$08]
004D669A 8B4004 mov eax, [eax+$04]
004D669D 50 push eax
|
004D669E E8D533FBFF call 00489A78
004D66A3 8BD8 mov ebx, eax
004D66A5 85DB test ebx, ebx
004D66A7 7F06 jnle 004D66AF
004D66A9 85F6 test esi, esi
004D66AB 7F0A jnle 004D66B7
004D66AD EBD0 jmp 004D667F
004D66AF 03F3 add esi, ebx
004D66B1 2BFB sub edi, ebx
004D66B3 85FF test edi, edi
004D66B5 7FC8 jnle 004D667F
004D66B7 85F6 test esi, esi
004D66B9 750D jnz 004D66C8
004D66BB 33C0 xor eax, eax
004D66BD 5A pop edx
004D66BE 59 pop ecx
004D66BF 59 pop ecx
004D66C0 648910 mov fs:[eax], edx
004D66C3 E9D1000000 jmp 004D6799
004D66C8 A1A4D44D00 mov eax, dword ptr [$004DD4A4]
* Reference to: Classes.TMemoryStream.Clear(TMemoryStream);
|
004D66CD E862A5F4FF call 00420C34
004D66D2 8B55E8 mov edx, [ebp-$18]
004D66D5 83C207 add edx, +$07
004D66D8 8BCE mov ecx, esi
004D66DA A1A4D44D00 mov eax, dword ptr [$004DD4A4]
* Reference to: Classes.TStream.WriteBuffer(TStream;void;void;Longint);
|
004D66DF E840A0F4FF call 00420724
004D66E4 6A00 push $00
004D66E6 6A00 push $00
004D66E8 A1A4D44D00 mov eax, dword ptr [$004DD4A4]
|
004D66ED E8EE9DF4FF call 004204E0
* Reference to GlobalVar_004DD4B0
|
004D66F2 A1B0D44D00 mov eax, dword ptr [$004DD4B0]
|
004D66F7 E88833FFFF call 004C9A84
004D66FC 8B15A4D44D00 mov edx, [$004DD4A4]
* Reference to GlobalVar_004DD4B0
|
004D6702 A1B0D44D00 mov eax, dword ptr [$004DD4B0]
004D6707 8B08 mov ecx, [eax]
* Possible reference to virtual method TGlobalVar_004DD4B0.OFFS_54
|
004D6709 FF5154 call dword ptr [ecx+$54]
* Reference to GlobalVar_004DD4B0
|
004D670C A1B0D44D00 mov eax, dword ptr [$004DD4B0]
004D6711 50 push eax
* Reference to GlobalVar_004DD4AC
|
004D6712 A1ACD44D00 mov eax, dword ptr [$004DD4AC]
* Reference to: Graphics.TBitmap.GetCanvas(TBitmap):TCanvas;
|
004D6717 E8AC8CF5FF call 0042F3C8
004D671C 33D2 xor edx, edx
004D671E 8A15A8D44D00 mov dl, byte ptr [$004DD4A8]
004D6724 C1E206 shl edx, $06
004D6727 33C9 xor ecx, ecx
* Reference to: Graphics.TCanvas.Draw(TCanvas;Integer;Integer;TGraphic);
|
004D6729 E88241F5FF call 0042A8B0
004D672E FE05A8D44D00 inc byte ptr [$004DD4A8]
004D6734 803DA8D44D000F cmp byte ptr [$004DD4A8], $0F
004D673B 7621 jbe 004D675E
004D673D C605A8D44D0000 mov byte ptr [$004DD4A8], $00
* Reference to MainForm
|
004D6744 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.Image1 : TImage
|
004D6747 8B80E0030000 mov eax, [eax+$03E0]
* Reference to field TImage.Picture : TPicture
|
004D674D 8B8068010000 mov eax, [eax+$0168]
* Reference to GlobalVar_004DD4AC
|
004D6753 8B15ACD44D00 mov edx, [$004DD4AC]
004D6759 8B08 mov ecx, [eax]
* Reference to method TPicture.Assign(TPersistent)
|
004D675B FF5108 call dword ptr [ecx+$08]
004D675E 33C0 xor eax, eax
004D6760 5A pop edx
004D6761 59 pop ecx
004D6762 59 pop ecx
004D6763 648910 mov fs:[eax], edx
004D6766 EB0A jmp 004D6772
* Reference to: System.@HandleAnyException;
|
004D6768 E9EFD1F2FF jmp 0040395C
* Reference to: System.@DoneExcept;
|
004D676D E852D5F2FF call 00403CC4
****** END
|
* Reference to MainForm
|
004D6772 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.ScrPanel : TPanel
|
004D6775 8B80DC030000 mov eax, [eax+$03DC]
* Reference to field TPanel.Visible : Boolean
|
004D677B 80785700 cmp byte ptr [eax+$57], $00
004D677F 740E jz 004D678F
004D6781 8B45F8 mov eax, [ebp-$08]
004D6784 8B5004 mov edx, [eax+$04]
* Reference to MainForm
|
004D6787 8B45FC mov eax, [ebp-$04]
|
004D678A E86D0D0000 call 004D74FC
004D678F 8D45EC lea eax, [ebp-$14]
004D6792 33D2 xor edx, edx
* Reference to: System.@ReallocMem(Pointer;Pointer;Integer):Pointer;
|
004D6794 E82FC0F2FF call 004027C8
004D6799 33C0 xor eax, eax
004D679B 5A pop edx
004D679C 59 pop ecx
004D679D 59 pop ecx
004D679E 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '_^[?]?
|
004D67A1 68CE674D00 push $004D67CE
004D67A6 8D45C0 lea eax, [ebp-$40]
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
004D67A9 E89A9FF3FF call 00410748
004D67AE 8D45D0 lea eax, [ebp-$30]
* Reference to: System.@LStrClr(void;void);
|
004D67B1 E8DADAF2FF call 00404290
004D67B6 8D45D4 lea eax, [ebp-$2C]
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
004D67B9 E88A9FF3FF call 00410748
004D67BE 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
004D67C1 E8CADAF2FF call 00404290
004D67C6 C3 ret
* Reference to: System.@HandleFinally;
|
004D67C7 E944D4F2FF jmp 00403C10
004D67CC EBD8 jmp 004D67A6
****** END
|
004D67CE 5F pop edi
004D67CF 5E pop esi
004D67D0 5B pop ebx
004D67D1 8BE5 mov esp, ebp
004D67D3 5D pop ebp
004D67D4 C3 ret
*)
end;
procedure TMainForm.ServerSocketClientError(Sender : TObject);
begin
(*
004D6850 55 push ebp
004D6851 8BEC mov ebp, esp
004D6853 8B4508 mov eax, [ebp+$08]
004D6856 33D2 xor edx, edx
004D6858 8910 mov [eax], edx
004D685A 8BC1 mov eax, ecx
* Reference to: ScktComp.TCustomWinSocket.Close(TCustomWinSocket);
|
004D685C E89747FBFF call 0048AFF8
004D6861 5D pop ebp
004D6862 C20800 ret $0008
*)
end;
procedure TMainForm.ToolButton9Click(Sender : TObject);
begin
(*
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
004D6868 E887E4FAFF call 00484CF4
004D686D C3 ret
*)
end;
procedure TMainForm.FormCloseQuery(Sender : TObject);
begin
(*
004D6870 55 push ebp
004D6871 8BEC mov ebp, esp
004D6873 6A00 push $00
004D6875 53 push ebx
004D6876 56 push esi
004D6877 8BF1 mov esi, ecx
004D6879 8BD8 mov ebx, eax
004D687B 33C0 xor eax, eax
004D687D 55 push ebp
004D687E 68F6684D00 push $004D68F6
***** TRY
|
004D6883 64FF30 push dword ptr fs:[eax]
004D6886 648920 mov fs:[eax], esp
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D6889 8B8374030000 mov eax, [ebx+$0374]
* Reference to field TToolButton.Down : Boolean
|
004D688F 80B86A01000000 cmp byte ptr [eax+$016A], $00
004D6896 7445 jz 004D68DD
* Reference to control TMainForm.ServerSocket : TServerSocket
|
004D6898 8B833C030000 mov eax, [ebx+$033C]
* Reference to field TServerSocket.Socket : TServerWinSocket
|
004D689E 8B8090000000 mov eax, [eax+$0090]
* Reference to: ScktComp.TServerWinSocket.GetActiveConnections(TServerWinSocket):Integer;
|
004D68A4 E89F59FBFF call 0048C248
004D68A9 85C0 test eax, eax
004D68AB 7E30 jle 004D68DD
004D68AD 6821010000 push $00000121
004D68B2 8D55FC lea edx, [ebp-$04]
004D68B5 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004D68B7 E84812F9FF call 00467B04
004D68BC 8B45FC mov eax, [ebp-$04]
* Reference to: System.@LStrToPChar(String):PAnsiChar;
|
004D68BF E88CDEF2FF call 00404750
004D68C4 50 push eax
* Possible String Reference to: '主控机正在监控，退出主控机所有子机?
| ??ケ；ぃ?啡贤顺雎穑?
|
004D68C5 6804694D00 push $004D6904
004D68CA 8BC3 mov eax, ebx
* Reference to: QForms.TCustomForm.GetClientHandle(TCustomForm):QWorkspaceH;
|
004D68CC E8677BF9FF call 0046E438
004D68D1 50 push eax
|
004D68D2 E82109F3FF call 004071F8
004D68D7 48 dec eax
004D68D8 0F9406 setz byte ptr [esi]
004D68DB EB03 jmp 004D68E0
004D68DD C60601 mov byte ptr [esi], $01
004D68E0 33C0 xor eax, eax
004D68E2 5A pop edx
004D68E3 59 pop ecx
004D68E4 59 pop ecx
004D68E5 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[Y]?
|
004D68E8 68FD684D00 push $004D68FD
004D68ED 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D68F0 E89BD9F2FF call 00404290
004D68F5 C3 ret
* Reference to: System.@HandleFinally;
|
004D68F6 E915D3F2FF jmp 00403C10
004D68FB EBF0 jmp 004D68ED
****** END
|
004D68FD 5E pop esi
004D68FE 5B pop ebx
004D68FF 59 pop ecx
004D6900 5D pop ebp
004D6901 C3 ret
*)
end;
procedure TMainForm.ToolButton6Click(Sender : TObject);
begin
(*
004D6940 53 push ebx
004D6941 8BD8 mov ebx, eax
* Possible String Reference to: '上线'
|
004D6943 B868694D00 mov eax, $004D6968
|
004D6948 E85FEBFFFF call 004D54AC
004D694D 84C0 test al, al
004D694F 740D jz 004D695E
004D6951 6AFF push $FF
004D6953 33C9 xor ecx, ecx
004D6955 B208 mov dl, $08
004D6957 8BC3 mov eax, ebx
|
004D6959 E812000000 call 004D6970
004D695E 5B pop ebx
004D695F C3 ret
*)
end;
procedure TMainForm.ToolButton11Click(Sender : TObject);
begin
(*
004D69B0 53 push ebx
004D69B1 8BD8 mov ebx, eax
* Possible String Reference to: '更新挑战天堂'
|
004D69B3 B8D8694D00 mov eax, $004D69D8
|
004D69B8 E8EFEAFFFF call 004D54AC
004D69BD 84C0 test al, al
004D69BF 740D jz 004D69CE
004D69C1 6AFF push $FF
004D69C3 33C9 xor ecx, ecx
004D69C5 B20C mov dl, $0C
004D69C7 8BC3 mov eax, ebx
|
004D69C9 E8A2FFFFFF call 004D6970
004D69CE 5B pop ebx
004D69CF C3 ret
*)
end;
procedure TMainForm.ToolButton5Click(Sender : TObject);
begin
(*
004D69E8 53 push ebx
004D69E9 8BD8 mov ebx, eax
* Possible String Reference to: '关闭计算机'
|
004D69EB B8106A4D00 mov eax, $004D6A10
|
004D69F0 E8B7EAFFFF call 004D54AC
004D69F5 84C0 test al, al
004D69F7 740D jz 004D6A06
004D69F9 6AFF push $FF
004D69FB 33C9 xor ecx, ecx
004D69FD B20B mov dl, $0B
004D69FF 8BC3 mov eax, ebx
|
004D6A01 E86AFFFFFF call 004D6970
004D6A06 5B pop ebx
004D6A07 C3 ret
*)
end;
procedure TMainForm.ToolButton12Click(Sender : TObject);
begin
(*
* Reference to pointer to GlobalVar_004DCE60
|
004D6A1C 8B0D64B94D00 mov ecx, [$004DB964]
* Reference to TApplication instance
|
004D6A22 A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D6A27 8B00 mov eax, [eax]
* Reference to class TLanOpen
|
004D6A29 8B1518144D00 mov edx, [$004D1418]
* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
| or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
004D6A2F E8F819FBFF call 0048842C
* Reference to pointer to GlobalVar_004DCE60
|
004D6A34 A164B94D00 mov eax, dword ptr [$004DB964]
004D6A39 8B00 mov eax, [eax]
004D6A3B 8B10 mov edx, [eax]
* Possible reference to virtual method TGlobalVar_004DCE60.OFFS_00EC
|
004D6A3D FF92EC000000 call dword ptr [edx+$00EC]
* Reference to pointer to GlobalVar_004DCE60
|
004D6A43 A164B94D00 mov eax, dword ptr [$004DB964]
004D6A48 8B00 mov eax, [eax]
* Reference to: System.TObject.Free(TObject);
|
004D6A4A E82DCAF2FF call 0040347C
004D6A4F C3 ret
*)
end;
procedure TMainForm.ToolButton3Click(Sender : TObject);
begin
(*
004D6A50 53 push ebx
004D6A51 8BD8 mov ebx, eax
* Possible String Reference to: '回城'
|
004D6A53 B8786A4D00 mov eax, $004D6A78
|
004D6A58 E84FEAFFFF call 004D54AC
004D6A5D 84C0 test al, al
004D6A5F 740D jz 004D6A6E
004D6A61 6AFF push $FF
004D6A63 33C9 xor ecx, ecx
004D6A65 B20A mov dl, $0A
004D6A67 8BC3 mov eax, ebx
|
004D6A69 E802FFFFFF call 004D6970
004D6A6E 5B pop ebx
004D6A6F C3 ret
*)
end;
procedure TMainForm.ToolButton4Click(Sender : TObject);
begin
(*
004D6A80 53 push ebx
004D6A81 8BD8 mov ebx, eax
* Possible String Reference to: '强退'
|
004D6A83 B8A86A4D00 mov eax, $004D6AA8
|
004D6A88 E81FEAFFFF call 004D54AC
004D6A8D 84C0 test al, al
004D6A8F 740D jz 004D6A9E
004D6A91 6AFF push $FF
004D6A93 33C9 xor ecx, ecx
004D6A95 B209 mov dl, $09
004D6A97 8BC3 mov eax, ebx
|
004D6A99 E8D2FEFFFF call 004D6970
004D6A9E 5B pop ebx
004D6A9F C3 ret
*)
end;
procedure TMainForm.N27Click(Sender : TObject);
begin
(*
004D6B0C 53 push ebx
004D6B0D 8BD8 mov ebx, eax
004D6B0F 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D6B11 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D6B17 E8C885F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D6B1C E8634DF7FF call 0044B884
004D6B21 8BC8 mov ecx, eax
004D6B23 B208 mov dl, $08
004D6B25 8BC3 mov eax, ebx
|
004D6B27 E884FFFFFF call 004D6AB0
004D6B2C 5B pop ebx
004D6B2D C3 ret
*)
end;
procedure TMainForm.N29Click(Sender : TObject);
begin
(*
004D6B30 53 push ebx
004D6B31 8BD8 mov ebx, eax
004D6B33 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D6B35 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D6B3B E8A485F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D6B40 E83F4DF7FF call 0044B884
004D6B45 8BC8 mov ecx, eax
004D6B47 B20C mov dl, $0C
004D6B49 8BC3 mov eax, ebx
|
004D6B4B E860FFFFFF call 004D6AB0
004D6B50 5B pop ebx
004D6B51 C3 ret
*)
end;
procedure TMainForm.N14Click(Sender : TObject);
begin
(*
004D6B54 53 push ebx
004D6B55 8BD8 mov ebx, eax
004D6B57 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D6B59 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D6B5F E88085F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D6B64 E81B4DF7FF call 0044B884
004D6B69 8BC8 mov ecx, eax
004D6B6B B20A mov dl, $0A
004D6B6D 8BC3 mov eax, ebx
|
004D6B6F E83CFFFFFF call 004D6AB0
004D6B74 5B pop ebx
004D6B75 C3 ret
*)
end;
procedure TMainForm.N15Click(Sender : TObject);
begin
(*
004D6B78 53 push ebx
004D6B79 8BD8 mov ebx, eax
004D6B7B 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D6B7D 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D6B83 E85C85F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D6B88 E8F74CF7FF call 0044B884
004D6B8D 8BC8 mov ecx, eax
004D6B8F B209 mov dl, $09
004D6B91 8BC3 mov eax, ebx
|
004D6B93 E818FFFFFF call 004D6AB0
004D6B98 5B pop ebx
004D6B99 C3 ret
*)
end;
procedure TMainForm.N31Click(Sender : TObject);
begin
(*
004D6B9C 53 push ebx
004D6B9D 8BD8 mov ebx, eax
004D6B9F 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D6BA1 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D6BA7 E83885F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D6BAC E8D34CF7FF call 0044B884
004D6BB1 8BC8 mov ecx, eax
004D6BB3 B20B mov dl, $0B
004D6BB5 8BC3 mov eax, ebx
|
004D6BB7 E8F4FEFFFF call 004D6AB0
004D6BBC 5B pop ebx
004D6BBD C3 ret
*)
end;
procedure TMainForm.ClientSocketConnect(Sender : TObject);
begin
(*
004D6BC0 55 push ebp
004D6BC1 8BEC mov ebp, esp
004D6BC3 83C4E4 add esp, -$1C
004D6BC6 53 push ebx
004D6BC7 56 push esi
004D6BC8 57 push edi
004D6BC9 33DB xor ebx, ebx
004D6BCB 895DE8 mov [ebp-$18], ebx
004D6BCE 895DE4 mov [ebp-$1C], ebx
004D6BD1 895DEC mov [ebp-$14], ebx
004D6BD4 8BF1 mov esi, ecx
004D6BD6 8BD8 mov ebx, eax
004D6BD8 33C0 xor eax, eax
004D6BDA 55 push ebp
* Possible String Reference to: '楱悟?噙^[?]?
|
004D6BDB 68636D4D00 push $004D6D63
***** TRY
|
004D6BE0 64FF30 push dword ptr fs:[eax]
004D6BE3 648920 mov fs:[eax], esp
* Possible String Reference to: '服务器已联接'
|
004D6BE6 BA7C6D4D00 mov edx, $004D6D7C
004D6BEB 8BC3 mov eax, ebx
|
004D6BED E8D2010000 call 004D6DC4
* Reference to control TMainForm.LinkSvrBtn : TToolButton
|
004D6BF2 8B8394030000 mov eax, [ebx+$0394]
004D6BF8 33D2 xor edx, edx
004D6BFA 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D6BFC FF5164 call dword ptr [ecx+$64]
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D6BFF 8B8374030000 mov eax, [ebx+$0374]
004D6C05 B201 mov dl, $01
004D6C07 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D6C09 FF5164 call dword ptr [ecx+$64]
004D6C0C C745F001000000 mov dword ptr [ebp-$10], $00000001
004D6C13 C745F4983A0000 mov dword ptr [ebp-$0C], $00003A98
004D6C1A C745F801000000 mov dword ptr [ebp-$08], $00000001
004D6C21 6A00 push $00
004D6C23 6A00 push $00
004D6C25 8D45FC lea eax, [ebp-$04]
004D6C28 50 push eax
004D6C29 6A00 push $00
004D6C2B 6A00 push $00
004D6C2D 6A0C push $0C
004D6C2F 8D45F0 lea eax, [ebp-$10]
004D6C32 50 push eax
004D6C33 6804000098 push $98000004
004D6C38 8B4604 mov eax, [esi+$04]
004D6C3B 50 push eax
* Reference to: <.WSAIoctl()
|
004D6C3C E8832DFBFF call 004899C4
004D6C41 33C0 xor eax, eax
004D6C43 55 push ebp
004D6C44 68336D4D00 push $004D6D33
***** TRY
|
004D6C49 64FF30 push dword ptr fs:[eax]
004D6C4C 648920 mov fs:[eax], esp
* Reference to TLoginForm instance
|
004D6C4F A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6C54 8B00 mov eax, [eax]
* Reference to control TLoginForm.AutoJK : TCheckBox
|
004D6C56 8B8020030000 mov eax, [eax+$0320]
004D6C5C 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D6C5E FF92C8000000 call dword ptr [edx+$00C8]
004D6C64 8BD0 mov edx, eax
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D6C66 8B8374030000 mov eax, [ebx+$0374]
* Reference to: ComCtrls.TToolButton.SetDown(TToolButton;Boolean);
|
004D6C6C E8CF9FF7FF call 00450C40
004D6C71 8D55EC lea edx, [ebp-$14]
* Reference to TLoginForm instance
|
004D6C74 A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6C79 8B00 mov eax, [eax]
* Reference to control TLoginForm.Edit1 : TEdit
|
004D6C7B 8B8004030000 mov eax, [eax+$0304]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004D6C81 E87E0EF9FF call 00467B04
004D6C86 8B45EC mov eax, [ebp-$14]
004D6C89 50 push eax
* Possible String Reference to: 'ID'
|
004D6C8A B9946D4D00 mov ecx, $004D6D94
* Possible String Reference to: 'Setup'
|
004D6C8F BAA06D4D00 mov edx, $004D6DA0
004D6C94 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D6C99 8B18 mov ebx, [eax]
004D6C9B FF5304 call dword ptr [ebx+$04]
* Reference to TLoginForm instance
|
004D6C9E A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6CA3 8B00 mov eax, [eax]
* Reference to control TLoginForm.SavePW : TCheckBox
|
004D6CA5 8B801C030000 mov eax, [eax+$031C]
004D6CAB 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D6CAD FF92C8000000 call dword ptr [edx+$00C8]
004D6CB3 84C0 test al, al
004D6CB5 743C jz 004D6CF3
004D6CB7 8D55E4 lea edx, [ebp-$1C]
* Reference to TLoginForm instance
|
004D6CBA A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6CBF 8B00 mov eax, [eax]
* Reference to control TLoginForm.Edit2 : TEdit
|
004D6CC1 8B8008030000 mov eax, [eax+$0308]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004D6CC7 E8380EF9FF call 00467B04
004D6CCC 8B45E4 mov eax, [ebp-$1C]
004D6CCF 8D4DE8 lea ecx, [ebp-$18]
004D6CD2 33D2 xor edx, edx
|
004D6CD4 E80FE6FFFF call 004D52E8
004D6CD9 8B45E8 mov eax, [ebp-$18]
004D6CDC 50 push eax
* Possible String Reference to: 'PW'
|
004D6CDD B9B06D4D00 mov ecx, $004D6DB0
* Possible String Reference to: 'Setup'
|
004D6CE2 BAA06D4D00 mov edx, $004D6DA0
004D6CE7 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D6CEC 8B18 mov ebx, [eax]
004D6CEE FF5304 call dword ptr [ebx+$04]
004D6CF1 EB14 jmp 004D6D07
* Possible String Reference to: 'PW'
|
004D6CF3 B9B06D4D00 mov ecx, $004D6DB0
* Possible String Reference to: 'Setup'
|
004D6CF8 BAA06D4D00 mov edx, $004D6DA0
004D6CFD A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D6D02 8B18 mov ebx, [eax]
004D6D04 FF5350 call dword ptr [ebx+$50]
004D6D07 6A01 push $01
* Possible String Reference to: 'Setuped'
|
004D6D09 B9BC6D4D00 mov ecx, $004D6DBC
* Possible String Reference to: 'Setup'
|
004D6D0E BAA06D4D00 mov edx, $004D6DA0
004D6D13 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D6D18 8B18 mov ebx, [eax]
004D6D1A FF5314 call dword ptr [ebx+$14]
* Reference to TLoginForm instance
|
004D6D1D A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6D22 8B00 mov eax, [eax]
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
004D6D24 E8CBDFFAFF call 00484CF4
004D6D29 33C0 xor eax, eax
004D6D2B 5A pop edx
004D6D2C 59 pop ecx
004D6D2D 59 pop ecx
004D6D2E 648910 mov fs:[eax], edx
004D6D31 EB0A jmp 004D6D3D
* Reference to: System.@HandleAnyException;
|
004D6D33 E924CCF2FF jmp 0040395C
* Reference to: System.@DoneExcept;
|
004D6D38 E887CFF2FF call 00403CC4
****** END
|
004D6D3D 33C0 xor eax, eax
004D6D3F 5A pop edx
004D6D40 59 pop ecx
004D6D41 59 pop ecx
004D6D42 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '_^[?]?
|
004D6D45 686A6D4D00 push $004D6D6A
004D6D4A 8D45E4 lea eax, [ebp-$1C]
* Reference to: System.@LStrClr(void;void);
|
004D6D4D E83ED5F2FF call 00404290
004D6D52 8D45E8 lea eax, [ebp-$18]
* Reference to: System.@LStrClr(void;void);
|
004D6D55 E836D5F2FF call 00404290
004D6D5A 8D45EC lea eax, [ebp-$14]
* Reference to: System.@LStrClr(void;void);
|
004D6D5D E82ED5F2FF call 00404290
004D6D62 C3 ret
* Reference to: System.@HandleFinally;
|
004D6D63 E9A8CEF2FF jmp 00403C10
004D6D68 EBE0 jmp 004D6D4A
****** END
|
004D6D6A 5F pop edi
004D6D6B 5E pop esi
004D6D6C 5B pop ebx
004D6D6D 8BE5 mov esp, ebp
004D6D6F 5D pop ebp
004D6D70 C3 ret
*)
end;
procedure TMainForm.ClientSocketConnecting(Sender : TObject);
begin
(*
004D6E24 53 push ebx
004D6E25 8BD8 mov ebx, eax
* Possible String Reference to: '正在联接服务器...'
|
004D6E27 BA4C6E4D00 mov edx, $004D6E4C
004D6E2C 8BC3 mov eax, ebx
|
004D6E2E E891FFFFFF call 004D6DC4
004D6E33 33D2 xor edx, edx
* Reference to control TMainForm.LinkSvrBtn : TToolButton
|
004D6E35 8B8394030000 mov eax, [ebx+$0394]
004D6E3B 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D6E3D FF5164 call dword ptr [ecx+$64]
004D6E40 5B pop ebx
004D6E41 C3 ret
*)
end;
procedure TMainForm.ClientSocketDisconnect(Sender : TObject);
begin
(*
004D6E60 53 push ebx
004D6E61 8BD8 mov ebx, eax
* Possible String Reference to: '服务器断开'
|
004D6E63 BAB86E4D00 mov edx, $004D6EB8
004D6E68 8BC3 mov eax, ebx
|
004D6E6A E855FFFFFF call 004D6DC4
004D6E6F B201 mov dl, $01
* Reference to control TMainForm.LinkSvrBtn : TToolButton
|
004D6E71 8B8394030000 mov eax, [ebx+$0394]
004D6E77 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D6E79 FF5164 call dword ptr [ecx+$64]
004D6E7C 33D2 xor edx, edx
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D6E7E 8B8374030000 mov eax, [ebx+$0374]
004D6E84 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D6E86 FF5164 call dword ptr [ecx+$64]
004D6E89 33D2 xor edx, edx
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D6E8B 8B8374030000 mov eax, [ebx+$0374]
* Reference to: ComCtrls.TToolButton.SetDown(TToolButton;Boolean);
|
004D6E91 E8AA9DF7FF call 00450C40
004D6E96 BA080000FF mov edx, $FF000008
* Possible String Reference to: '已与服务器失去联系'
|
004D6E9B B8CC6E4D00 mov eax, $004D6ECC
|
004D6EA0 E82BE5FFFF call 004D53D0
004D6EA5 C605BCD44D0001 mov byte ptr [$004DD4BC], $01
004D6EAC 5B pop ebx
004D6EAD C3 ret
*)
end;
procedure TMainForm.ClientSocketError(Sender : TObject);
begin
(*
004D6EE0 55 push ebp
004D6EE1 8BEC mov ebp, esp
004D6EE3 8B4508 mov eax, [ebp+$08]
004D6EE6 33D2 xor edx, edx
004D6EE8 8910 mov [eax], edx
004D6EEA 5D pop ebp
004D6EEB C20800 ret $0008
*)
end;
procedure TMainForm.ToolButton10Click(Sender : TObject);
begin
(*
004D6EF0 53 push ebx
004D6EF1 8BD8 mov ebx, eax
* Possible String Reference to: '更新天堂游戏'
|
004D6EF3 B8186F4D00 mov eax, $004D6F18
|
004D6EF8 E8AFE5FFFF call 004D54AC
004D6EFD 84C0 test al, al
004D6EFF 740D jz 004D6F0E
004D6F01 6AFF push $FF
004D6F03 33C9 xor ecx, ecx
004D6F05 B20D mov dl, $0D
004D6F07 8BC3 mov eax, ebx
|
004D6F09 E862FAFFFF call 004D6970
004D6F0E 5B pop ebx
004D6F0F C3 ret
*)
end;
procedure TMainForm.LinkSvrBtnClick(Sender : TObject);
begin
(*
004D6F28 53 push ebx
004D6F29 8BD8 mov ebx, eax
* Reference to control TMainForm.ClientSocket : TClientSocket
|
004D6F2B 8B8390030000 mov eax, [ebx+$0390]
* Reference to field TClientSocket.Active : Boolean
|
004D6F31 80783000 cmp byte ptr [eax+$30], $00
004D6F35 754D jnz 004D6F84
* Reference to TLoginForm instance
|
004D6F37 8B0DB4BC4D00 mov ecx, [$004DBCB4]
* Reference to TApplication instance
|
004D6F3D A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D6F42 8B00 mov eax, [eax]
* Reference to class TLoginForm
|
004D6F44 8B1540394D00 mov edx, [$004D3940]
* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
| or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
004D6F4A E8DD14FBFF call 0048842C
* Reference to TLoginForm instance
|
004D6F4F A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6F54 8B00 mov eax, [eax]
004D6F56 8B10 mov edx, [eax]
* Reference to method TLoginForm.ShowModal()
|
004D6F58 FF92EC000000 call dword ptr [edx+$00EC]
* Reference to control TMainForm.ClientSocket : TClientSocket
|
004D6F5E 8B8390030000 mov eax, [ebx+$0390]
* Reference to field TClientSocket.Active : Boolean
|
004D6F64 80783000 cmp byte ptr [eax+$30], $00
004D6F68 751A jnz 004D6F84
004D6F6A B201 mov dl, $01
* Reference to control TMainForm.LinkSpr : TToolButton
|
004D6F6C 8B8398030000 mov eax, [ebx+$0398]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
004D6F72 E8AD0AF9FF call 00467A24
004D6F77 B201 mov dl, $01
* Reference to control TMainForm.LinkSvrBtn : TToolButton
|
004D6F79 8B8394030000 mov eax, [ebx+$0394]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
004D6F7F E8A00AF9FF call 00467A24
004D6F84 5B pop ebx
004D6F85 C3 ret
*)
end;
procedure TMainForm.FormActivate(Sender : TObject);
begin
(*
004D6F88 56 push esi
004D6F89 803DA2D44D0000 cmp byte ptr [$004DD4A2], $00
004D6F90 750F jnz 004D6FA1
* Reference to control TMainForm.LinkSvrBtn : TToolButton
|
004D6F92 8B8094030000 mov eax, [eax+$0394]
004D6F98 66BEEBFF mov si, $FFEB
* Reference to: System.@CallDynaInst;
|
004D6F9C E8D7C6F2FF call 00403678
004D6FA1 C605A2D44D0001 mov byte ptr [$004DD4A2], $01
004D6FA8 5E pop esi
004D6FA9 C3 ret
*)
end;
procedure TMainForm.ClientSocketRead(Sender : TObject);
begin
(*
004D6FAC 53 push ebx
004D6FAD 56 push esi
004D6FAE 57 push edi
004D6FAF 55 push ebp
004D6FB0 8BF9 mov edi, ecx
004D6FB2 8BF0 mov esi, eax
004D6FB4 8BC7 mov eax, edi
* Reference to: ComCtrls.THeaderSections.Add(THeaderSections):THeaderSection;
| or: ComCtrls.TListItems.Add(TListItems):TListItem;
| or: ScktComp.TCustomWinSocket.ReceiveLength(TCustomWinSocket):Integer;
|
004D6FB6 E8B14CFBFF call 0048BC6C
004D6FBB 8BD8 mov ebx, eax
004D6FBD 8BC3 mov eax, ebx
* Reference to: SysUtils.AllocMem(Cardinal):Pointer;
|
004D6FBF E8CC16F3FF call 00408690
004D6FC4 8BE8 mov ebp, eax
004D6FC6 8BD5 mov edx, ebp
004D6FC8 8BCB mov ecx, ebx
004D6FCA 8BC7 mov eax, edi
* Reference to: ScktComp.TCustomWinSocket.ReceiveBuf(TCustomWinSocket;void;void;Integer):Integer;
|
004D6FCC E82F4BFBFF call 0048BB00
004D6FD1 8BDD mov ebx, ebp
004D6FD3 66813B5A5A cmp word ptr [ebx], $5A5A
004D6FD8 0F858D000000 jnz 004D706B
* Reference to control TMainForm.SBar : TStatusBar
|
004D6FDE 8B8638030000 mov eax, [esi+$0338]
* Reference to field TStatusBar.Panels : TStatusPanels
|
004D6FE4 8B8008020000 mov eax, [eax+$0208]
004D6FEA BA02000000 mov edx, $00000002
* Reference to: ComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel;
| or: QComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel;
|
004D6FEF E88C29F7FF call 00449980
* Possible String Reference to: '已收到服务器统计的封号信息...'
|
004D6FF4 BAE0704D00 mov edx, $004D70E0
* Reference to: ComCtrls.TStatusPanel.SetText(TStatusPanel;AnsiString);
| or: ComCtrls.THeaderSection.SetText(THeaderSection;AnsiString);
|
004D6FF9 E8DE28F7FF call 004498DC
004D6FFE B201 mov dl, $01
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D7000 8B8674030000 mov eax, [esi+$0374]
004D7006 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D7008 FF5164 call dword ptr [ecx+$64]
004D700B 56 push esi
004D700C 8BF3 mov esi, ebx
004D700E BF28CF4D00 mov edi, $004DCF28
004D7013 B919010000 mov ecx, $00000119
004D7018 F3 rep
004D7019 A5 movsd
004D701A 66A5 movsw
004D701C A4 movsb
004D701D 5E pop esi
004D701E 8B86F4030000 mov eax, [esi+$03F4]
004D7024 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TTreeNodes.BeginUpdate(TTreeNodes);
| or: ComCtrls.TListItems.BeginUpdate(TListItems);
|
004D702A E8F14AF7FF call 0044BB20
004D702F 8B86F4030000 mov eax, [esi+$03F4]
004D7035 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TTreeNodes.GetCount(TTreeNodes):Integer;
| or: ComCtrls.TListItems.GetCount(TListItems):Integer;
|
004D703B E8CC49F7FF call 0044BA0C
004D7040 8BF8 mov edi, eax
004D7042 4F dec edi
004D7043 85FF test edi, edi
004D7045 7C11 jl 004D7058
004D7047 47 inc edi
004D7048 33DB xor ebx, ebx
004D704A 8D5301 lea edx, [ebx+$01]
004D704D 8BC6 mov eax, esi
* Reference to : TMainForm._PROC_004D77C4()
|
004D704F E870070000 call 004D77C4
004D7054 43 inc ebx
004D7055 4F dec edi
004D7056 75F2 jnz 004D704A
004D7058 8B86F4030000 mov eax, [esi+$03F4]
004D705E 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TTreeNodes.EndUpdate(TTreeNodes);
| or: ComCtrls.TListItems.EndUpdate(TListItems);
|
004D7064 E8934CF7FF call 0044BCFC
004D7069 EB60 jmp 004D70CB
004D706B 8A4302 mov al, byte ptr [ebx+$02]
004D706E 2C06 sub al, $06
004D7070 7559 jnz 004D70CB
004D7072 8D4B04 lea ecx, [ebx+$04]
004D7075 8A5303 mov dl, byte ptr [ebx+$03]
004D7078 8BC6 mov eax, esi
|
004D707A E8110D0000 call 004D7D90
004D707F 33C0 xor eax, eax
004D7081 8A4303 mov al, byte ptr [ebx+$03]
004D7084 8D0480 lea eax, [eax+eax*4]
004D7087 8D0480 lea eax, [eax+eax*4]
004D708A 56 push esi
004D708B 8D7304 lea esi, [ebx+$04]
004D708E 8DB811CF4D00 lea edi, [eax+$4DCF11]
004D7094 B906000000 mov ecx, $00000006
004D7099 F3 rep
004D709A A5 movsd
004D709B A4 movsb
004D709C 5E pop esi
004D709D 8B86F4030000 mov eax, [esi+$03F4]
004D70A3 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TTreeNodes.BeginUpdate(TTreeNodes);
| or: ComCtrls.TListItems.BeginUpdate(TListItems);
|
004D70A9 E8724AF7FF call 0044BB20
004D70AE 33D2 xor edx, edx
004D70B0 8A5303 mov dl, byte ptr [ebx+$03]
004D70B3 8BC6 mov eax, esi
* Reference to : TMainForm._PROC_004D77C4()
|
004D70B5 E80A070000 call 004D77C4
004D70BA 8B86F4030000 mov eax, [esi+$03F4]
004D70C0 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TTreeNodes.EndUpdate(TTreeNodes);
| or: ComCtrls.TListItems.EndUpdate(TListItems);
|
004D70C6 E8314CF7FF call 0044BCFC
004D70CB 8BC5 mov eax, ebp
* Reference to: System.@FreeMem(Pointer):Integer;
|
004D70CD E8D6B6F2FF call 004027A8
004D70D2 5D pop ebp
004D70D3 5F pop edi
004D70D4 5E pop esi
004D70D5 5B pop ebx
004D70D6 C3 ret
*)
end;
procedure TMainForm.PopupMenu1Popup(Sender : TObject);
begin
(*
004D7100 53 push ebx
004D7101 56 push esi
004D7102 57 push edi
004D7103 55 push ebp
004D7104 8BF8 mov edi, eax
004D7106 8B8704030000 mov eax, [edi+$0304]
* Reference to field TMainForm.OFFS_0034
|
004D710C 8B4034 mov eax, [eax+$34]
* Reference to: Menus.TMenuItem.GetCount(TMenuItem):Integer;
|
004D710F E8102CFAFF call 00479D24
004D7114 8BF0 mov esi, eax
004D7116 4E dec esi
004D7117 85F6 test esi, esi
004D7119 7C36 jl 004D7151
004D711B 46 inc esi
004D711C 33ED xor ebp, ebp
004D711E 8B8704030000 mov eax, [edi+$0304]
004D7124 8B4034 mov eax, [eax+$34]
004D7127 8BD5 mov edx, ebp
* Reference to: Menus.TMenuItem.GetItem(TMenuItem;Integer):TMenuItem;
|
004D7129 E8062CFAFF call 00479D34
004D712E 8BD8 mov ebx, eax
004D7130 837B0C01 cmp dword ptr [ebx+$0C], +$01
004D7134 7517 jnz 004D714D
004D7136 8B87F4030000 mov eax, [edi+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D713C E8A37FF7FF call 0044F0E4
004D7141 85C0 test eax, eax
004D7143 0F95C2 setnz dl
004D7146 8BC3 mov eax, ebx
* Reference to: Menus.TMenuItem.SetEnabled(TMenuItem;Boolean);
|
004D7148 E8032BFAFF call 00479C50
004D714D 45 inc ebp
004D714E 4E dec esi
004D714F 75CD jnz 004D711E
004D7151 5D pop ebp
004D7152 5F pop edi
004D7153 5E pop esi
004D7154 5B pop ebx
004D7155 C3 ret
*)
end;
procedure TMainForm.VBtnClick(Sender : TObject);
begin
(*
004D7158 56 push esi
004D7159 57 push edi
004D715A 8BF0 mov esi, eax
* Reference to control TMainForm.IDList : TListView
|
004D715C 8BBE44040000 mov edi, [esi+$0444]
004D7162 80BF1502000000 cmp byte ptr [edi+$0215], $00
004D7169 7529 jnz 004D7194
004D716B B203 mov dl, $03
004D716D 8BC7 mov eax, edi
004D716F 8B08 mov ecx, [eax]
* Reference to method TListView.ViewStyle()
|
004D7171 FF9128010000 call dword ptr [ecx+$0128]
004D7177 B201 mov dl, $01
* Reference to control TMainForm.VBtn2 : TToolButton
|
004D7179 8B863C040000 mov eax, [esi+$043C]
* Reference to: ComCtrls.TToolButton.SetDown(TToolButton;Boolean);
|
004D717F E8BC9AF7FF call 00450C40
004D7184 B201 mov dl, $01
* Reference to control TMainForm.VPop2 : TMenuItem
|
004D7186 8B8620030000 mov eax, [esi+$0320]
* Reference to: Menus.TMenuItem.SetChecked(TMenuItem;Boolean);
|
004D718C E86B2AFAFF call 00479BFC
004D7191 5F pop edi
004D7192 5E pop esi
004D7193 C3 ret
004D7194 33D2 xor edx, edx
004D7196 8BC7 mov eax, edi
004D7198 8B08 mov ecx, [eax]
004D719A FF9128010000 call dword ptr [ecx+$0128]
004D71A0 B201 mov dl, $01
004D71A2 8B8638040000 mov eax, [esi+$0438]
* Reference to: ComCtrls.TToolButton.SetDown(TToolButton;Boolean);
|
004D71A8 E8939AF7FF call 00450C40
004D71AD B201 mov dl, $01
004D71AF 8B861C030000 mov eax, [esi+$031C]
* Reference to: Menus.TMenuItem.SetChecked(TMenuItem;Boolean);
|
004D71B5 E8422AFAFF call 00479BFC
004D71BA 5F pop edi
004D71BB 5E pop esi
004D71BC C3 ret
*)
end;
procedure TMainForm.IDListDblClick(Sender : TObject);
begin
(*
004D71C0 53 push ebx
004D71C1 8BD8 mov ebx, eax
* Reference to control TMainForm.IDList : TListView
|
004D71C3 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D71C9 E8167FF7FF call 0044F0E4
004D71CE 85C0 test eax, eax
004D71D0 743E jz 004D7210
* Reference to control TMainForm.ScrPanel : TPanel
|
004D71D2 8B83DC030000 mov eax, [ebx+$03DC]
* Reference to: Controls.TControl.Show(TControl);
|
004D71D8 E8570EF9FF call 00468034
* Reference to control TMainForm.ScrPanel : TPanel
|
004D71DD 8B83DC030000 mov eax, [ebx+$03DC]
* Reference to: Controls.TControl.BringToFront(TControl);
|
004D71E3 E87C0BF9FF call 00467D64
* Reference to control TMainForm.IDList : TListView
|
004D71E8 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D71EE E8F17EF7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D71F3 E88C46F7FF call 0044B884
004D71F8 8BD0 mov edx, eax
004D71FA 42 inc edx
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D71FB 8B83A0030000 mov eax, [ebx+$03A0]
004D7201 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_01A0
|
004D7203 FF91A0010000 call dword ptr [ecx+$01A0]
004D7209 C605A8D44D0000 mov byte ptr [$004DD4A8], $00
004D7210 5B pop ebx
004D7211 C3 ret
*)
end;
procedure TMainForm.SpeedButton1Click(Sender : TObject);
begin
(*
004D73F4 55 push ebp
004D73F5 8BEC mov ebp, esp
004D73F7 33C9 xor ecx, ecx
004D73F9 51 push ecx
004D73FA 51 push ecx
004D73FB 51 push ecx
004D73FC 51 push ecx
004D73FD 51 push ecx
004D73FE 53 push ebx
004D73FF 56 push esi
004D7400 8BD8 mov ebx, eax
004D7402 33C0 xor eax, eax
004D7404 55 push ebp
* Possible String Reference to: '?球?柁[?]?
|
004D7405 68CD744D00 push $004D74CD
***** TRY
|
004D740A 64FF30 push dword ptr fs:[eax]
004D740D 648920 mov fs:[eax], esp
004D7410 A0DC744D00 mov al, byte ptr [$004D74DC]
004D7415 50 push eax
004D7416 8D55EC lea edx, [ebp-$14]
* Reference to control TMainForm.LocaIDEdit : TEdit
|
004D7419 8B83D0030000 mov eax, [ebx+$03D0]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004D741F E8E006F9FF call 00467B04
004D7424 8B55EC mov edx, [ebp-$14]
004D7427 8D45F0 lea eax, [ebp-$10]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
004D742A E841D9F3FF call 00414D70
004D742F 8D4DF0 lea ecx, [ebp-$10]
* Possible String Reference to: 'GameID'
|
004D7432 BAE8744D00 mov edx, $004D74E8
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D7437 8B83A0030000 mov eax, [ebx+$03A0]
004D743D 8B30 mov esi, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0244
|
004D743F FF9644020000 call dword ptr [esi+$0244]
004D7445 84C0 test al, al
004D7447 7458 jz 004D74A1
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D7449 8B83A0030000 mov eax, [ebx+$03A0]
004D744F 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0150
|
004D7451 FF9250010000 call dword ptr [edx+$0150]
004D7457 8BD0 mov edx, eax
004D7459 4A dec edx
* Reference to control TMainForm.IDList : TListView
|
004D745A 8B8344040000 mov eax, [ebx+$0444]
004D7460 8B08 mov ecx, [eax]
* Possible reference to virtual method TListView.OFFS_00D0
|
004D7462 FF91D0000000 call dword ptr [ecx+$00D0]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D7468 8B83A0030000 mov eax, [ebx+$03A0]
004D746E 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0150
|
004D7470 FF9250010000 call dword ptr [edx+$0150]
004D7476 8BD0 mov edx, eax
004D7478 4A dec edx
* Reference to control TMainForm.IDList : TListView
|
004D7479 8B8344040000 mov eax, [ebx+$0444]
* Reference to field TListView.Items : TListItems
|
004D747F 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
004D7485 E8B245F7FF call 0044BA3C
004D748A B201 mov dl, $01
* Reference to: ComCtrls.TListItem.MakeVisible(TListItem;Boolean);
|
004D748C E8EF3EF7FF call 0044B380
* Reference to control TMainForm.IDList : TListView
|
004D7491 8B8344040000 mov eax, [ebx+$0444]
004D7497 8B10 mov edx, [eax]
* Reference to method TListView.SetFocus()
|
004D7499 FF92C4000000 call dword ptr [edx+$00C4]
004D749F EB0E jmp 004D74AF
* Reference to control TMainForm.LocaIDEdit : TEdit
|
004D74A1 8B83D0030000 mov eax, [ebx+$03D0]
004D74A7 8B10 mov edx, [eax]
* Reference to method TEdit.SetFocus()
|
004D74A9 FF92C4000000 call dword ptr [edx+$00C4]
004D74AF 33C0 xor eax, eax
004D74B1 5A pop edx
004D74B2 59 pop ecx
004D74B3 59 pop ecx
004D74B4 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[?]?
|
004D74B7 68D4744D00 push $004D74D4
004D74BC 8D45EC lea eax, [ebp-$14]
* Reference to: System.@LStrClr(void;void);
|
004D74BF E8CCCDF2FF call 00404290
004D74C4 8D45F0 lea eax, [ebp-$10]
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
004D74C7 E87C92F3FF call 00410748
004D74CC C3 ret
* Reference to: System.@HandleFinally;
|
004D74CD E93EC7F2FF jmp 00403C10
004D74D2 EBE8 jmp 004D74BC
****** END
|
004D74D4 5E pop esi
004D74D5 5B pop ebx
004D74D6 8BE5 mov esp, ebp
004D74D8 5D pop ebp
004D74D9 C3 ret
*)
end;
procedure TMainForm.ToolButton15Click(Sender : TObject);
begin
(*
* Reference to control TMainForm.ScrPanel : TPanel
|
004D74F0 8B80DC030000 mov eax, [eax+$03DC]
* Reference to: Controls.TWinControl.Realign(TWinControl);
|
004D74F6 E8310BF9FF call 0046802C
004D74FB C3 ret
*)
end;
procedure TMainForm.N28Click(Sender : TObject);
begin
(*
004D752C 53 push ebx
004D752D 8BD8 mov ebx, eax
004D752F 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D7531 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7537 E8A87BF7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D753C E84343F7FF call 0044B884
004D7541 8BC8 mov ecx, eax
004D7543 B20D mov dl, $0D
004D7545 8BC3 mov eax, ebx
|
004D7547 E864F5FFFF call 004D6AB0
004D754C 5B pop ebx
004D754D C3 ret
*)
end;
procedure TMainForm.PopupMenu2Popup(Sender : TObject);
begin
(*
004D7550 53 push ebx
004D7551 56 push esi
004D7552 57 push edi
004D7553 55 push ebp
004D7554 8BF8 mov edi, eax
004D7556 8B8714030000 mov eax, [edi+$0314]
* Reference to field TMainForm.OFFS_0034
|
004D755C 8B4034 mov eax, [eax+$34]
* Reference to: Menus.TMenuItem.GetCount(TMenuItem):Integer;
|
004D755F E8C027FAFF call 00479D24
004D7564 8BF0 mov esi, eax
004D7566 4E dec esi
004D7567 85F6 test esi, esi
004D7569 7C36 jl 004D75A1
004D756B 46 inc esi
004D756C 33ED xor ebp, ebp
004D756E 8B8714030000 mov eax, [edi+$0314]
004D7574 8B4034 mov eax, [eax+$34]
004D7577 8BD5 mov edx, ebp
* Reference to: Menus.TMenuItem.GetItem(TMenuItem;Integer):TMenuItem;
|
004D7579 E8B627FAFF call 00479D34
004D757E 8BD8 mov ebx, eax
004D7580 837B0C01 cmp dword ptr [ebx+$0C], +$01
004D7584 7517 jnz 004D759D
004D7586 8B8744040000 mov eax, [edi+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D758C E8537BF7FF call 0044F0E4
004D7591 85C0 test eax, eax
004D7593 0F95C2 setnz dl
004D7596 8BC3 mov eax, ebx
* Reference to: Menus.TMenuItem.SetEnabled(TMenuItem;Boolean);
|
004D7598 E8B326FAFF call 00479C50
004D759D 45 inc ebp
004D759E 4E dec esi
004D759F 75CD jnz 004D756E
004D75A1 5D pop ebp
004D75A2 5F pop edi
004D75A3 5E pop esi
004D75A4 5B pop ebx
004D75A5 C3 ret
*)
end;
procedure TMainForm.AutoCheckClick(Sender : TObject);
begin
(*
004D75A8 53 push ebx
004D75A9 8BD8 mov ebx, eax
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D75AB 8B8374030000 mov eax, [ebx+$0374]
* Reference to field TToolButton.Down : Boolean
|
004D75B1 80B86A01000000 cmp byte ptr [eax+$016A], $00
004D75B8 0F8499000000 jz 004D7657
* Reference to TOptionForm instance
|
004D75BE A1C0BD4D00 mov eax, dword ptr [$004DBDC0]
004D75C3 8B00 mov eax, [eax]
004D75C5 8B10 mov edx, [eax]
* Reference to method TOptionForm.ShowModal()
|
004D75C7 FF92EC000000 call dword ptr [edx+$00EC]
004D75CD 48 dec eax
004D75CE 740D jz 004D75DD
004D75D0 33D2 xor edx, edx
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D75D2 8B8374030000 mov eax, [ebx+$0374]
* Reference to: ComCtrls.TToolButton.SetDown(TToolButton;Boolean);
|
004D75D8 E86396F7FF call 00450C40
* Reference to TOptionForm instance
|
004D75DD A1C0BD4D00 mov eax, dword ptr [$004DBDC0]
004D75E2 8B00 mov eax, [eax]
* Reference to control TOptionForm.GMROOMRadio : TRadioGroup
|
004D75E4 8B80F8020000 mov eax, [eax+$02F8]
* Reference to field TRadioGroup.ItemIndex : Integer
|
004D75EA 8B8018020000 mov eax, [eax+$0218]
004D75F0 50 push eax
* Possible String Reference to: 'GmRoomRadio'
|
004D75F1 B964764D00 mov ecx, $004D7664
* Possible String Reference to: 'Setup'
|
004D75F6 BA78764D00 mov edx, $004D7678
004D75FB A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D7600 8B18 mov ebx, [eax]
004D7602 FF530C call dword ptr [ebx+$0C]
* Reference to TOptionForm instance
|
004D7605 A1C0BD4D00 mov eax, dword ptr [$004DBDC0]
004D760A 8B00 mov eax, [eax]
* Reference to control TOptionForm.SeeGMRadio : TRadioGroup
|
004D760C 8B8004030000 mov eax, [eax+$0304]
* Reference to field TRadioGroup.ItemIndex : Integer
|
004D7612 8B8018020000 mov eax, [eax+$0218]
004D7618 50 push eax
* Possible String Reference to: 'SeeGMRadio'
|
004D7619 B988764D00 mov ecx, $004D7688
* Possible String Reference to: 'Setup'
|
004D761E BA78764D00 mov edx, $004D7678
004D7623 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D7628 8B18 mov ebx, [eax]
004D762A FF530C call dword ptr [ebx+$0C]
* Reference to TOptionForm instance
|
004D762D A1C0BD4D00 mov eax, dword ptr [$004DBDC0]
004D7632 8B00 mov eax, [eax]
* Reference to control TOptionForm.AutoNext : TCheckBox
|
004D7634 8B8008030000 mov eax, [eax+$0308]
004D763A 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D763C FF92C8000000 call dword ptr [edx+$00C8]
004D7642 50 push eax
* Possible String Reference to: 'AutoNext'
|
004D7643 B99C764D00 mov ecx, $004D769C
* Possible String Reference to: 'Setup'
|
004D7648 BA78764D00 mov edx, $004D7678
004D764D A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D7652 8B18 mov ebx, [eax]
004D7654 FF5314 call dword ptr [ebx+$14]
004D7657 5B pop ebx
004D7658 C3 ret
*)
end;
procedure TMainForm.ServerInfoListCustomDrawItem(Sender : TObject);
begin
(*
004D76A8 55 push ebp
004D76A9 8BEC mov ebp, esp
004D76AB 83C4F0 add esp, -$10
004D76AE 53 push ebx
004D76AF 56 push esi
004D76B0 8BD9 mov ebx, ecx
004D76B2 8BF2 mov esi, edx
004D76B4 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D76B6 E8C941F7FF call 0044B884
004D76BB 83F82A cmp eax, +$2A
004D76BE 0F8FC0000000 jnle 004D7784
004D76C4 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D76C6 E8B941F7FF call 0044B884
004D76CB 8D0480 lea eax, [eax+eax*4]
004D76CE 8D0480 lea eax, [eax+eax*4]
004D76D1 DD802DCF4D00 fld qword ptr [eax+$4DCF2D]
004D76D7 D81D8C774D00 fcomp dword ptr [$004D778C]
004D76DD DFE0 fstsw ax
004D76DF 9E sahf
004D76E0 7722 jnbe 004D7704
004D76E2 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D76E4 E89B41F7FF call 0044B884
004D76E9 8D0480 lea eax, [eax+eax*4]
004D76EC 8D0480 lea eax, [eax+eax*4]
004D76EF DD8037CF4D00 fld qword ptr [eax+$4DCF37]
004D76F5 D81D8C774D00 fcomp dword ptr [$004D778C]
004D76FB DFE0 fstsw ax
004D76FD 9E sahf
004D76FE 0F8680000000 jbe 004D7784
004D7704 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7706 E87941F7FF call 0044B884
004D770B 8D0480 lea eax, [eax+eax*4]
004D770E 8D0480 lea eax, [eax+eax*4]
004D7711 052DCF4D00 add eax, +$004DCF2D
004D7716 50 push eax
* Reference to: SysUtils.Now:TDateTime;
|
004D7717 E82037F3FF call 0040AE3C
004D771C 58 pop eax
004D771D DC20 fsub qword ptr [eax]
004D771F DD5DF8 fstp qword ptr [ebp-$08]
004D7722 9B wait
004D7723 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7725 E85A41F7FF call 0044B884
004D772A 8D0480 lea eax, [eax+eax*4]
004D772D 8D0480 lea eax, [eax+eax*4]
004D7730 0537CF4D00 add eax, +$004DCF37
004D7735 50 push eax
* Reference to: SysUtils.Now:TDateTime;
|
004D7736 E80137F3FF call 0040AE3C
004D773B 58 pop eax
004D773C DC20 fsub qword ptr [eax]
004D773E DD5DF0 fstp qword ptr [ebp-$10]
004D7741 9B wait
004D7742 DD45F8 fld qword ptr [ebp-$08]
004D7745 D81D90774D00 fcomp dword ptr [$004D7790]
004D774B DFE0 fstsw ax
004D774D 9E sahf
004D774E 720E jb 004D775E
004D7750 DD45F0 fld qword ptr [ebp-$10]
004D7753 D81D90774D00 fcomp dword ptr [$004D7790]
004D7759 DFE0 fstsw ax
004D775B 9E sahf
004D775C 7326 jnb 004D7784
004D775E 8B8610020000 mov eax, [esi+$0210]
004D7764 8B4014 mov eax, [eax+$14]
004D7767 BA80000000 mov edx, $00000080
* Reference to: Graphics.TBrush.SetColor(TBrush;TColor);
|
004D776C E8472EF5FF call 0042A5B8
004D7771 8B8610020000 mov eax, [esi+$0210]
004D7777 8B400C mov eax, [eax+$0C]
004D777A BAFFFFFF00 mov edx, $00FFFFFF
* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
004D777F E86826F5FF call 00429DEC
004D7784 5E pop esi
004D7785 5B pop ebx
004D7786 8BE5 mov esp, ebp
004D7788 5D pop ebp
004D7789 C20800 ret $0008
*)
end;
procedure TMainForm.IDListCustomDrawItem(Sender : TObject);
begin
(*
004D7794 55 push ebp
004D7795 8BEC mov ebp, esp
004D7797 53 push ebx
004D7798 56 push esi
004D7799 8BD9 mov ebx, ecx
004D779B 8BF2 mov esi, edx
004D779D 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D779F E8E040F7FF call 0044B884
004D77A4 A801 test al, $01
004D77A6 7513 jnz 004D77BB
004D77A8 8B8610020000 mov eax, [esi+$0210]
004D77AE 8B4014 mov eax, [eax+$14]
004D77B1 BAF2F2F200 mov edx, $00F2F2F2
* Reference to: Graphics.TBrush.SetColor(TBrush;TColor);
|
004D77B6 E8FD2DF5FF call 0042A5B8
004D77BB 5E pop esi
004D77BC 5B pop ebx
004D77BD 5D pop ebp
004D77BE C20800 ret $0008
*)
end;
procedure TMainForm.N17Click(Sender : TObject);
begin
(*
004D7A5C 53 push ebx
004D7A5D 51 push ecx
004D7A5E 8BD8 mov ebx, eax
* Reference to TGJSetupForm instance
|
004D7A60 8B0D50BB4D00 mov ecx, [$004DBB50]
* Reference to TApplication instance
|
004D7A66 A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D7A6B 8B00 mov eax, [eax]
* Reference to class TGJSetupForm
|
004D7A6D 8B1500434D00 mov edx, [$004D4300]
* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
| or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
004D7A73 E8B409FBFF call 0048842C
* Reference to TGJSetupForm instance
|
004D7A78 A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7A7D 8B00 mov eax, [eax]
004D7A7F 8B10 mov edx, [eax]
* Reference to method TGJSetupForm.ShowModal()
|
004D7A81 FF92EC000000 call dword ptr [edx+$00EC]
004D7A87 48 dec eax
004D7A88 7556 jnz 004D7AE0
004D7A8A C60424FF mov byte ptr [esp], $FF
* Reference to TGJSetupForm instance
|
004D7A8E A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7A93 8B00 mov eax, [eax]
* Reference to control TGJSetupForm.BBCheck : TCheckBox
|
004D7A95 8B80F8020000 mov eax, [eax+$02F8]
004D7A9B 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D7A9D FF92C8000000 call dword ptr [edx+$00C8]
004D7AA3 88442401 mov [esp+$01], al
* Reference to TGJSetupForm instance
|
004D7AA7 A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7AAC 8B00 mov eax, [eax]
* Reference to control TGJSetupForm.CKCheck : TCheckBox
|
004D7AAE 8B80FC020000 mov eax, [eax+$02FC]
004D7AB4 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D7AB6 FF92C8000000 call dword ptr [edx+$00C8]
004D7ABC 88442402 mov [esp+$02], al
004D7AC0 8BC4 mov eax, esp
004D7AC2 8B00 mov eax, [eax]
004D7AC4 50 push eax
* Reference to control TMainForm.IDList : TListView
|
004D7AC5 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7ACB E81476F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7AD0 E8AF3DF7FF call 0044B884
004D7AD5 8BC8 mov ecx, eax
004D7AD7 B211 mov dl, $11
004D7AD9 8BC3 mov eax, ebx
|
004D7ADB E8D0EFFFFF call 004D6AB0
* Reference to TGJSetupForm instance
|
004D7AE0 A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7AE5 8B00 mov eax, [eax]
* Reference to: System.TObject.Free(TObject);
|
004D7AE7 E890B9F2FF call 0040347C
004D7AEC 5A pop edx
004D7AED 5B pop ebx
004D7AEE C3 ret
*)
end;
procedure TMainForm.N4Click(Sender : TObject);
begin
(*
004D7AF0 55 push ebp
004D7AF1 8BEC mov ebp, esp
004D7AF3 6A00 push $00
004D7AF5 53 push ebx
004D7AF6 8BD8 mov ebx, eax
004D7AF8 33C0 xor eax, eax
004D7AFA 55 push ebp
* Possible String Reference to: '?莉?疔Y]?
|
004D7AFB 687A7B4D00 push $004D7B7A
***** TRY
|
004D7B00 64FF30 push dword ptr fs:[eax]
004D7B03 648920 mov fs:[eax], esp
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7B06 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7B0C E8D375F7FF call 0044F0E4
004D7B11 85C0 test eax, eax
004D7B13 744F jz 004D7B64
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7B15 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7B1B E8C475F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7B20 E85F3DF7FF call 0044B884
004D7B25 40 inc eax
004D7B26 8D55FC lea edx, [ebp-$04]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D7B29 E80E12F3FF call 00408D3C
004D7B2E 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '服回城'
|
004D7B31 BA907B4D00 mov edx, $004D7B90
* Reference to: System.@LStrCat;
|
004D7B36 E81DCAF2FF call 00404558
004D7B3B 8B45FC mov eax, [ebp-$04]
|
004D7B3E E869D9FFFF call 004D54AC
004D7B43 84C0 test al, al
004D7B45 741D jz 004D7B64
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7B47 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7B4D E89275F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7B52 E82D3DF7FF call 0044B884
004D7B57 40 inc eax
004D7B58 50 push eax
004D7B59 33C9 xor ecx, ecx
004D7B5B B20A mov dl, $0A
004D7B5D 8BC3 mov eax, ebx
|
004D7B5F E80CEEFFFF call 004D6970
004D7B64 33C0 xor eax, eax
004D7B66 5A pop edx
004D7B67 59 pop ecx
004D7B68 59 pop ecx
004D7B69 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[Y]?
|
004D7B6C 68817B4D00 push $004D7B81
004D7B71 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D7B74 E817C7F2FF call 00404290
004D7B79 C3 ret
* Reference to: System.@HandleFinally;
|
004D7B7A E991C0F2FF jmp 00403C10
004D7B7F EBF0 jmp 004D7B71
****** END
|
004D7B81 5B pop ebx
004D7B82 59 pop ecx
004D7B83 5D pop ebp
004D7B84 C3 ret
*)
end;
procedure TMainForm.N5Click(Sender : TObject);
begin
(*
004D7B98 55 push ebp
004D7B99 8BEC mov ebp, esp
004D7B9B 6A00 push $00
004D7B9D 53 push ebx
004D7B9E 8BD8 mov ebx, eax
004D7BA0 33C0 xor eax, eax
004D7BA2 55 push ebp
* Possible String Reference to: '殚框?疔Y]?
|
004D7BA3 68227C4D00 push $004D7C22
***** TRY
|
004D7BA8 64FF30 push dword ptr fs:[eax]
004D7BAB 648920 mov fs:[eax], esp
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7BAE 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7BB4 E82B75F7FF call 0044F0E4
004D7BB9 85C0 test eax, eax
004D7BBB 744F jz 004D7C0C
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7BBD 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7BC3 E81C75F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7BC8 E8B73CF7FF call 0044B884
004D7BCD 40 inc eax
004D7BCE 8D55FC lea edx, [ebp-$04]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D7BD1 E86611F3FF call 00408D3C
004D7BD6 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '服强退'
|
004D7BD9 BA387C4D00 mov edx, $004D7C38
* Reference to: System.@LStrCat;
|
004D7BDE E875C9F2FF call 00404558
004D7BE3 8B45FC mov eax, [ebp-$04]
|
004D7BE6 E8C1D8FFFF call 004D54AC
004D7BEB 84C0 test al, al
004D7BED 741D jz 004D7C0C
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7BEF 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7BF5 E8EA74F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7BFA E8853CF7FF call 0044B884
004D7BFF 40 inc eax
004D7C00 50 push eax
004D7C01 33C9 xor ecx, ecx
004D7C03 B209 mov dl, $09
004D7C05 8BC3 mov eax, ebx
|
004D7C07 E864EDFFFF call 004D6970
004D7C0C 33C0 xor eax, eax
004D7C0E 5A pop edx
004D7C0F 59 pop ecx
004D7C10 59 pop ecx
004D7C11 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[Y]?
|
004D7C14 68297C4D00 push $004D7C29
004D7C19 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D7C1C E86FC6F2FF call 00404290
004D7C21 C3 ret
* Reference to: System.@HandleFinally;
|
004D7C22 E9E9BFF2FF jmp 00403C10
004D7C27 EBF0 jmp 004D7C19
****** END
|
004D7C29 5B pop ebx
004D7C2A 59 pop ecx
004D7C2B 5D pop ebp
004D7C2C C3 ret
*)
end;
procedure TMainForm.N7Click(Sender : TObject);
begin
(*
004D7C40 53 push ebx
004D7C41 51 push ecx
004D7C42 8BD8 mov ebx, eax
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7C44 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7C4A E89574F7FF call 0044F0E4
004D7C4F 85C0 test eax, eax
004D7C51 0F848C000000 jz 004D7CE3
* Reference to TGJSetupForm instance
|
004D7C57 8B0D50BB4D00 mov ecx, [$004DBB50]
* Reference to TApplication instance
|
004D7C5D A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D7C62 8B00 mov eax, [eax]
* Reference to class TGJSetupForm
|
004D7C64 8B1500434D00 mov edx, [$004D4300]
* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
| or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
004D7C6A E8BD07FBFF call 0048842C
* Reference to TGJSetupForm instance
|
004D7C6F A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7C74 8B00 mov eax, [eax]
004D7C76 8B10 mov edx, [eax]
* Reference to method TGJSetupForm.ShowModal()
|
004D7C78 FF92EC000000 call dword ptr [edx+$00EC]
004D7C7E 48 dec eax
004D7C7F 7556 jnz 004D7CD7
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7C81 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7C87 E85874F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7C8C E8F33BF7FF call 0044B884
004D7C91 40 inc eax
004D7C92 880424 mov [esp], al
* Reference to TGJSetupForm instance
|
004D7C95 A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7C9A 8B00 mov eax, [eax]
* Reference to control TGJSetupForm.BBCheck : TCheckBox
|
004D7C9C 8B80F8020000 mov eax, [eax+$02F8]
004D7CA2 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D7CA4 FF92C8000000 call dword ptr [edx+$00C8]
004D7CAA 88442401 mov [esp+$01], al
* Reference to TGJSetupForm instance
|
004D7CAE A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7CB3 8B00 mov eax, [eax]
* Reference to control TGJSetupForm.CKCheck : TCheckBox
|
004D7CB5 8B80FC020000 mov eax, [eax+$02FC]
004D7CBB 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D7CBD FF92C8000000 call dword ptr [edx+$00C8]
004D7CC3 88442402 mov [esp+$02], al
004D7CC7 8BC4 mov eax, esp
004D7CC9 8B00 mov eax, [eax]
004D7CCB 50 push eax
004D7CCC 33C9 xor ecx, ecx
004D7CCE B211 mov dl, $11
004D7CD0 8BC3 mov eax, ebx
|
004D7CD2 E899ECFFFF call 004D6970
* Reference to TGJSetupForm instance
|
004D7CD7 A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7CDC 8B00 mov eax, [eax]
* Reference to: System.TObject.Free(TObject);
|
004D7CDE E899B7F2FF call 0040347C
004D7CE3 5A pop edx
004D7CE4 5B pop ebx
004D7CE5 C3 ret
*)
end;
procedure TMainForm.N6Click(Sender : TObject);
begin
(*
004D7CE8 55 push ebp
004D7CE9 8BEC mov ebp, esp
004D7CEB 6A00 push $00
004D7CED 53 push ebx
004D7CEE 8BD8 mov ebx, eax
004D7CF0 33C0 xor eax, eax
004D7CF2 55 push ebp
* Possible String Reference to: '?掘?疔Y]?
|
004D7CF3 68727D4D00 push $004D7D72
***** TRY
|
004D7CF8 64FF30 push dword ptr fs:[eax]
004D7CFB 648920 mov fs:[eax], esp
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7CFE 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7D04 E8DB73F7FF call 0044F0E4
004D7D09 85C0 test eax, eax
004D7D0B 744F jz 004D7D5C
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7D0D 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7D13 E8CC73F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7D18 E8673BF7FF call 0044B884
004D7D1D 40 inc eax
004D7D1E 8D55FC lea edx, [ebp-$04]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D7D21 E81610F3FF call 00408D3C
004D7D26 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '服关机'
|
004D7D29 BA887D4D00 mov edx, $004D7D88
* Reference to: System.@LStrCat;
|
004D7D2E E825C8F2FF call 00404558
004D7D33 8B45FC mov eax, [ebp-$04]
|
004D7D36 E871D7FFFF call 004D54AC
004D7D3B 84C0 test al, al
004D7D3D 741D jz 004D7D5C
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7D3F 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7D45 E89A73F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7D4A E8353BF7FF call 0044B884
004D7D4F 40 inc eax
004D7D50 50 push eax
004D7D51 33C9 xor ecx, ecx
004D7D53 B20B mov dl, $0B
004D7D55 8BC3 mov eax, ebx
|
004D7D57 E814ECFFFF call 004D6970
004D7D5C 33C0 xor eax, eax
004D7D5E 5A pop edx
004D7D5F 59 pop ecx
004D7D60 59 pop ecx
004D7D61 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[Y]?
|
004D7D64 68797D4D00 push $004D7D79
004D7D69 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D7D6C E81FC5F2FF call 00404290
004D7D71 C3 ret
* Reference to: System.@HandleFinally;
|
004D7D72 E999BEF2FF jmp 00403C10
004D7D77 EBF0 jmp 004D7D69
****** END
|
004D7D79 5B pop ebx
004D7D7A 59 pop ecx
004D7D7B 5D pop ebp
004D7D7C C3 ret
*)
end;
procedure TMainForm.ISeeBtnClick(Sender : TObject);
begin
(*
004D8204 C605BCD44D0000 mov byte ptr [$004DD4BC], $00
004D820B 33D2 xor edx, edx
* Reference to control TMainForm.ISeeBtn : TButton
|
004D820D 8B8014040000 mov eax, [eax+$0414]
004D8213 8B08 mov ecx, [eax]
* Reference to method TButton.SetEnabled(Boolean)
|
004D8215 FF5164 call dword ptr [ecx+$64]
004D8218 C3 ret
*)
end;
procedure TMainForm.ServerInfoListCustomDrawSubItem(Sender : TObject);
begin
(*
004D821C 55 push ebp
004D821D 8BEC mov ebp, esp
004D821F 83C4F8 add esp, -$08
004D8222 53 push ebx
004D8223 56 push esi
004D8224 8BD9 mov ebx, ecx
004D8226 8BF2 mov esi, edx
004D8228 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D822A E85536F7FF call 0044B884
004D822F A801 test al, $01
004D8231 7515 jnz 004D8248
004D8233 8B8610020000 mov eax, [esi+$0210]
004D8239 8B4014 mov eax, [eax+$14]
004D823C BAF2F2F200 mov edx, $00F2F2F2
* Reference to: Graphics.TBrush.SetColor(TBrush;TColor);
|
004D8241 E87223F5FF call 0042A5B8
004D8246 EB13 jmp 004D825B
004D8248 8B8610020000 mov eax, [esi+$0210]
004D824E 8B4014 mov eax, [eax+$14]
004D8251 BAFFFFFF00 mov edx, $00FFFFFF
* Reference to: Graphics.TBrush.SetColor(TBrush;TColor);
|
004D8256 E85D23F5FF call 0042A5B8
004D825B 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D825D E82236F7FF call 0044B884
004D8262 83F82A cmp eax, +$2A
004D8265 0F8F3F010000 jnle 004D83AA
004D826B 8B4510 mov eax, [ebp+$10]
004D826E 83E804 sub eax, +$04
004D8271 740C jz 004D827F
004D8273 48 dec eax
004D8274 0F84A0000000 jz 004D831A
004D827A E92B010000 jmp 004D83AA
* Reference to: SysUtils.Now:TDateTime;
|
004D827F E8B82BF3FF call 0040AE3C
004D8284 83C4F8 add esp, -$08
004D8287 DD1C24 fstp qword ptr [esp]
004D828A 9B wait
004D828B 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D828D E8F235F7FF call 0044B884
004D8292 8D0480 lea eax, [eax+eax*4]
004D8295 8D0480 lea eax, [eax+eax*4]
004D8298 FFB031CF4D00 push dword ptr [eax+$4DCF31]
004D829E FFB02DCF4D00 push dword ptr [eax+$4DCF2D]
|
004D82A4 E8EB5BFBFF call 0048DE94
004D82A9 8945F8 mov [ebp-$08], eax
004D82AC 8955FC mov [ebp-$04], edx
004D82AF 837DFC00 cmp dword ptr [ebp-$04], +$00
004D82B3 750B jnz 004D82C0
004D82B5 817DF8A0050000 cmp dword ptr [ebp-$08], $000005A0
004D82BC 7344 jnb 004D8302
004D82BE EB02 jmp 004D82C2
004D82C0 7D40 jnl 004D8302
004D82C2 837DFC00 cmp dword ptr [ebp-$04], +$00
004D82C6 7508 jnz 004D82D0
004D82C8 837DF80A cmp dword ptr [ebp-$08], +$0A
004D82CC 731C jnb 004D82EA
004D82CE EB02 jmp 004D82D2
004D82D0 7D18 jnl 004D82EA
004D82D2 8B8610020000 mov eax, [esi+$0210]
004D82D8 8B400C mov eax, [eax+$0C]
004D82DB BA0000FF00 mov edx, $00FF0000
* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
004D82E0 E8071BF5FF call 00429DEC
004D82E5 E9C0000000 jmp 004D83AA
004D82EA 8B8610020000 mov eax, [esi+$0210]
004D82F0 8B400C mov eax, [eax+$0C]
004D82F3 BAFF000000 mov edx, $000000FF
* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
004D82F8 E8EF1AF5FF call 00429DEC
004D82FD E9A8000000 jmp 004D83AA
004D8302 8B8610020000 mov eax, [esi+$0210]
004D8308 8B400C mov eax, [eax+$0C]
004D830B BA080000FF mov edx, $FF000008
delphi反编译源码如下:
unit MainP;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TMainForm=class(TForm)
ToolBar1: TToolBar;
ImageList1: TImageList;
ImageList2: TImageList;
PopupMenu1: TPopupMenu;
N4: TMenuItem;
N5: TMenuItem;
N7: TMenuItem;
PopupMenu2: TPopupMenu;
N8: TMenuItem;
VPop: TMenuItem;
VPop2: TMenuItem;
N11: TMenuItem;
N14: TMenuItem;
N15: TMenuItem;
N16: TMenuItem;
N17: TMenuItem;
SBar: TStatusBar;
ServerSocket: TServerSocket;
Timer1: TTimer;
ImageList3: TImageList;
ToolButton2: TToolButton;
ToolButton3: TToolButton;
ToolButton4: TToolButton;
ToolButton5: TToolButton;
ToolButton6: TToolButton;
ToolButton8: TToolButton;
ToolButton9: TToolButton;
ToolButton10: TToolButton;
ToolButton11: TToolButton;
ToolButton12: TToolButton;
ToolButton13: TToolButton;
AutoCheck: TToolButton;
N26: TMenuItem;
N27: TMenuItem;
N28: TMenuItem;
N29: TMenuItem;
N30: TMenuItem;
N31: TMenuItem;
ClientSocket: TClientSocket;
LinkSvrBtn: TToolButton;
LinkSpr: TToolButton;
ImageList4: TImageList;
MemTable: TkbmMemTable;
MemTableSock: TIntegerField;
MemTableSvrID: TSmallintField;
MemTableGameID: TStringField;
MemTableGold: TIntegerField;
MemTableMapID: TSmallintField;
MainPanel: TPanel;
Splitter1: TSplitter;
Panel2: TPanel;
Panel3: TPanel;
Label1: TLabel;
SpeedButton1: TSpeedButton;
LocaIDEdit: TEdit;
N2: TMenuItem;
N6: TMenuItem;
ScrPanel: TPanel;
Image1: TImage;
ToolBar3: TToolBar;
ToolButton15: TToolButton;
ScroolBox: TScrollBox;
Panel1: TPanel;
ServerInfoList: TListView;
Panel4: TPanel;
Splitter2: TSplitter;
Panel5: TPanel;
GMOLCheck: TCheckBox;
GMRoomCheck: TCheckBox;
SeeGMCheck: TCheckBox;
FHCheck: TCheckBox;
ISeeBtn: TButton;
MList: TListBox;
GameMessList: TListBox;
Splitter3: TSplitter;
MapInfo: TPanel;
ToolButton1: TToolButton;
Page: TPageControl;
TabSheet1: TTabSheet;
ToolBar2: TToolBar;
VBtn: TToolButton;
VBtn2: TToolButton;
ToolButton18: TToolButton;
IDList: TListView;
TabSheet2: TTabSheet;
GameSocket: TClientSocket;
Panel6: TPanel;
GroupBox1: TGroupBox;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Edit1: TEdit;
FloatEdit1: TFloatEdit;
Edit2: TEdit;
Edit3: TEdit;
GroupBox2: TGroupBox;
Label6: TLabel;
Label7: TLabel;
Edit4: TEdit;
Edit5: TEdit;
GroupBox3: TGroupBox;
Panel7: TPanel;
GroupBox4: TGroupBox;
Label8: TLabel;
FloatEdit2: TFloatEdit;
CheckBox1: TCheckBox;
Panel8: TPanel;
StartBtn: TButton;
StopBtn: TButton;
GroupBox5: TGroupBox;
Label10: TLabel;
Label11: TLabel;
Label12: TLabel;
Label13: TLabel;
Label9: TLabel;
N1: TMenuItem;
N3: TMenuItem;
N9: TMenuItem;
N10: TMenuItem;
MemTableErrCount: TSmallintField;
UnGMCheck: TCheckBox;
procedure FormCreate(Sender : TObject);
procedure FormClose(Sender : TObject);
procedure ServerSocketAccept(Sender : TObject);
procedure Timer1Timer(Sender : TObject);
procedure ServerSocketClientDisconnect(Sender : TObject);
procedure ServerSocketClientRead(Sender : TObject);
procedure ServerSocketClientError(Sender : TObject);
procedure ToolButton9Click(Sender : TObject);
procedure FormCloseQuery(Sender : TObject);
procedure ToolButton6Click(Sender : TObject);
procedure ToolButton11Click(Sender : TObject);
procedure ToolButton5Click(Sender : TObject);
procedure ToolButton12Click(Sender : TObject);
procedure ToolButton3Click(Sender : TObject);
procedure ToolButton4Click(Sender : TObject);
procedure N27Click(Sender : TObject);
procedure N29Click(Sender : TObject);
procedure N14Click(Sender : TObject);
procedure N15Click(Sender : TObject);
procedure N31Click(Sender : TObject);
procedure ClientSocketConnect(Sender : TObject);
procedure ClientSocketConnecting(Sender : TObject);
procedure ClientSocketDisconnect(Sender : TObject);
procedure ClientSocketError(Sender : TObject);
procedure ToolButton10Click(Sender : TObject);
procedure LinkSvrBtnClick(Sender : TObject);
procedure FormActivate(Sender : TObject);
procedure ClientSocketRead(Sender : TObject);
procedure PopupMenu1Popup(Sender : TObject);
procedure VBtnClick(Sender : TObject);
procedure IDListDblClick(Sender : TObject);
procedure SpeedButton1Click(Sender : TObject);
procedure ToolButton15Click(Sender : TObject);
procedure N28Click(Sender : TObject);
procedure PopupMenu2Popup(Sender : TObject);
procedure AutoCheckClick(Sender : TObject);
procedure ServerInfoListCustomDrawItem(Sender : TObject);
procedure IDListCustomDrawItem(Sender : TObject);
procedure N17Click(Sender : TObject);
procedure N4Click(Sender : TObject);
procedure N5Click(Sender : TObject);
procedure N7Click(Sender : TObject);
procedure N6Click(Sender : TObject);
procedure ISeeBtnClick(Sender : TObject);
procedure ServerInfoListCustomDrawSubItem(Sender : TObject);
procedure MemTableBeforeInsert(Sender : TObject);
procedure MemTableBeforeDelete(Sender : TObject);
procedure MemTableAfterPost(Sender : TObject);
procedure ServerInfoListSelectItem(Sender : TObject);
procedure ToolButton1Click(Sender : TObject);
procedure FormShow(Sender : TObject);
procedure N1Click(Sender : TObject);
procedure N3Click(Sender : TObject);
procedure N10Click(Sender : TObject);
procedure GameSocketRead(Sender : TObject);
procedure GameSocketError(Sender : TObject);
procedure StartBtnClick(Sender : TObject);
procedure GameSocketDisconnect(Sender : TObject);
procedure GameSocketConnect(Sender : TObject);
procedure _PROC_004D53D1(Sender : TObject);
procedure _PROC_004D54AD(Sender : TObject);
procedure _PROC_004D5588(Sender : TObject);
procedure _PROC_004D55EC(Sender : TObject);
procedure _PROC_004D5B29(Sender : TObject);
procedure _PROC_004D5B5D(Sender : TObject);
procedure _PROC_004D5EC1(Sender : TObject);
procedure _PROC_004D5ED7(Sender : TObject);
procedure _PROC_004D5EF4(Sender : TObject);
procedure _PROC_004D67C7(Sender : TObject);
procedure _PROC_004D6971(Sender : TObject);
procedure _PROC_004D6AB1(Sender : TObject);
procedure _PROC_004D6DC5(Sender : TObject);
procedure _PROC_004D7214(Sender : TObject);
procedure _PROC_004D7389(Sender : TObject);
procedure _PROC_004D74FD(Sender : TObject);
procedure _PROC_004D77C4(Sender : TObject);
procedure _PROC_004D7D91(Sender : TObject);
procedure _PROC_004D842C(Sender : TObject);
procedure _PROC_004D860D(Sender : TObject);
private
{ Private declarations }
public
{ Public declarations }
end ;
var
MainForm: TMainForm;
{This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer}
implementation
{$R *.DFM}
procedure TMainForm.FormCreate(Sender : TObject);
begin
(*
004D5664 55 push ebp
004D5665 8BEC mov ebp, esp
004D5667 81C448FDFFFF add esp, $FFFFFD48
004D566D 53 push ebx
004D566E 56 push esi
004D566F 57 push edi
004D5670 33C9 xor ecx, ecx
004D5672 898D48FDFFFF mov [ebp+$FFFFFD48], ecx
004D5678 898D4CFEFFFF mov [ebp+$FFFFFE4C], ecx
004D567E 898D50FEFFFF mov [ebp+$FFFFFE50], ecx
004D5684 898D5CFEFFFF mov [ebp+$FFFFFE5C], ecx
004D568A 898D64FEFFFF mov [ebp+$FFFFFE64], ecx
004D5690 898D60FEFFFF mov [ebp+$FFFFFE60], ecx
004D5696 8BD8 mov ebx, eax
004D5698 33C0 xor eax, eax
004D569A 55 push ebp
* Possible String Reference to: '殛狎?沁^[?]?
|
004D569B 68A15A4D00 push $004D5AA1
***** TRY
|
004D56A0 64FF30 push dword ptr fs:[eax]
004D56A3 648920 mov fs:[eax], esp
004D56A6 8D9560FEFFFF lea edx, [ebp+$FFFFFE60]
* Reference to TApplication instance
|
004D56AC A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D56B1 8B00 mov eax, [eax]
* Reference to: Forms.TApplication.GetExeName(TApplication):AnsiString;
|
004D56B3 E80434FBFF call 00488ABC
004D56B8 8B8560FEFFFF mov eax, [ebp+$FFFFFE60]
004D56BE 8D9564FEFFFF lea edx, [ebp+$FFFFFE64]
* Reference to: SysUtils.ExtractFilePath(AnsiString):AnsiString;
|
004D56C4 E8BF3DF3FF call 00409488
004D56C9 8D8564FEFFFF lea eax, [ebp+$FFFFFE64]
* Possible String Reference to: 'Setup.ini'
|
004D56CF BAB85A4D00 mov edx, $004D5AB8
* Reference to: System.@LStrCat;
|
004D56D4 E87FEEF2FF call 00404558
004D56D9 8B8D64FEFFFF mov ecx, [ebp+$FFFFFE64]
004D56DF B201 mov dl, $01
* Reference to class TIniFile
|
004D56E1 A18CDF4300 mov eax, dword ptr [$0043DF8C]
* Reference to: IniFiles.TCustomIniFile.Create(TCustomIniFile;boolean;AnsiString);
|
004D56E6 E85189F6FF call 0043E03C
* Reference to GlobalVar_004DD4B8
|
004D56EB A3B8D44D00 mov dword ptr [$004DD4B8], eax
* Reference to control TMainForm.GMOLCheck : TCheckBox
|
004D56F0 8BB304040000 mov esi, [ebx+$0404]
004D56F6 8BC6 mov eax, esi
004D56F8 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D56FA FF92C8000000 call dword ptr [edx+$00C8]
004D5700 50 push eax
* Possible String Reference to: 'GMOLCheck'
|
004D5701 B9CC5A4D00 mov ecx, $004D5ACC
* Possible String Reference to: 'Setup'
|
004D5706 BAE05A4D00 mov edx, $004D5AE0
004D570B A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5710 8B38 mov edi, [eax]
004D5712 FF5710 call dword ptr [edi+$10]
004D5715 8BD0 mov edx, eax
004D5717 8BC6 mov eax, esi
004D5719 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
004D571B FF91CC000000 call dword ptr [ecx+$00CC]
* Reference to control TMainForm.GMRoomCheck : TCheckBox
|
004D5721 8BB308040000 mov esi, [ebx+$0408]
004D5727 8BC6 mov eax, esi
004D5729 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D572B FF92C8000000 call dword ptr [edx+$00C8]
004D5731 50 push eax
* Possible String Reference to: 'GMRoomCheck'
|
004D5732 B9F05A4D00 mov ecx, $004D5AF0
* Possible String Reference to: 'Setup'
|
004D5737 BAE05A4D00 mov edx, $004D5AE0
004D573C A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5741 8B38 mov edi, [eax]
004D5743 FF5710 call dword ptr [edi+$10]
004D5746 8BD0 mov edx, eax
004D5748 8BC6 mov eax, esi
004D574A 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
004D574C FF91CC000000 call dword ptr [ecx+$00CC]
* Reference to control TMainForm.SeeGMCheck : TCheckBox
|
004D5752 8BB30C040000 mov esi, [ebx+$040C]
004D5758 8BC6 mov eax, esi
004D575A 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D575C FF92C8000000 call dword ptr [edx+$00C8]
004D5762 50 push eax
* Possible String Reference to: 'SeeGMCheck'
|
004D5763 B9045B4D00 mov ecx, $004D5B04
* Possible String Reference to: 'Setup'
|
004D5768 BAE05A4D00 mov edx, $004D5AE0
004D576D A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5772 8B38 mov edi, [eax]
004D5774 FF5710 call dword ptr [edi+$10]
004D5777 8BD0 mov edx, eax
004D5779 8BC6 mov eax, esi
004D577B 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
004D577D FF91CC000000 call dword ptr [ecx+$00CC]
* Reference to control TMainForm.FHCheck : TCheckBox
|
004D5783 8BB310040000 mov esi, [ebx+$0410]
004D5789 8BC6 mov eax, esi
004D578B 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D578D FF92C8000000 call dword ptr [edx+$00C8]
004D5793 50 push eax
* Possible String Reference to: 'FHCheck'
|
004D5794 B9185B4D00 mov ecx, $004D5B18
* Possible String Reference to: 'Setup'
|
004D5799 BAE05A4D00 mov edx, $004D5AE0
004D579E A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D57A3 8B38 mov edi, [eax]
004D57A5 FF5710 call dword ptr [edi+$10]
004D57A8 8BD0 mov edx, eax
004D57AA 8BC6 mov eax, esi
004D57AC 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
004D57AE FF91CC000000 call dword ptr [ecx+$00CC]
* Reference to control TMainForm.UnGMCheck : TCheckBox
|
004D57B4 8BB3DC040000 mov esi, [ebx+$04DC]
004D57BA 8BC6 mov eax, esi
004D57BC 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D57BE FF92C8000000 call dword ptr [edx+$00C8]
004D57C4 50 push eax
* Possible String Reference to: 'UnGMCheck'
|
004D57C5 B9285B4D00 mov ecx, $004D5B28
* Possible String Reference to: 'Setup'
|
004D57CA BAE05A4D00 mov edx, $004D5AE0
004D57CF A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D57D4 8B38 mov edi, [eax]
004D57D6 FF5710 call dword ptr [edi+$10]
004D57D9 8BD0 mov edx, eax
004D57DB 8BC6 mov eax, esi
004D57DD 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
004D57DF FF91CC000000 call dword ptr [ecx+$00CC]
* Reference to control TMainForm.ServerInfoList : TListView
|
004D57E5 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to field TListView.DoubleBuffered : Boolean
|
004D57EB C680F801000001 mov byte ptr [eax+$01F8], $01
004D57F2 C745FC01000000 mov dword ptr [ebp-$04], $00000001
* Reference to control TMainForm.ServerInfoList : TListView
|
004D57F9 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to field TListView.Items : TListItems
|
004D57FF 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TListItems.Add(TListItems):TListItem;
|
004D5805 E8A661F7FF call 0044B9B0
004D580A 8BF0 mov esi, eax
004D580C 8D855CFEFFFF lea eax, [ebp+$FFFFFE5C]
004D5812 50 push eax
004D5813 8B45FC mov eax, [ebp-$04]
004D5816 898554FEFFFF mov [ebp+$FFFFFE54], eax
004D581C C68558FEFFFF00 mov byte ptr [ebp+$FFFFFE58], $00
004D5823 8D9554FEFFFF lea edx, [ebp+$FFFFFE54]
004D5829 33C9 xor ecx, ecx
* Possible String Reference to: '韩 %02.d 服务器'
|
004D582B B83C5B4D00 mov eax, $004D5B3C
|
004D5830 E89344F3FF call 00409CC8
004D5835 8B955CFEFFFF mov edx, [ebp+$FFFFFE5C]
004D583B 8BC6 mov eax, esi
* Reference to: ComCtrls.TListItem.SetCaption(TListItem;AnsiString);
|
004D583D E80E5CF7FF call 0044B450
004D5842 6A01 push $01
* Reference to field TListItems.OFFS_0024
|
004D5844 8B4E24 mov ecx, [esi+$24]
* Possible String Reference to: 'Select'
|
004D5847 BA545B4D00 mov edx, $004D5B54
004D584C A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5851 8B38 mov edi, [eax]
004D5853 FF5710 call dword ptr [edi+$10]
004D5856 8BD0 mov edx, eax
004D5858 8BC6 mov eax, esi
* Reference to: ComCtrls.TListItem.SetChecked(TListItem;Boolean);
|
004D585A E8895BF7FF call 0044B3E8
004D585F FF45FC inc dword ptr [ebp-$04]
004D5862 837DFC2E cmp dword ptr [ebp-$04], +$2E
004D5866 7591 jnz 004D57F9
004D5868 B201 mov dl, $01
* Reference to class TMemoryStream
|
004D586A A1B0BE4100 mov eax, dword ptr [$0041BEB0]
* Reference to: System.TObject.Create(TObject;Boolean);
|
004D586F E8D8DBF2FF call 0040344C
* Reference to GlobalVar_004DD4A4
|
004D5874 A3A4D44D00 mov dword ptr [$004DD4A4], eax
004D5879 B201 mov dl, $01
* Reference to class TGIFImage
|
004D587B A1FCD94B00 mov eax, dword ptr [$004BD9FC]
|
004D5880 E88340FFFF call 004C9908
* Possible reference to GlobalVar_004DD4B0
|
004D5885 A3B0D44D00 mov dword ptr [$004DD4B0], eax
004D588A B201 mov dl, $01
* Reference to class TBitmap
|
004D588C A1408E4200 mov eax, dword ptr [$00428E40]
* Reference to: Graphics.TBitmap.Create(TBitmap;boolean);
|
004D5891 E86A95F5FF call 0042EE00
* Possible reference to GlobalVar_004DD4AC
|
004D5896 A3ACD44D00 mov dword ptr [$004DD4AC], eax
004D589B BA00040000 mov edx, $00000400
* Reference to GlobalVar_004DD4AC
|
004D58A0 A1ACD44D00 mov eax, dword ptr [$004DD4AC]
004D58A5 8B08 mov ecx, [eax]
* Possible reference to virtual method TGlobalVar_004DD4AC.OFFS_40
|
004D58A7 FF5140 call dword ptr [ecx+$40]
004D58AA BA00030000 mov edx, $00000300
* Reference to GlobalVar_004DD4AC
|
004D58AF A1ACD44D00 mov eax, dword ptr [$004DD4AC]
004D58B4 8B08 mov ecx, [eax]
* Possible reference to virtual method TGlobalVar_004DD4AC.OFFS_34
|
004D58B6 FF5134 call dword ptr [ecx+$34]
* Reference to field TMainForm.DoubleBuffered : Boolean
|
004D58B9 C683F801000001 mov byte ptr [ebx+$01F8], $01
004D58C0 B205 mov dl, $05
* Reference to control TMainForm.ScrPanel : TPanel
|
004D58C2 8B83DC030000 mov eax, [ebx+$03DC]
* Reference to: Controls.TControl.SetAlign(TControl;TAlign);
|
004D58C8 E82317F9FF call 00466FF0
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D58CD 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to: DB.TDataSet.Open(TDataSet);
|
004D58D3 E898E7FCFF call 004A4070
004D58D8 8D9550FEFFFF lea edx, [ebp+$FFFFFE50]
004D58DE 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004D58E0 E81F22F9FF call 00467B04
004D58E5 8B9550FEFFFF mov edx, [ebp+$FFFFFE50]
* Reference to TApplication instance
|
004D58EB A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D58F0 8B00 mov eax, [eax]
* Reference to: Forms.TApplication.SetTitle(TApplication;AnsiString);
|
004D58F2 E81527FBFF call 0048800C
004D58F7 8D8568FEFFFF lea eax, [ebp+$FFFFFE68]
004D58FD 50 push eax
004D58FE 6801010000 push $00000101
|
004D5903 E8E841FBFF call 00489AF0
004D5908 6A00 push $00
004D590A 6A02 push $02
004D590C 6A02 push $02
|
004D590E E89541FBFF call 00489AA8
004D5913 8BF0 mov esi, eax
* Reference to field TMainForm.OFFS_04E4
|
004D5915 89B3E4040000 mov [ebx+$04E4], esi
004D591B 83FEFF cmp esi, -$01
004D591E 7506 jnz 004D5926
004D5920 56 push esi
|
004D5921 E80A41FBFF call 00489A30
* Reference to field TMainForm.OFFS_04E8
|
004D5926 66C783E80400000200 mov word ptr [ebx+$04E8], $0002
004D592F 33C0 xor eax, eax
* Reference to field TMainForm.OFFS_04EC
|
004D5931 8983EC040000 mov [ebx+$04EC], eax
004D5937 6862040000 push $00000462
|
004D593C E80741FBFF call 00489A48
* Reference to field TMainForm.OFFS_04EA
|
004D5941 668983EA040000 mov [ebx+$04EA], ax
004D5948 6A10 push $10
* Reference to field TMainForm.OFFS_04E8
|
004D594A 8D83E8040000 lea eax, [ebx+$04E8]
004D5950 50 push eax
* Reference to field TMainForm.OFFS_04E4
|
004D5951 8B83E4040000 mov eax, [ebx+$04E4]
004D5957 50 push eax
|
004D5958 E8CB40FBFF call 00489A28
004D595D C745FC01000000 mov dword ptr [ebp-$04], $00000001
004D5964 6A04 push $04
004D5966 8D45FC lea eax, [ebp-$04]
004D5969 50 push eax
004D596A 6A20 push $20
004D596C 68FFFF0000 push $0000FFFF
* Reference to field TMainForm.OFFS_04E4
|
004D5971 8B83E4040000 mov eax, [ebx+$04E4]
004D5977 50 push eax
|
004D5978 E82341FBFF call 00489AA0
004D597D 40 inc eax
004D597E 6A01 push $01
004D5980 6801040000 push $00000401
004D5985 8BC3 mov eax, ebx
* Reference to: QForms.TCustomForm.GetClientHandle(TCustomForm):QWorkspaceH;
|
004D5987 E8AC8AF9FF call 0046E438
004D598C 50 push eax
* Reference to field TMainForm.OFFS_04E4
|
004D598D 8B83E4040000 mov eax, [ebx+$04E4]
004D5993 50 push eax
|
004D5994 E82F41FBFF call 00489AC8
* Reference to field TMainForm.OFFS_04F8
|
004D5999 66C783F80400000200 mov word ptr [ebx+$04F8], $0002
004D59A2 68B9080000 push $000008B9
|
004D59A7 E89C40FBFF call 00489A48
* Reference to field TMainForm.OFFS_04FA
|
004D59AC 668983FA040000 mov [ebx+$04FA], ax
004D59B3 B828CF4D00 mov eax, $004DCF28
004D59B8 BA67040000 mov edx, $00000467
* Reference to: Classes.TStream.WriteComponent(TStream;TComponent);
| or: Classes.TWriter.WriteRootComponent(TWriter;TComponent);
| or: DB.TWideStringField.GetAsWideString(TWideStringField):WideString;
| or: DB.TDateTimeField.GetValue(TDateTimeField;TDateTime;TDateTime):Boolean;
| or: DB.TSQLTimeStampField.GetValue(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp):Boolean;
| or: DB.TSQLTimeStampField.SetAsSQLTimeStamp(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp);
|
004D59BD E8161AF3FF call 004073D8
004D59C2 B894D34D00 mov eax, $004DD394
004D59C7 BA0E010000 mov edx, $0000010E
* Reference to: Classes.TStream.WriteComponent(TStream;TComponent);
| or: Classes.TWriter.WriteRootComponent(TWriter;TComponent);
| or: DB.TWideStringField.GetAsWideString(TWideStringField):WideString;
| or: DB.TDateTimeField.GetValue(TDateTimeField;TDateTime;TDateTime):Boolean;
| or: DB.TSQLTimeStampField.GetValue(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp):Boolean;
| or: DB.TSQLTimeStampField.SetAsSQLTimeStamp(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp);
|
004D59CC E8071AF3FF call 004073D8
004D59D1 B813000000 mov eax, $00000013
* Reference to: SysUtils.AllocMem(Cardinal):Pointer;
|
004D59D6 E8B52CF3FF call 00408690
* Reference to GlobalVar_004DD390
|
004D59DB A390D34D00 mov dword ptr [$004DD390], eax
004D59E0 C745F8DA53A119 mov dword ptr [ebp-$08], $19A153DA
004D59E7 FF75F8 push dword ptr [ebp-$08]
|
004D59EA E86940FBFF call 00489A58
004D59EF 8BD0 mov edx, eax
004D59F1 8D854CFEFFFF lea eax, [ebp+$FFFFFE4C]
* Reference to: System.@LStrFromPChar(String;String;PAnsiChar);
| or: System.@WStrFromPChar(WideString;WideString;PAnsiChar);
|
004D59F7 E88CEAF2FF call 00404488
004D59FC 8B954CFEFFFF mov edx, [ebp+$FFFFFE4C]
* Reference to control TMainForm.ClientSocket : TClientSocket
|
004D5A02 8B8390030000 mov eax, [ebx+$0390]
* Reference to: ScktComp.TAbstractSocket.SetHost(TAbstractSocket;AnsiString);
|
004D5A08 E8DF72FBFF call 0048CCEC
004D5A0D 8B3590D34D00 mov esi, [$004DD390]
004D5A13 66C7061300 mov word ptr [esi], $0013
004D5A18 C6460201 mov byte ptr [esi+$02], $01
004D5A1C 8D8548FDFFFF lea eax, [ebp+$FFFFFD48]
|
004D5A22 E85DFBFFFF call 004D5584
004D5A27 8B9548FDFFFF mov edx, [ebp+$FFFFFD48]
004D5A2D 8D854CFDFFFF lea eax, [ebp+$FFFFFD4C]
004D5A33 B9FF000000 mov ecx, $000000FF
* Reference to: System.@LStrToString;
|
004D5A38 E8EFEAF2FF call 0040452C
004D5A3D 8D954CFDFFFF lea edx, [ebp+$FFFFFD4C]
004D5A43 8D4603 lea eax, [esi+$03]
004D5A46 B10F mov cl, $0F
* Reference to: System.@PStrNCpy(PShortString;PShortString;Byte);
|
004D5A48 E843D2F2FF call 00402C90
* Reference to control TMainForm.Timer1 : TTimer
|
004D5A4D 8BB340030000 mov esi, [ebx+$0340]
004D5A53 33D2 xor edx, edx
* Reference to field TTimer.OFFS_003C
|
004D5A55 8B463C mov eax, [esi+$3C]
* Possible reference to virtual method TTimer.OFFS_38
|
004D5A58 FF5638 call dword ptr [esi+$38]
* Reference to field TMainForm.DoubleBuffered : Boolean
|
004D5A5B C683F801000001 mov byte ptr [ebx+$01F8], $01
004D5A62 33C0 xor eax, eax
004D5A64 5A pop edx
004D5A65 59 pop ecx
004D5A66 59 pop ecx
004D5A67 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '_^[?]?
|
004D5A6A 68A85A4D00 push $004D5AA8
004D5A6F 8D8548FDFFFF lea eax, [ebp+$FFFFFD48]
* Reference to: System.@LStrClr(void;void);
|
004D5A75 E816E8F2FF call 00404290
004D5A7A 8D854CFEFFFF lea eax, [ebp+$FFFFFE4C]
* Reference to: System.@LStrClr(void;void);
|
004D5A80 E80BE8F2FF call 00404290
004D5A85 8D8550FEFFFF lea eax, [ebp+$FFFFFE50]
* Reference to: System.@LStrClr(void;void);
|
004D5A8B E800E8F2FF call 00404290
004D5A90 8D855CFEFFFF lea eax, [ebp+$FFFFFE5C]
004D5A96 BA03000000 mov edx, $00000003
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
004D5A9B E814E8F2FF call 004042B4
004D5AA0 C3 ret
* Reference to: System.@HandleFinally;
|
004D5AA1 E96AE1F2FF jmp 00403C10
004D5AA6 EBC7 jmp 004D5A6F
****** END
|
004D5AA8 5F pop edi
004D5AA9 5E pop esi
004D5AAA 5B pop ebx
004D5AAB 8BE5 mov esp, ebp
004D5AAD 5D pop ebp
004D5AAE C3 ret
*)
end;
procedure TMainForm.FormClose(Sender : TObject);
begin
(*
004D5CF4 53 push ebx
004D5CF5 56 push esi
004D5CF6 57 push edi
004D5CF7 55 push ebp
004D5CF8 8BD8 mov ebx, eax
* Reference to control TMainForm.ServerInfoList : TListView
|
004D5CFA 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to field TListView.Items : TListItems
|
004D5D00 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TListItems.GetCount(TListItems):Integer;
|
004D5D06 E8015DF7FF call 0044BA0C
004D5D0B 8BF8 mov edi, eax
004D5D0D 4F dec edi
004D5D0E 85FF test edi, edi
004D5D10 7C45 jl 004D5D57
004D5D12 47 inc edi
004D5D13 33F6 xor esi, esi
* Reference to control TMainForm.ServerInfoList : TListView
|
004D5D15 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to field TListView.Items : TListItems
|
004D5D1B 8B802C020000 mov eax, [eax+$022C]
004D5D21 8BD6 mov edx, esi
* Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
004D5D23 E8145DF7FF call 0044BA3C
* Reference to: ComCtrls.TListItem.GetChecked(TListItem):Boolean;
|
004D5D28 E87756F7FF call 0044B3A4
004D5D2D 50 push eax
* Reference to control TMainForm.ServerInfoList : TListView
|
004D5D2E 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to field TListView.Items : TListItems
|
004D5D34 8B802C020000 mov eax, [eax+$022C]
004D5D3A 8BD6 mov edx, esi
* Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
004D5D3C E8FB5CF7FF call 0044BA3C
* Reference to field TListItems.OFFS_0024
|
004D5D41 8B4824 mov ecx, [eax+$24]
* Possible String Reference to: 'Select'
|
004D5D44 BA545E4D00 mov edx, $004D5E54
004D5D49 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5D4E 8B28 mov ebp, [eax]
004D5D50 FF5514 call dword ptr [ebp+$14]
004D5D53 46 inc esi
004D5D54 4F dec edi
004D5D55 75BE jnz 004D5D15
* Reference to control TMainForm.GMOLCheck : TCheckBox
|
004D5D57 8B8304040000 mov eax, [ebx+$0404]
004D5D5D 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D5D5F FF92C8000000 call dword ptr [edx+$00C8]
004D5D65 50 push eax
* Possible String Reference to: 'GMOLCheck'
|
004D5D66 B9645E4D00 mov ecx, $004D5E64
* Possible String Reference to: 'Setup'
|
004D5D6B BA785E4D00 mov edx, $004D5E78
004D5D70 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5D75 8B30 mov esi, [eax]
004D5D77 FF5614 call dword ptr [esi+$14]
* Reference to control TMainForm.GMRoomCheck : TCheckBox
|
004D5D7A 8B8308040000 mov eax, [ebx+$0408]
004D5D80 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D5D82 FF92C8000000 call dword ptr [edx+$00C8]
004D5D88 50 push eax
* Possible String Reference to: 'GMRoomCheck'
|
004D5D89 B9885E4D00 mov ecx, $004D5E88
* Possible String Reference to: 'Setup'
|
004D5D8E BA785E4D00 mov edx, $004D5E78
004D5D93 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5D98 8B30 mov esi, [eax]
004D5D9A FF5614 call dword ptr [esi+$14]
* Reference to control TMainForm.SeeGMCheck : TCheckBox
|
004D5D9D 8B830C040000 mov eax, [ebx+$040C]
004D5DA3 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D5DA5 FF92C8000000 call dword ptr [edx+$00C8]
004D5DAB 50 push eax
* Possible String Reference to: 'SeeGMCheck'
|
004D5DAC B99C5E4D00 mov ecx, $004D5E9C
* Possible String Reference to: 'Setup'
|
004D5DB1 BA785E4D00 mov edx, $004D5E78
004D5DB6 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5DBB 8B30 mov esi, [eax]
004D5DBD FF5614 call dword ptr [esi+$14]
* Reference to control TMainForm.FHCheck : TCheckBox
|
004D5DC0 8B8310040000 mov eax, [ebx+$0410]
004D5DC6 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D5DC8 FF92C8000000 call dword ptr [edx+$00C8]
004D5DCE 50 push eax
* Possible String Reference to: 'FHCheck'
|
004D5DCF B9B05E4D00 mov ecx, $004D5EB0
* Possible String Reference to: 'Setup'
|
004D5DD4 BA785E4D00 mov edx, $004D5E78
004D5DD9 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5DDE 8B30 mov esi, [eax]
004D5DE0 FF5614 call dword ptr [esi+$14]
* Reference to control TMainForm.UnGMCheck : TCheckBox
|
004D5DE3 8B83DC040000 mov eax, [ebx+$04DC]
004D5DE9 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D5DEB FF92C8000000 call dword ptr [edx+$00C8]
004D5DF1 50 push eax
* Possible String Reference to: 'UnGMCheck'
|
004D5DF2 B9C05E4D00 mov ecx, $004D5EC0
* Possible String Reference to: 'Setup'
|
004D5DF7 BA785E4D00 mov edx, $004D5E78
004D5DFC A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D5E01 8B30 mov esi, [eax]
004D5E03 FF5614 call dword ptr [esi+$14]
004D5E06 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
* Reference to: System.TObject.Free(TObject);
|
004D5E0B E86CD6F2FF call 0040347C
004D5E10 A1A4D44D00 mov eax, dword ptr [$004DD4A4]
* Reference to: System.TObject.Free(TObject);
|
004D5E15 E862D6F2FF call 0040347C
* Reference to GlobalVar_004DD4B0
|
004D5E1A A1B0D44D00 mov eax, dword ptr [$004DD4B0]
* Reference to: System.TObject.Free(TObject);
|
004D5E1F E858D6F2FF call 0040347C
* Reference to GlobalVar_004DD4AC
|
004D5E24 A1ACD44D00 mov eax, dword ptr [$004DD4AC]
* Reference to: System.TObject.Free(TObject);
|
004D5E29 E84ED6F2FF call 0040347C
* Reference to field TMainForm.OFFS_04E4
|
004D5E2E 8B83E4040000 mov eax, [ebx+$04E4]
004D5E34 50 push eax
|
004D5E35 E8F63BFBFF call 00489A30
004D5E3A A1C0D44D00 mov eax, dword ptr [$004DD4C0]
004D5E3F 50 push eax
|
004D5E40 E8930BF3FF call 004069D8
004D5E45 5D pop ebp
004D5E46 5F pop edi
004D5E47 5E pop esi
004D5E48 5B pop ebx
004D5E49 C3 ret
*)
end;
procedure TMainForm.ServerSocketAccept(Sender : TObject);
begin
(*
004D5F10 53 push ebx
004D5F11 56 push esi
004D5F12 83C4D8 add esp, -$28
004D5F15 8BF1 mov esi, ecx
004D5F17 8BD8 mov ebx, eax
004D5F19 8B4604 mov eax, [esi+$04]
004D5F1C 890424 mov [esp], eax
004D5F1F C644240400 mov byte ptr [esp+$04], $00
004D5F24 C7442408FFFFFFFF mov dword ptr [esp+$08], $FFFFFFFF
004D5F2C C644240C00 mov byte ptr [esp+$0C], $00
004D5F31 33C0 xor eax, eax
004D5F33 89442410 mov [esp+$10], eax
004D5F37 C64424140B mov byte ptr [esp+$14], $0B
004D5F3C C7442418FFFFFFFF mov dword ptr [esp+$18], $FFFFFFFF
004D5F44 C644241C00 mov byte ptr [esp+$1C], $00
004D5F49 33C0 xor eax, eax
004D5F4B 89442420 mov [esp+$20], eax
004D5F4F C644242400 mov byte ptr [esp+$24], $00
004D5F54 8BD4 mov edx, esp
004D5F56 B904000000 mov ecx, $00000004
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D5F5B 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to: DB.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
004D5F61 E8AA0EFDFF call 004A6E10
004D5F66 83C428 add esp, +$28
004D5F69 5E pop esi
004D5F6A 5B pop ebx
004D5F6B C3 ret
*)
end;
procedure TMainForm.Timer1Timer(Sender : TObject);
begin
(*
004D5F6C 55 push ebp
004D5F6D 8BEC mov ebp, esp
004D5F6F 83C4F0 add esp, -$10
004D5F72 53 push ebx
004D5F73 56 push esi
004D5F74 33C9 xor ecx, ecx
004D5F76 894DF0 mov [ebp-$10], ecx
004D5F79 894DFC mov [ebp-$04], ecx
004D5F7C 8BD8 mov ebx, eax
004D5F7E 33C0 xor eax, eax
004D5F80 55 push ebp
004D5F81 68B7604D00 push $004D60B7
***** TRY
|
004D5F86 64FF30 push dword ptr fs:[eax]
004D5F89 648920 mov fs:[eax], esp
004D5F8C 803DBCD44D0000 cmp byte ptr [$004DD4BC], $00
004D5F93 7419 jz 004D5FAE
004D5F95 B201 mov dl, $01
* Reference to control TMainForm.ISeeBtn : TButton
|
004D5F97 8B8314040000 mov eax, [ebx+$0414]
004D5F9D 8B08 mov ecx, [eax]
* Reference to method TButton.SetEnabled(Boolean)
|
004D5F9F FF5164 call dword ptr [ecx+$64]
004D5FA2 6A50 push $50
004D5FA4 68C4090000 push $000009C4
|
004D5FA9 E87209F3FF call 00406920
|
004D5FAE E8E50AF3FF call 00406A98
004D5FB3 8BF0 mov esi, eax
004D5FB5 8BC6 mov eax, esi
004D5FB7 2B05B4D44D00 sub eax, dword ptr [$004DD4B4]
004D5FBD 3D88130000 cmp eax, $00001388
004D5FC2 761B jbe 004D5FDF
004D5FC4 A190D34D00 mov eax, dword ptr [$004DD390]
004D5FC9 0FB708 movzx ecx, word ptr [eax]
004D5FCC 8B1590D34D00 mov edx, [$004DD390]
004D5FD2 8BC3 mov eax, ebx
|
004D5FD4 E8F3FEFFFF call 004D5ECC
004D5FD9 8935B4D44D00 mov [$004DD4B4], esi
* Reference to control TMainForm.ServerSocket : TServerSocket
|
004D5FDF 8B833C030000 mov eax, [ebx+$033C]
* Reference to field TServerSocket.Socket : TServerWinSocket
|
004D5FE5 8B8090000000 mov eax, [eax+$0090]
* Reference to: ScktComp.TServerWinSocket.GetActiveConnections(TServerWinSocket):Integer;
|
004D5FEB E85862FBFF call 0048C248
004D5FF0 3B0550B74D00 cmp eax, [$004DB750]
004D5FF6 7455 jz 004D604D
* Reference to control TMainForm.ServerSocket : TServerSocket
|
004D5FF8 8B833C030000 mov eax, [ebx+$033C]
* Reference to field TServerSocket.Socket : TServerWinSocket
|
004D5FFE 8B8090000000 mov eax, [eax+$0090]
* Reference to: ScktComp.TServerWinSocket.GetActiveConnections(TServerWinSocket):Integer;
|
004D6004 E83F62FBFF call 0048C248
004D6009 A350B74D00 mov dword ptr [$004DB750], eax
004D600E 8D45FC lea eax, [ebp-$04]
004D6011 50 push eax
004D6012 A150B74D00 mov eax, dword ptr [$004DB750]
004D6017 8945F4 mov [ebp-$0C], eax
004D601A C645F800 mov byte ptr [ebp-$08], $00
004D601E 8D55F4 lea edx, [ebp-$0C]
004D6021 33C9 xor ecx, ecx
* Possible String Reference to: '共 %D 台机器'
|
004D6023 B8CC604D00 mov eax, $004D60CC
|
004D6028 E89B3CF3FF call 00409CC8
004D602D 8B45FC mov eax, [ebp-$04]
004D6030 50 push eax
* Reference to control TMainForm.SBar : TStatusBar
|
004D6031 8B8338030000 mov eax, [ebx+$0338]
* Reference to field TStatusBar.Panels : TStatusPanels
|
004D6037 8B8008020000 mov eax, [eax+$0208]
004D603D BA06000000 mov edx, $00000006
* Reference to: ComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel;
| or: QComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel;
|
004D6042 E83939F7FF call 00449980
004D6047 5A pop edx
* Reference to: ComCtrls.TStatusPanel.SetText(TStatusPanel;AnsiString);
| or: ComCtrls.THeaderSection.SetText(THeaderSection;AnsiString);
|
004D6048 E88F38F7FF call 004498DC
* Reference to control TMainForm.Timer1 : TTimer
|
004D604D 8B8340030000 mov eax, [ebx+$0340]
004D6053 FF400C inc dword ptr [eax+$0C]
* Reference to control TMainForm.Timer1 : TTimer
|
004D6056 8B8340030000 mov eax, [ebx+$0340]
* Reference to field TTimer.Tag : Longint
|
004D605C 83780C0F cmp dword ptr [eax+$0C], +$0F
004D6060 7E37 jle 004D6099
* Reference to control TMainForm.ClientSocket : TClientSocket
|
004D6062 8BB390030000 mov esi, [ebx+$0390]
* Reference to field TClientSocket.Active : Boolean
|
004D6068 807E3000 cmp byte ptr [esi+$30], $00
004D606C 7420 jz 004D608E
004D606E B864000000 mov eax, $00000064
|
004D6073 E848CDF2FF call 00402DC0
004D6078 8D55F0 lea edx, [ebp-$10]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D607B E8BC2CF3FF call 00408D3C
004D6080 8B55F0 mov edx, [ebp-$10]
* Reference to field TClientSocket.Socket : TClientWinSocket
|
004D6083 8B8690000000 mov eax, [esi+$0090]
* Reference to: ScktComp.TCustomWinSocket.SendText(TCustomWinSocket;AnsiString):Integer;
|
004D6089 E8FE56FBFF call 0048B78C
* Reference to control TMainForm.Timer1 : TTimer
|
004D608E 8B8340030000 mov eax, [ebx+$0340]
004D6094 33D2 xor edx, edx
* Reference to field TTimer.Tag : Longint
|
004D6096 89500C mov [eax+$0C], edx
004D6099 33C0 xor eax, eax
004D609B 5A pop edx
004D609C 59 pop ecx
004D609D 59 pop ecx
004D609E 648910 mov fs:[eax], edx
****** FINALLY
|
004D60A1 68BE604D00 push $004D60BE
004D60A6 8D45F0 lea eax, [ebp-$10]
* Reference to: System.@LStrClr(void;void);
|
004D60A9 E8E2E1F2FF call 00404290
004D60AE 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D60B1 E8DAE1F2FF call 00404290
004D60B6 C3 ret
* Reference to: System.@HandleFinally;
|
004D60B7 E954DBF2FF jmp 00403C10
004D60BC EBE8 jmp 004D60A6
****** END
|
004D60BE 5E pop esi
004D60BF 5B pop ebx
004D60C0 8BE5 mov esp, ebp
004D60C2 5D pop ebp
004D60C3 C3 ret
*)
end;
procedure TMainForm.ServerSocketClientDisconnect(Sender : TObject);
begin
(*
004D60DC 55 push ebp
004D60DD 8BEC mov ebp, esp
004D60DF 6A00 push $00
004D60E1 6A00 push $00
004D60E3 6A00 push $00
004D60E5 6A00 push $00
004D60E7 53 push ebx
004D60E8 56 push esi
004D60E9 8BF1 mov esi, ecx
004D60EB 8BD8 mov ebx, eax
004D60ED 33C0 xor eax, eax
004D60EF 55 push ebp
* Possible String Reference to: '轷隍?疝[?]?
|
004D60F0 6896614D00 push $004D6196
***** TRY
|
004D60F5 64FF30 push dword ptr fs:[eax]
004D60F8 648920 mov fs:[eax], esp
004D60FB A0A4614D00 mov al, byte ptr [$004D61A4]
004D6100 50 push eax
004D6101 8D45F0 lea eax, [ebp-$10]
004D6104 8B5604 mov edx, [esi+$04]
004D6107 B1FC mov cl, $FC
|
004D6109 E82EEAF3FF call 00414B3C
004D610E 8D4DF0 lea ecx, [ebp-$10]
* Possible String Reference to: 'Sock'
|
004D6111 BAB0614D00 mov edx, $004D61B0
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6116 8B83A0030000 mov eax, [ebx+$03A0]
004D611C 8B30 mov esi, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0244
|
004D611E FF9644020000 call dword ptr [esi+$0244]
004D6124 84C0 test al, al
004D6126 7458 jz 004D6180
* Possible String Reference to: 'SvrID'
|
004D6128 BAC0614D00 mov edx, $004D61C0
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D612D 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6133 E8D4EEFCFF call 004A500C
004D6138 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D613A FF5258 call dword ptr [edx+$58]
004D613D 85C0 test eax, eax
004D613F 7E34 jle 004D6175
004D6141 8D0440 lea eax, [eax+eax*2]
004D6144 8D34458ED34D00 lea esi, [$4DD38E+eax*2]
004D614B 66FF0E dec word ptr [esi]
* Possible String Reference to: 'Gold'
|
004D614E BAD0614D00 mov edx, $004D61D0
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6153 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6159 E8AEEEFCFF call 004A500C
004D615E 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D6160 FF5258 call dword ptr [edx+$58]
004D6163 294602 sub dword ptr [esi+$02], eax
* Reference to field TMainForm.OFFS_04E0
|
004D6166 8B93E0040000 mov edx, [ebx+$04E0]
004D616C 2BD0 sub edx, eax
004D616E 8BC3 mov eax, ebx
|
004D6170 E813120000 call 004D7388
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6175 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to: DB.TDataSet.Delete(TDataSet);
|
004D617B E84409FDFF call 004A6AC4
004D6180 33C0 xor eax, eax
004D6182 5A pop edx
004D6183 59 pop ecx
004D6184 59 pop ecx
004D6185 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[?]?
|
004D6188 689D614D00 push $004D619D
004D618D 8D45F0 lea eax, [ebp-$10]
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
004D6190 E8B3A5F3FF call 00410748
004D6195 C3 ret
* Reference to: System.@HandleFinally;
|
004D6196 E975DAF2FF jmp 00403C10
004D619B EBF0 jmp 004D618D
****** END
|
004D619D 5E pop esi
004D619E 5B pop ebx
004D619F 8BE5 mov esp, ebp
004D61A1 5D pop ebp
004D61A2 C3 ret
*)
end;
procedure TMainForm.ServerSocketClientRead(Sender : TObject);
begin
(*
004D61D8 55 push ebp
004D61D9 8BEC mov ebp, esp
004D61DB 51 push ecx
004D61DC B907000000 mov ecx, $00000007
004D61E1 6A00 push $00
004D61E3 6A00 push $00
004D61E5 49 dec ecx
004D61E6 75F9 jnz 004D61E1
004D61E8 51 push ecx
004D61E9 874DFC xchg [ebp-$04], ecx
004D61EC 53 push ebx
004D61ED 56 push esi
004D61EE 57 push edi
004D61EF 894DF8 mov [ebp-$08], ecx
004D61F2 8945FC mov [ebp-$04], eax
004D61F5 33C0 xor eax, eax
004D61F7 55 push ebp
* Possible String Reference to: '槟则?剡^[?]?
|
004D61F8 68C7674D00 push $004D67C7
***** TRY
|
004D61FD 64FF30 push dword ptr fs:[eax]
004D6200 648920 mov fs:[eax], esp
004D6203 8B45F8 mov eax, [ebp-$08]
* Reference to: ComCtrls.THeaderSections.Add(THeaderSections):THeaderSection;
| or: ComCtrls.TListItems.Add(TListItems):TListItem;
| or: ScktComp.TCustomWinSocket.ReceiveLength(TCustomWinSocket):Integer;
|
004D6206 E8615AFBFF call 0048BC6C
004D620B 8BD8 mov ebx, eax
004D620D 85DB test ebx, ebx
004D620F 0F8484050000 jz 004D6799
004D6215 8BC3 mov eax, ebx
* Reference to: SysUtils.AllocMem(Cardinal):Pointer;
|
004D6217 E87424F3FF call 00408690
004D621C 8945EC mov [ebp-$14], eax
004D621F 8B45EC mov eax, [ebp-$14]
004D6222 8945E8 mov [ebp-$18], eax
004D6225 8B55EC mov edx, [ebp-$14]
004D6228 8BCB mov ecx, ebx
004D622A 8B45F8 mov eax, [ebp-$08]
* Reference to: ScktComp.TCustomWinSocket.ReceiveBuf(TCustomWinSocket;void;void;Integer):Integer;
|
004D622D E8CE58FBFF call 0048BB00
004D6232 895DF0 mov [ebp-$10], ebx
004D6235 8B7DEC mov edi, [ebp-$14]
004D6238 0FB71F movzx ebx, word ptr [edi]
004D623B 33C0 xor eax, eax
004D623D 8A4702 mov al, byte ptr [edi+$02]
004D6240 83C0FA add eax, -$06
004D6243 83F80C cmp eax, +$0C
004D6246 0F8743050000 jnbe 004D678F
004D624C 8A8059624D00 mov al, byte ptr [eax+$4D6259]
004D6252 FF248566624D00 jmp dword ptr [$4D6266+eax*4]
004D6259 0102 add [edx], eax
004D625B 0000 add [eax], al
004D625D 0000 add [eax], al
004D625F 0000 add [eax], al
004D6261 0003 add [ebx], al
004D6263 0500048F67 add eax, +$678F0400
004D6268 4D dec ebp
004D6269 007E62 add [esi+$62], bh
004D626C 4D dec ebp
004D626D 007F64 add [edi+$64], bh
004D6270 4D dec ebp
004D6271 00B5654D000B add [ebp+$B004D65], dh
004D6277 664D dec bp
004D6279 005566 add [ebp+$66], dl
004D627C 4D dec ebp
004D627D 0083FB1B0F85 add [ebx+$850F1BFB], al
004D6283 120500008BDF adc al, byte ptr [$DF8B0000]
004D6289 836B0364 sub dword ptr [ebx+$03], +$64
004D628D 817B0300100000 cmp dword ptr [ebx+$03], $00001000
004D6294 0F9545E7 setnz byte ptr [ebp-$19]
004D6298 A0D8674D00 mov al, byte ptr [$004D67D8]
004D629D 50 push eax
004D629E 8D45D4 lea eax, [ebp-$2C]
004D62A1 8B55F8 mov edx, [ebp-$08]
004D62A4 8B5204 mov edx, [edx+$04]
004D62A7 B1FC mov cl, $FC
|
004D62A9 E88EE8F3FF call 00414B3C
004D62AE 8D4DD4 lea ecx, [ebp-$2C]
* Reference to MainForm
|
004D62B1 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D62B4 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'Sock'
|
004D62BA BAE4674D00 mov edx, $004D67E4
004D62BF 8B30 mov esi, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0244
|
004D62C1 FF9644020000 call dword ptr [esi+$0244]
004D62C7 84C0 test al, al
004D62C9 7479 jz 004D6344
004D62CB 33C0 xor eax, eax
004D62CD 8A4314 mov al, byte ptr [ebx+$14]
004D62D0 8D0440 lea eax, [eax+eax*2]
004D62D3 8D34458ED34D00 lea esi, [$4DD38E+eax*2]
* Reference to MainForm
|
004D62DA 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D62DD 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'SvrID'
|
004D62E3 BAF4674D00 mov edx, $004D67F4
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D62E8 E81FEDFCFF call 004A500C
004D62ED 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D62EF FF5258 call dword ptr [edx+$58]
004D62F2 85C0 test eax, eax
004D62F4 7D03 jnl 004D62F9
004D62F6 66FF06 inc word ptr [esi]
* Reference to MainForm
|
004D62F9 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D62FC 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'Gold'
|
004D6302 BA04684D00 mov edx, $004D6804
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6307 E800EDFCFF call 004A500C
004D630C 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D630E FF5258 call dword ptr [edx+$58]
004D6311 8BF8 mov edi, eax
004D6313 8B4602 mov eax, [esi+$02]
004D6316 2BC7 sub eax, edi
004D6318 034317 add eax, [ebx+$17]
004D631B 894602 mov [esi+$02], eax
* Reference to MainForm
|
004D631E 8B45FC mov eax, [ebp-$04]
* Reference to field TMainForm.OFFS_04E0
|
004D6321 8B90E0040000 mov edx, [eax+$04E0]
004D6327 2BD7 sub edx, edi
004D6329 035317 add edx, [ebx+$17]
* Reference to MainForm
|
004D632C 8B45FC mov eax, [ebp-$04]
|
004D632F E854100000 call 004D7388
* Reference to MainForm
|
004D6334 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6337 8B80A0030000 mov eax, [eax+$03A0]
* Reference to: DB.TDataSet.Edit(TDataSet);
|
004D633D E84A04FDFF call 004A678C
004D6342 EB3A jmp 004D637E
004D6344 33C0 xor eax, eax
004D6346 8A4314 mov al, byte ptr [ebx+$14]
004D6349 8D0440 lea eax, [eax+eax*2]
004D634C 8D04458ED34D00 lea eax, [$4DD38E+eax*2]
004D6353 66FF00 inc word ptr [eax]
004D6356 8B5317 mov edx, [ebx+$17]
004D6359 015002 add [eax+$02], edx
* Reference to MainForm
|
004D635C 8B45FC mov eax, [ebp-$04]
* Reference to field TMainForm.OFFS_04E0
|
004D635F 8B90E0040000 mov edx, [eax+$04E0]
004D6365 035317 add edx, [ebx+$17]
* Reference to MainForm
|
004D6368 8B45FC mov eax, [ebp-$04]
|
004D636B E818100000 call 004D7388
* Reference to MainForm
|
004D6370 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6373 8B80A0030000 mov eax, [eax+$03A0]
* Reference to: DB.TDataSet.Append(TDataSet);
|
004D6379 E85205FDFF call 004A68D0
* Reference to MainForm
|
004D637E 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6381 8BB0A0030000 mov esi, [eax+$03A0]
* Possible String Reference to: 'Sock'
|
004D6387 BAE4674D00 mov edx, $004D67E4
004D638C 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D638E E879ECFCFF call 004A500C
004D6393 8B55F8 mov edx, [ebp-$08]
004D6396 8B5204 mov edx, [edx+$04]
004D6399 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D639B FF91A8000000 call dword ptr [ecx+$00A8]
* Possible String Reference to: 'SvrID'
|
004D63A1 BAF4674D00 mov edx, $004D67F4
004D63A6 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D63A8 E85FECFCFF call 004A500C
004D63AD 33D2 xor edx, edx
004D63AF 8A5314 mov dl, byte ptr [ebx+$14]
004D63B2 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D63B4 FF91A8000000 call dword ptr [ecx+$00A8]
* Possible String Reference to: 'GameID'
|
004D63BA BA14684D00 mov edx, $004D6814
004D63BF 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D63C1 E846ECFCFF call 004A500C
004D63C6 50 push eax
004D63C7 8D45D0 lea eax, [ebp-$30]
004D63CA 8D5307 lea edx, [ebx+$07]
* Reference to: System.@LStrFromString(String;String;ShortString;ShortString);
| or: System.@WStrFromString(WideString;WideString;ShortString;ShortString);
|
004D63CD E822E1F2FF call 004044F4
004D63D2 8B55D0 mov edx, [ebp-$30]
004D63D5 58 pop eax
004D63D6 8B08 mov ecx, [eax]
004D63D8 FF91B0000000 call dword ptr [ecx+$00B0]
* Possible String Reference to: 'Gold'
|
004D63DE BA04684D00 mov edx, $004D6804
004D63E3 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D63E5 E822ECFCFF call 004A500C
004D63EA 8B5317 mov edx, [ebx+$17]
004D63ED 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D63EF FF91A8000000 call dword ptr [ecx+$00A8]
* Possible String Reference to: 'MapID'
|
004D63F5 BA24684D00 mov edx, $004D6824
004D63FA 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D63FC E80BECFCFF call 004A500C
004D6401 0FB75315 movzx edx, word ptr [ebx+$15]
004D6405 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D6407 FF91A8000000 call dword ptr [ecx+$00A8]
004D640D 807DE700 cmp byte ptr [ebp-$19], $00
004D6411 7428 jz 004D643B
* Possible String Reference to: 'ErrCount'
|
004D6413 BA34684D00 mov edx, $004D6834
004D6418 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D641A E8EDEBFCFF call 004A500C
004D641F 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D6421 FF5258 call dword ptr [edx+$58]
004D6424 40 inc eax
004D6425 50 push eax
* Possible String Reference to: 'ErrCount'
|
004D6426 BA34684D00 mov edx, $004D6834
004D642B 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D642D E8DAEBFCFF call 004A500C
004D6432 5A pop edx
004D6433 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D6435 FF91A8000000 call dword ptr [ecx+$00A8]
004D643B 8BC6 mov eax, esi
004D643D 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_024C
|
004D643F FF924C020000 call dword ptr [edx+$024C]
* Possible String Reference to: 'ErrCount'
|
004D6445 BA34684D00 mov edx, $004D6834
004D644A 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D644C E8BBEBFCFF call 004A500C
004D6451 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D6453 FF5258 call dword ptr [edx+$58]
004D6456 83F864 cmp eax, +$64
004D6459 7E12 jle 004D646D
004D645B 6AFF push $FF
004D645D 8B45F8 mov eax, [ebp-$08]
004D6460 8B4804 mov ecx, [eax+$04]
004D6463 B20B mov dl, $0B
* Reference to MainForm
|
004D6465 8B45FC mov eax, [ebp-$04]
|
004D6468 E803050000 call 004D6970
004D646D 33D2 xor edx, edx
004D646F 8A5314 mov dl, byte ptr [ebx+$14]
* Reference to MainForm
|
004D6472 8B45FC mov eax, [ebp-$04]
* Reference to : TMainForm._PROC_004D77C4()
|
004D6475 E84A130000 call 004D77C4
004D647A E910030000 jmp 004D678F
004D647F 83FB07 cmp ebx, +$07
004D6482 0F8511030000 jnz 004D6799
004D6488 A0D8674D00 mov al, byte ptr [$004D67D8]
004D648D 50 push eax
004D648E 8D45C0 lea eax, [ebp-$40]
004D6491 8B55F8 mov edx, [ebp-$08]
004D6494 8B5204 mov edx, [edx+$04]
004D6497 B1FC mov cl, $FC
|
004D6499 E89EE6F3FF call 00414B3C
004D649E 8D4DC0 lea ecx, [ebp-$40]
* Reference to MainForm
|
004D64A1 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D64A4 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'Sock'
|
004D64AA BAE4674D00 mov edx, $004D67E4
004D64AF 8B18 mov ebx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0244
|
004D64B1 FF9344020000 call dword ptr [ebx+$0244]
004D64B7 84C0 test al, al
004D64B9 0F84D0020000 jz 004D678F
* Reference to MainForm
|
004D64BF 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D64C2 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'SvrId'
|
004D64C8 BA48684D00 mov edx, $004D6848
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D64CD E83AEBFCFF call 004A500C
004D64D2 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D64D4 FF5258 call dword ptr [edx+$58]
004D64D7 8BF8 mov edi, eax
004D64D9 8D047F lea eax, [edi+edi*2]
004D64DC 8D1C458ED34D00 lea ebx, [$4DD38E+eax*2]
004D64E3 66FF0B dec word ptr [ebx]
* Reference to MainForm
|
004D64E6 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D64E9 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'Gold'
|
004D64EF BA04684D00 mov edx, $004D6804
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D64F4 E813EBFCFF call 004A500C
004D64F9 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D64FB FF5258 call dword ptr [edx+$58]
004D64FE 8BF8 mov edi, eax
004D6500 297B02 sub dword ptr [ebx+$02], edi
* Reference to MainForm
|
004D6503 8B45FC mov eax, [ebp-$04]
* Reference to field TMainForm.OFFS_04E0
|
004D6506 8B90E0040000 mov edx, [eax+$04E0]
004D650C 2BD7 sub edx, edi
* Reference to MainForm
|
004D650E 8B45FC mov eax, [ebp-$04]
|
004D6511 E8720E0000 call 004D7388
* Reference to MainForm
|
004D6516 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6519 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'SvrId'
|
004D651F BA48684D00 mov edx, $004D6848
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6524 E8E3EAFCFF call 004A500C
004D6529 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_58
|
004D652B FF5258 call dword ptr [edx+$58]
004D652E 8BD0 mov edx, eax
* Reference to MainForm
|
004D6530 8B45FC mov eax, [ebp-$04]
* Reference to : TMainForm._PROC_004D77C4()
|
004D6533 E88C120000 call 004D77C4
* Reference to MainForm
|
004D6538 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D653B 8B80A0030000 mov eax, [eax+$03A0]
* Reference to: DB.TDataSet.Edit(TDataSet);
|
004D6541 E84602FDFF call 004A678C
* Reference to MainForm
|
004D6546 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6549 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'SvrID'
|
004D654F BAF4674D00 mov edx, $004D67F4
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6554 E8B3EAFCFF call 004A500C
004D6559 83CAFF or edx, -$01
004D655C 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D655E FF91A8000000 call dword ptr [ecx+$00A8]
* Reference to MainForm
|
004D6564 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6567 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'Gold'
|
004D656D BA04684D00 mov edx, $004D6804
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D6572 E895EAFCFF call 004A500C
004D6577 33D2 xor edx, edx
004D6579 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D657B FF91A8000000 call dword ptr [ecx+$00A8]
* Reference to MainForm
|
004D6581 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D6584 8B80A0030000 mov eax, [eax+$03A0]
* Possible String Reference to: 'MapID'
|
004D658A BA24684D00 mov edx, $004D6824
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004D658F E878EAFCFF call 004A500C
004D6594 83CAFF or edx, -$01
004D6597 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_00A8
|
004D6599 FF91A8000000 call dword ptr [ecx+$00A8]
* Reference to MainForm
|
004D659F 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D65A2 8B80A0030000 mov eax, [eax+$03A0]
004D65A8 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_024C
|
004D65AA FF924C020000 call dword ptr [edx+$024C]
004D65B0 E9DA010000 jmp 004D678F
004D65B5 83FB19 cmp ebx, +$19
004D65B8 0F85DB010000 jnz 004D6799
* Reference to pointer to GlobalVar_004DCE60
|
004D65BE A164B94D00 mov eax, dword ptr [$004DB964]
004D65C3 833800 cmp dword ptr [eax], +$00
004D65C6 0F84C3010000 jz 004D678F
004D65CC 8D45F4 lea eax, [ebp-$0C]
004D65CF 8D5707 lea edx, [edi+$07]
* Reference to: System.@LStrFromString(String;String;ShortString;ShortString);
| or: System.@WStrFromString(WideString;WideString;ShortString;ShortString);
|
004D65D2 E81DDFF2FF call 004044F4
* Reference to pointer to GlobalVar_004DCE60
|
004D65D7 A164B94D00 mov eax, dword ptr [$004DB964]
004D65DC 8B00 mov eax, [eax]
* Reference to control GMROOMRadio : N.A.
|
004D65DE 8B80F8020000 mov eax, [eax+$02F8]
* Reference to field N.A..OFFS_0218
|
004D65E4 8B9818020000 mov ebx, [eax+$0218]
004D65EA 8B55F4 mov edx, [ebp-$0C]
004D65ED 8BC3 mov eax, ebx
004D65EF 8B08 mov ecx, [eax]
004D65F1 FF5154 call dword ptr [ecx+$54]
004D65F4 85C0 test eax, eax
004D65F6 0F8D93010000 jnl 004D678F
004D65FC 8B55F4 mov edx, [ebp-$0C]
004D65FF 8BC3 mov eax, ebx
* Reference to: Classes.TStrings.Append(TStrings;AnsiString);
| or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries);
|
004D6601 E88689F4FF call 0041EF8C
004D6606 E984010000 jmp 004D678F
004D660B 8D55F4 lea edx, [ebp-$0C]
004D660E 8B45E8 mov eax, [ebp-$18]
004D6611 83C007 add eax, +$07
* Reference to: Dialogs.FixFileName(AnsiString):AnsiString;
| or: SysUtils.StrPas(PChar):AnsiString;
|
004D6614 E8BF31F3FF call 004097D8
* Reference to MainForm
|
004D6619 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.GameMessList : TListBox
|
004D661C 8B801C040000 mov eax, [eax+$041C]
* Reference to field TListBox.Items : TStrings
|
004D6622 8B8018020000 mov eax, [eax+$0218]
004D6628 8B55F4 mov edx, [ebp-$0C]
* Reference to: Classes.TStrings.Append(TStrings;AnsiString);
|
004D662B E85C89F4FF call 0041EF8C
* Reference to MainForm
|
004D6630 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.GameMessList : TListBox
|
004D6633 8B981C040000 mov ebx, [eax+$041C]
004D6639 8BC3 mov eax, ebx
004D663B 8B10 mov edx, [eax]
* Possible reference to virtual method TListBox.OFFS_00C8
|
004D663D FF92C8000000 call dword ptr [edx+$00C8]
004D6643 8BD0 mov edx, eax
004D6645 4A dec edx
004D6646 8BC3 mov eax, ebx
004D6648 8B08 mov ecx, [eax]
* Reference to method TListBox.ItemIndex()
|
004D664A FF91D0000000 call dword ptr [ecx+$00D0]
004D6650 E93A010000 jmp 004D678F
004D6655 8D45EC lea eax, [ebp-$14]
004D6658 8BD3 mov edx, ebx
* Reference to: System.@ReallocMem(Pointer;Pointer;Integer):Pointer;
|
004D665A E869C1F2FF call 004027C8
004D665F 8B45EC mov eax, [ebp-$14]
004D6662 8945E8 mov [ebp-$18], eax
004D6665 33C0 xor eax, eax
004D6667 55 push ebp
004D6668 6868674D00 push $004D6768
***** TRY
|
004D666D 64FF30 push dword ptr fs:[eax]
004D6670 648920 mov fs:[eax], esp
004D6673 8BFB mov edi, ebx
004D6675 2B7DF0 sub edi, dword ptr [ebp-$10]
004D6678 8B75F0 mov esi, [ebp-$10]
004D667B 85FF test edi, edi
004D667D 7E38 jle 004D66B7
004D667F 6A00 push $00
004D6681 57 push edi
004D6682 8B45E8 mov eax, [ebp-$18]
004D6685 33D2 xor edx, edx
004D6687 52 push edx
004D6688 50 push eax
004D6689 8BC6 mov eax, esi
004D668B 99 cdq
004D668C 030424 add eax, [esp]
004D668F 13542404 adc edx, [esp+$04]
004D6693 83C408 add esp, +$08
004D6696 50 push eax
004D6697 8B45F8 mov eax, [ebp-$08]
004D669A 8B4004 mov eax, [eax+$04]
004D669D 50 push eax
|
004D669E E8D533FBFF call 00489A78
004D66A3 8BD8 mov ebx, eax
004D66A5 85DB test ebx, ebx
004D66A7 7F06 jnle 004D66AF
004D66A9 85F6 test esi, esi
004D66AB 7F0A jnle 004D66B7
004D66AD EBD0 jmp 004D667F
004D66AF 03F3 add esi, ebx
004D66B1 2BFB sub edi, ebx
004D66B3 85FF test edi, edi
004D66B5 7FC8 jnle 004D667F
004D66B7 85F6 test esi, esi
004D66B9 750D jnz 004D66C8
004D66BB 33C0 xor eax, eax
004D66BD 5A pop edx
004D66BE 59 pop ecx
004D66BF 59 pop ecx
004D66C0 648910 mov fs:[eax], edx
004D66C3 E9D1000000 jmp 004D6799
004D66C8 A1A4D44D00 mov eax, dword ptr [$004DD4A4]
* Reference to: Classes.TMemoryStream.Clear(TMemoryStream);
|
004D66CD E862A5F4FF call 00420C34
004D66D2 8B55E8 mov edx, [ebp-$18]
004D66D5 83C207 add edx, +$07
004D66D8 8BCE mov ecx, esi
004D66DA A1A4D44D00 mov eax, dword ptr [$004DD4A4]
* Reference to: Classes.TStream.WriteBuffer(TStream;void;void;Longint);
|
004D66DF E840A0F4FF call 00420724
004D66E4 6A00 push $00
004D66E6 6A00 push $00
004D66E8 A1A4D44D00 mov eax, dword ptr [$004DD4A4]
|
004D66ED E8EE9DF4FF call 004204E0
* Reference to GlobalVar_004DD4B0
|
004D66F2 A1B0D44D00 mov eax, dword ptr [$004DD4B0]
|
004D66F7 E88833FFFF call 004C9A84
004D66FC 8B15A4D44D00 mov edx, [$004DD4A4]
* Reference to GlobalVar_004DD4B0
|
004D6702 A1B0D44D00 mov eax, dword ptr [$004DD4B0]
004D6707 8B08 mov ecx, [eax]
* Possible reference to virtual method TGlobalVar_004DD4B0.OFFS_54
|
004D6709 FF5154 call dword ptr [ecx+$54]
* Reference to GlobalVar_004DD4B0
|
004D670C A1B0D44D00 mov eax, dword ptr [$004DD4B0]
004D6711 50 push eax
* Reference to GlobalVar_004DD4AC
|
004D6712 A1ACD44D00 mov eax, dword ptr [$004DD4AC]
* Reference to: Graphics.TBitmap.GetCanvas(TBitmap):TCanvas;
|
004D6717 E8AC8CF5FF call 0042F3C8
004D671C 33D2 xor edx, edx
004D671E 8A15A8D44D00 mov dl, byte ptr [$004DD4A8]
004D6724 C1E206 shl edx, $06
004D6727 33C9 xor ecx, ecx
* Reference to: Graphics.TCanvas.Draw(TCanvas;Integer;Integer;TGraphic);
|
004D6729 E88241F5FF call 0042A8B0
004D672E FE05A8D44D00 inc byte ptr [$004DD4A8]
004D6734 803DA8D44D000F cmp byte ptr [$004DD4A8], $0F
004D673B 7621 jbe 004D675E
004D673D C605A8D44D0000 mov byte ptr [$004DD4A8], $00
* Reference to MainForm
|
004D6744 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.Image1 : TImage
|
004D6747 8B80E0030000 mov eax, [eax+$03E0]
* Reference to field TImage.Picture : TPicture
|
004D674D 8B8068010000 mov eax, [eax+$0168]
* Reference to GlobalVar_004DD4AC
|
004D6753 8B15ACD44D00 mov edx, [$004DD4AC]
004D6759 8B08 mov ecx, [eax]
* Reference to method TPicture.Assign(TPersistent)
|
004D675B FF5108 call dword ptr [ecx+$08]
004D675E 33C0 xor eax, eax
004D6760 5A pop edx
004D6761 59 pop ecx
004D6762 59 pop ecx
004D6763 648910 mov fs:[eax], edx
004D6766 EB0A jmp 004D6772
* Reference to: System.@HandleAnyException;
|
004D6768 E9EFD1F2FF jmp 0040395C
* Reference to: System.@DoneExcept;
|
004D676D E852D5F2FF call 00403CC4
****** END
|
* Reference to MainForm
|
004D6772 8B45FC mov eax, [ebp-$04]
* Reference to control TMainForm.ScrPanel : TPanel
|
004D6775 8B80DC030000 mov eax, [eax+$03DC]
* Reference to field TPanel.Visible : Boolean
|
004D677B 80785700 cmp byte ptr [eax+$57], $00
004D677F 740E jz 004D678F
004D6781 8B45F8 mov eax, [ebp-$08]
004D6784 8B5004 mov edx, [eax+$04]
* Reference to MainForm
|
004D6787 8B45FC mov eax, [ebp-$04]
|
004D678A E86D0D0000 call 004D74FC
004D678F 8D45EC lea eax, [ebp-$14]
004D6792 33D2 xor edx, edx
* Reference to: System.@ReallocMem(Pointer;Pointer;Integer):Pointer;
|
004D6794 E82FC0F2FF call 004027C8
004D6799 33C0 xor eax, eax
004D679B 5A pop edx
004D679C 59 pop ecx
004D679D 59 pop ecx
004D679E 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '_^[?]?
|
004D67A1 68CE674D00 push $004D67CE
004D67A6 8D45C0 lea eax, [ebp-$40]
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
004D67A9 E89A9FF3FF call 00410748
004D67AE 8D45D0 lea eax, [ebp-$30]
* Reference to: System.@LStrClr(void;void);
|
004D67B1 E8DADAF2FF call 00404290
004D67B6 8D45D4 lea eax, [ebp-$2C]
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
004D67B9 E88A9FF3FF call 00410748
004D67BE 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
004D67C1 E8CADAF2FF call 00404290
004D67C6 C3 ret
* Reference to: System.@HandleFinally;
|
004D67C7 E944D4F2FF jmp 00403C10
004D67CC EBD8 jmp 004D67A6
****** END
|
004D67CE 5F pop edi
004D67CF 5E pop esi
004D67D0 5B pop ebx
004D67D1 8BE5 mov esp, ebp
004D67D3 5D pop ebp
004D67D4 C3 ret
*)
end;
procedure TMainForm.ServerSocketClientError(Sender : TObject);
begin
(*
004D6850 55 push ebp
004D6851 8BEC mov ebp, esp
004D6853 8B4508 mov eax, [ebp+$08]
004D6856 33D2 xor edx, edx
004D6858 8910 mov [eax], edx
004D685A 8BC1 mov eax, ecx
* Reference to: ScktComp.TCustomWinSocket.Close(TCustomWinSocket);
|
004D685C E89747FBFF call 0048AFF8
004D6861 5D pop ebp
004D6862 C20800 ret $0008
*)
end;
procedure TMainForm.ToolButton9Click(Sender : TObject);
begin
(*
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
004D6868 E887E4FAFF call 00484CF4
004D686D C3 ret
*)
end;
procedure TMainForm.FormCloseQuery(Sender : TObject);
begin
(*
004D6870 55 push ebp
004D6871 8BEC mov ebp, esp
004D6873 6A00 push $00
004D6875 53 push ebx
004D6876 56 push esi
004D6877 8BF1 mov esi, ecx
004D6879 8BD8 mov ebx, eax
004D687B 33C0 xor eax, eax
004D687D 55 push ebp
004D687E 68F6684D00 push $004D68F6
***** TRY
|
004D6883 64FF30 push dword ptr fs:[eax]
004D6886 648920 mov fs:[eax], esp
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D6889 8B8374030000 mov eax, [ebx+$0374]
* Reference to field TToolButton.Down : Boolean
|
004D688F 80B86A01000000 cmp byte ptr [eax+$016A], $00
004D6896 7445 jz 004D68DD
* Reference to control TMainForm.ServerSocket : TServerSocket
|
004D6898 8B833C030000 mov eax, [ebx+$033C]
* Reference to field TServerSocket.Socket : TServerWinSocket
|
004D689E 8B8090000000 mov eax, [eax+$0090]
* Reference to: ScktComp.TServerWinSocket.GetActiveConnections(TServerWinSocket):Integer;
|
004D68A4 E89F59FBFF call 0048C248
004D68A9 85C0 test eax, eax
004D68AB 7E30 jle 004D68DD
004D68AD 6821010000 push $00000121
004D68B2 8D55FC lea edx, [ebp-$04]
004D68B5 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004D68B7 E84812F9FF call 00467B04
004D68BC 8B45FC mov eax, [ebp-$04]
* Reference to: System.@LStrToPChar(String):PAnsiChar;
|
004D68BF E88CDEF2FF call 00404750
004D68C4 50 push eax
* Possible String Reference to: '主控机正在监控，退出主控机所有子机?
| ??ケ；ぃ?啡贤顺雎穑?
|
004D68C5 6804694D00 push $004D6904
004D68CA 8BC3 mov eax, ebx
* Reference to: QForms.TCustomForm.GetClientHandle(TCustomForm):QWorkspaceH;
|
004D68CC E8677BF9FF call 0046E438
004D68D1 50 push eax
|
004D68D2 E82109F3FF call 004071F8
004D68D7 48 dec eax
004D68D8 0F9406 setz byte ptr [esi]
004D68DB EB03 jmp 004D68E0
004D68DD C60601 mov byte ptr [esi], $01
004D68E0 33C0 xor eax, eax
004D68E2 5A pop edx
004D68E3 59 pop ecx
004D68E4 59 pop ecx
004D68E5 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[Y]?
|
004D68E8 68FD684D00 push $004D68FD
004D68ED 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D68F0 E89BD9F2FF call 00404290
004D68F5 C3 ret
* Reference to: System.@HandleFinally;
|
004D68F6 E915D3F2FF jmp 00403C10
004D68FB EBF0 jmp 004D68ED
****** END
|
004D68FD 5E pop esi
004D68FE 5B pop ebx
004D68FF 59 pop ecx
004D6900 5D pop ebp
004D6901 C3 ret
*)
end;
procedure TMainForm.ToolButton6Click(Sender : TObject);
begin
(*
004D6940 53 push ebx
004D6941 8BD8 mov ebx, eax
* Possible String Reference to: '上线'
|
004D6943 B868694D00 mov eax, $004D6968
|
004D6948 E85FEBFFFF call 004D54AC
004D694D 84C0 test al, al
004D694F 740D jz 004D695E
004D6951 6AFF push $FF
004D6953 33C9 xor ecx, ecx
004D6955 B208 mov dl, $08
004D6957 8BC3 mov eax, ebx
|
004D6959 E812000000 call 004D6970
004D695E 5B pop ebx
004D695F C3 ret
*)
end;
procedure TMainForm.ToolButton11Click(Sender : TObject);
begin
(*
004D69B0 53 push ebx
004D69B1 8BD8 mov ebx, eax
* Possible String Reference to: '更新挑战天堂'
|
004D69B3 B8D8694D00 mov eax, $004D69D8
|
004D69B8 E8EFEAFFFF call 004D54AC
004D69BD 84C0 test al, al
004D69BF 740D jz 004D69CE
004D69C1 6AFF push $FF
004D69C3 33C9 xor ecx, ecx
004D69C5 B20C mov dl, $0C
004D69C7 8BC3 mov eax, ebx
|
004D69C9 E8A2FFFFFF call 004D6970
004D69CE 5B pop ebx
004D69CF C3 ret
*)
end;
procedure TMainForm.ToolButton5Click(Sender : TObject);
begin
(*
004D69E8 53 push ebx
004D69E9 8BD8 mov ebx, eax
* Possible String Reference to: '关闭计算机'
|
004D69EB B8106A4D00 mov eax, $004D6A10
|
004D69F0 E8B7EAFFFF call 004D54AC
004D69F5 84C0 test al, al
004D69F7 740D jz 004D6A06
004D69F9 6AFF push $FF
004D69FB 33C9 xor ecx, ecx
004D69FD B20B mov dl, $0B
004D69FF 8BC3 mov eax, ebx
|
004D6A01 E86AFFFFFF call 004D6970
004D6A06 5B pop ebx
004D6A07 C3 ret
*)
end;
procedure TMainForm.ToolButton12Click(Sender : TObject);
begin
(*
* Reference to pointer to GlobalVar_004DCE60
|
004D6A1C 8B0D64B94D00 mov ecx, [$004DB964]
* Reference to TApplication instance
|
004D6A22 A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D6A27 8B00 mov eax, [eax]
* Reference to class TLanOpen
|
004D6A29 8B1518144D00 mov edx, [$004D1418]
* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
| or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
004D6A2F E8F819FBFF call 0048842C
* Reference to pointer to GlobalVar_004DCE60
|
004D6A34 A164B94D00 mov eax, dword ptr [$004DB964]
004D6A39 8B00 mov eax, [eax]
004D6A3B 8B10 mov edx, [eax]
* Possible reference to virtual method TGlobalVar_004DCE60.OFFS_00EC
|
004D6A3D FF92EC000000 call dword ptr [edx+$00EC]
* Reference to pointer to GlobalVar_004DCE60
|
004D6A43 A164B94D00 mov eax, dword ptr [$004DB964]
004D6A48 8B00 mov eax, [eax]
* Reference to: System.TObject.Free(TObject);
|
004D6A4A E82DCAF2FF call 0040347C
004D6A4F C3 ret
*)
end;
procedure TMainForm.ToolButton3Click(Sender : TObject);
begin
(*
004D6A50 53 push ebx
004D6A51 8BD8 mov ebx, eax
* Possible String Reference to: '回城'
|
004D6A53 B8786A4D00 mov eax, $004D6A78
|
004D6A58 E84FEAFFFF call 004D54AC
004D6A5D 84C0 test al, al
004D6A5F 740D jz 004D6A6E
004D6A61 6AFF push $FF
004D6A63 33C9 xor ecx, ecx
004D6A65 B20A mov dl, $0A
004D6A67 8BC3 mov eax, ebx
|
004D6A69 E802FFFFFF call 004D6970
004D6A6E 5B pop ebx
004D6A6F C3 ret
*)
end;
procedure TMainForm.ToolButton4Click(Sender : TObject);
begin
(*
004D6A80 53 push ebx
004D6A81 8BD8 mov ebx, eax
* Possible String Reference to: '强退'
|
004D6A83 B8A86A4D00 mov eax, $004D6AA8
|
004D6A88 E81FEAFFFF call 004D54AC
004D6A8D 84C0 test al, al
004D6A8F 740D jz 004D6A9E
004D6A91 6AFF push $FF
004D6A93 33C9 xor ecx, ecx
004D6A95 B209 mov dl, $09
004D6A97 8BC3 mov eax, ebx
|
004D6A99 E8D2FEFFFF call 004D6970
004D6A9E 5B pop ebx
004D6A9F C3 ret
*)
end;
procedure TMainForm.N27Click(Sender : TObject);
begin
(*
004D6B0C 53 push ebx
004D6B0D 8BD8 mov ebx, eax
004D6B0F 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D6B11 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D6B17 E8C885F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D6B1C E8634DF7FF call 0044B884
004D6B21 8BC8 mov ecx, eax
004D6B23 B208 mov dl, $08
004D6B25 8BC3 mov eax, ebx
|
004D6B27 E884FFFFFF call 004D6AB0
004D6B2C 5B pop ebx
004D6B2D C3 ret
*)
end;
procedure TMainForm.N29Click(Sender : TObject);
begin
(*
004D6B30 53 push ebx
004D6B31 8BD8 mov ebx, eax
004D6B33 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D6B35 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D6B3B E8A485F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D6B40 E83F4DF7FF call 0044B884
004D6B45 8BC8 mov ecx, eax
004D6B47 B20C mov dl, $0C
004D6B49 8BC3 mov eax, ebx
|
004D6B4B E860FFFFFF call 004D6AB0
004D6B50 5B pop ebx
004D6B51 C3 ret
*)
end;
procedure TMainForm.N14Click(Sender : TObject);
begin
(*
004D6B54 53 push ebx
004D6B55 8BD8 mov ebx, eax
004D6B57 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D6B59 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D6B5F E88085F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D6B64 E81B4DF7FF call 0044B884
004D6B69 8BC8 mov ecx, eax
004D6B6B B20A mov dl, $0A
004D6B6D 8BC3 mov eax, ebx
|
004D6B6F E83CFFFFFF call 004D6AB0
004D6B74 5B pop ebx
004D6B75 C3 ret
*)
end;
procedure TMainForm.N15Click(Sender : TObject);
begin
(*
004D6B78 53 push ebx
004D6B79 8BD8 mov ebx, eax
004D6B7B 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D6B7D 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D6B83 E85C85F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D6B88 E8F74CF7FF call 0044B884
004D6B8D 8BC8 mov ecx, eax
004D6B8F B209 mov dl, $09
004D6B91 8BC3 mov eax, ebx
|
004D6B93 E818FFFFFF call 004D6AB0
004D6B98 5B pop ebx
004D6B99 C3 ret
*)
end;
procedure TMainForm.N31Click(Sender : TObject);
begin
(*
004D6B9C 53 push ebx
004D6B9D 8BD8 mov ebx, eax
004D6B9F 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D6BA1 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D6BA7 E83885F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D6BAC E8D34CF7FF call 0044B884
004D6BB1 8BC8 mov ecx, eax
004D6BB3 B20B mov dl, $0B
004D6BB5 8BC3 mov eax, ebx
|
004D6BB7 E8F4FEFFFF call 004D6AB0
004D6BBC 5B pop ebx
004D6BBD C3 ret
*)
end;
procedure TMainForm.ClientSocketConnect(Sender : TObject);
begin
(*
004D6BC0 55 push ebp
004D6BC1 8BEC mov ebp, esp
004D6BC3 83C4E4 add esp, -$1C
004D6BC6 53 push ebx
004D6BC7 56 push esi
004D6BC8 57 push edi
004D6BC9 33DB xor ebx, ebx
004D6BCB 895DE8 mov [ebp-$18], ebx
004D6BCE 895DE4 mov [ebp-$1C], ebx
004D6BD1 895DEC mov [ebp-$14], ebx
004D6BD4 8BF1 mov esi, ecx
004D6BD6 8BD8 mov ebx, eax
004D6BD8 33C0 xor eax, eax
004D6BDA 55 push ebp
* Possible String Reference to: '楱悟?噙^[?]?
|
004D6BDB 68636D4D00 push $004D6D63
***** TRY
|
004D6BE0 64FF30 push dword ptr fs:[eax]
004D6BE3 648920 mov fs:[eax], esp
* Possible String Reference to: '服务器已联接'
|
004D6BE6 BA7C6D4D00 mov edx, $004D6D7C
004D6BEB 8BC3 mov eax, ebx
|
004D6BED E8D2010000 call 004D6DC4
* Reference to control TMainForm.LinkSvrBtn : TToolButton
|
004D6BF2 8B8394030000 mov eax, [ebx+$0394]
004D6BF8 33D2 xor edx, edx
004D6BFA 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D6BFC FF5164 call dword ptr [ecx+$64]
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D6BFF 8B8374030000 mov eax, [ebx+$0374]
004D6C05 B201 mov dl, $01
004D6C07 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D6C09 FF5164 call dword ptr [ecx+$64]
004D6C0C C745F001000000 mov dword ptr [ebp-$10], $00000001
004D6C13 C745F4983A0000 mov dword ptr [ebp-$0C], $00003A98
004D6C1A C745F801000000 mov dword ptr [ebp-$08], $00000001
004D6C21 6A00 push $00
004D6C23 6A00 push $00
004D6C25 8D45FC lea eax, [ebp-$04]
004D6C28 50 push eax
004D6C29 6A00 push $00
004D6C2B 6A00 push $00
004D6C2D 6A0C push $0C
004D6C2F 8D45F0 lea eax, [ebp-$10]
004D6C32 50 push eax
004D6C33 6804000098 push $98000004
004D6C38 8B4604 mov eax, [esi+$04]
004D6C3B 50 push eax
* Reference to: <.WSAIoctl()
|
004D6C3C E8832DFBFF call 004899C4
004D6C41 33C0 xor eax, eax
004D6C43 55 push ebp
004D6C44 68336D4D00 push $004D6D33
***** TRY
|
004D6C49 64FF30 push dword ptr fs:[eax]
004D6C4C 648920 mov fs:[eax], esp
* Reference to TLoginForm instance
|
004D6C4F A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6C54 8B00 mov eax, [eax]
* Reference to control TLoginForm.AutoJK : TCheckBox
|
004D6C56 8B8020030000 mov eax, [eax+$0320]
004D6C5C 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D6C5E FF92C8000000 call dword ptr [edx+$00C8]
004D6C64 8BD0 mov edx, eax
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D6C66 8B8374030000 mov eax, [ebx+$0374]
* Reference to: ComCtrls.TToolButton.SetDown(TToolButton;Boolean);
|
004D6C6C E8CF9FF7FF call 00450C40
004D6C71 8D55EC lea edx, [ebp-$14]
* Reference to TLoginForm instance
|
004D6C74 A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6C79 8B00 mov eax, [eax]
* Reference to control TLoginForm.Edit1 : TEdit
|
004D6C7B 8B8004030000 mov eax, [eax+$0304]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004D6C81 E87E0EF9FF call 00467B04
004D6C86 8B45EC mov eax, [ebp-$14]
004D6C89 50 push eax
* Possible String Reference to: 'ID'
|
004D6C8A B9946D4D00 mov ecx, $004D6D94
* Possible String Reference to: 'Setup'
|
004D6C8F BAA06D4D00 mov edx, $004D6DA0
004D6C94 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D6C99 8B18 mov ebx, [eax]
004D6C9B FF5304 call dword ptr [ebx+$04]
* Reference to TLoginForm instance
|
004D6C9E A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6CA3 8B00 mov eax, [eax]
* Reference to control TLoginForm.SavePW : TCheckBox
|
004D6CA5 8B801C030000 mov eax, [eax+$031C]
004D6CAB 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D6CAD FF92C8000000 call dword ptr [edx+$00C8]
004D6CB3 84C0 test al, al
004D6CB5 743C jz 004D6CF3
004D6CB7 8D55E4 lea edx, [ebp-$1C]
* Reference to TLoginForm instance
|
004D6CBA A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6CBF 8B00 mov eax, [eax]
* Reference to control TLoginForm.Edit2 : TEdit
|
004D6CC1 8B8008030000 mov eax, [eax+$0308]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004D6CC7 E8380EF9FF call 00467B04
004D6CCC 8B45E4 mov eax, [ebp-$1C]
004D6CCF 8D4DE8 lea ecx, [ebp-$18]
004D6CD2 33D2 xor edx, edx
|
004D6CD4 E80FE6FFFF call 004D52E8
004D6CD9 8B45E8 mov eax, [ebp-$18]
004D6CDC 50 push eax
* Possible String Reference to: 'PW'
|
004D6CDD B9B06D4D00 mov ecx, $004D6DB0
* Possible String Reference to: 'Setup'
|
004D6CE2 BAA06D4D00 mov edx, $004D6DA0
004D6CE7 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D6CEC 8B18 mov ebx, [eax]
004D6CEE FF5304 call dword ptr [ebx+$04]
004D6CF1 EB14 jmp 004D6D07
* Possible String Reference to: 'PW'
|
004D6CF3 B9B06D4D00 mov ecx, $004D6DB0
* Possible String Reference to: 'Setup'
|
004D6CF8 BAA06D4D00 mov edx, $004D6DA0
004D6CFD A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D6D02 8B18 mov ebx, [eax]
004D6D04 FF5350 call dword ptr [ebx+$50]
004D6D07 6A01 push $01
* Possible String Reference to: 'Setuped'
|
004D6D09 B9BC6D4D00 mov ecx, $004D6DBC
* Possible String Reference to: 'Setup'
|
004D6D0E BAA06D4D00 mov edx, $004D6DA0
004D6D13 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D6D18 8B18 mov ebx, [eax]
004D6D1A FF5314 call dword ptr [ebx+$14]
* Reference to TLoginForm instance
|
004D6D1D A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6D22 8B00 mov eax, [eax]
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
004D6D24 E8CBDFFAFF call 00484CF4
004D6D29 33C0 xor eax, eax
004D6D2B 5A pop edx
004D6D2C 59 pop ecx
004D6D2D 59 pop ecx
004D6D2E 648910 mov fs:[eax], edx
004D6D31 EB0A jmp 004D6D3D
* Reference to: System.@HandleAnyException;
|
004D6D33 E924CCF2FF jmp 0040395C
* Reference to: System.@DoneExcept;
|
004D6D38 E887CFF2FF call 00403CC4
****** END
|
004D6D3D 33C0 xor eax, eax
004D6D3F 5A pop edx
004D6D40 59 pop ecx
004D6D41 59 pop ecx
004D6D42 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '_^[?]?
|
004D6D45 686A6D4D00 push $004D6D6A
004D6D4A 8D45E4 lea eax, [ebp-$1C]
* Reference to: System.@LStrClr(void;void);
|
004D6D4D E83ED5F2FF call 00404290
004D6D52 8D45E8 lea eax, [ebp-$18]
* Reference to: System.@LStrClr(void;void);
|
004D6D55 E836D5F2FF call 00404290
004D6D5A 8D45EC lea eax, [ebp-$14]
* Reference to: System.@LStrClr(void;void);
|
004D6D5D E82ED5F2FF call 00404290
004D6D62 C3 ret
* Reference to: System.@HandleFinally;
|
004D6D63 E9A8CEF2FF jmp 00403C10
004D6D68 EBE0 jmp 004D6D4A
****** END
|
004D6D6A 5F pop edi
004D6D6B 5E pop esi
004D6D6C 5B pop ebx
004D6D6D 8BE5 mov esp, ebp
004D6D6F 5D pop ebp
004D6D70 C3 ret
*)
end;
procedure TMainForm.ClientSocketConnecting(Sender : TObject);
begin
(*
004D6E24 53 push ebx
004D6E25 8BD8 mov ebx, eax
* Possible String Reference to: '正在联接服务器...'
|
004D6E27 BA4C6E4D00 mov edx, $004D6E4C
004D6E2C 8BC3 mov eax, ebx
|
004D6E2E E891FFFFFF call 004D6DC4
004D6E33 33D2 xor edx, edx
* Reference to control TMainForm.LinkSvrBtn : TToolButton
|
004D6E35 8B8394030000 mov eax, [ebx+$0394]
004D6E3B 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D6E3D FF5164 call dword ptr [ecx+$64]
004D6E40 5B pop ebx
004D6E41 C3 ret
*)
end;
procedure TMainForm.ClientSocketDisconnect(Sender : TObject);
begin
(*
004D6E60 53 push ebx
004D6E61 8BD8 mov ebx, eax
* Possible String Reference to: '服务器断开'
|
004D6E63 BAB86E4D00 mov edx, $004D6EB8
004D6E68 8BC3 mov eax, ebx
|
004D6E6A E855FFFFFF call 004D6DC4
004D6E6F B201 mov dl, $01
* Reference to control TMainForm.LinkSvrBtn : TToolButton
|
004D6E71 8B8394030000 mov eax, [ebx+$0394]
004D6E77 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D6E79 FF5164 call dword ptr [ecx+$64]
004D6E7C 33D2 xor edx, edx
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D6E7E 8B8374030000 mov eax, [ebx+$0374]
004D6E84 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D6E86 FF5164 call dword ptr [ecx+$64]
004D6E89 33D2 xor edx, edx
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D6E8B 8B8374030000 mov eax, [ebx+$0374]
* Reference to: ComCtrls.TToolButton.SetDown(TToolButton;Boolean);
|
004D6E91 E8AA9DF7FF call 00450C40
004D6E96 BA080000FF mov edx, $FF000008
* Possible String Reference to: '已与服务器失去联系'
|
004D6E9B B8CC6E4D00 mov eax, $004D6ECC
|
004D6EA0 E82BE5FFFF call 004D53D0
004D6EA5 C605BCD44D0001 mov byte ptr [$004DD4BC], $01
004D6EAC 5B pop ebx
004D6EAD C3 ret
*)
end;
procedure TMainForm.ClientSocketError(Sender : TObject);
begin
(*
004D6EE0 55 push ebp
004D6EE1 8BEC mov ebp, esp
004D6EE3 8B4508 mov eax, [ebp+$08]
004D6EE6 33D2 xor edx, edx
004D6EE8 8910 mov [eax], edx
004D6EEA 5D pop ebp
004D6EEB C20800 ret $0008
*)
end;
procedure TMainForm.ToolButton10Click(Sender : TObject);
begin
(*
004D6EF0 53 push ebx
004D6EF1 8BD8 mov ebx, eax
* Possible String Reference to: '更新天堂游戏'
|
004D6EF3 B8186F4D00 mov eax, $004D6F18
|
004D6EF8 E8AFE5FFFF call 004D54AC
004D6EFD 84C0 test al, al
004D6EFF 740D jz 004D6F0E
004D6F01 6AFF push $FF
004D6F03 33C9 xor ecx, ecx
004D6F05 B20D mov dl, $0D
004D6F07 8BC3 mov eax, ebx
|
004D6F09 E862FAFFFF call 004D6970
004D6F0E 5B pop ebx
004D6F0F C3 ret
*)
end;
procedure TMainForm.LinkSvrBtnClick(Sender : TObject);
begin
(*
004D6F28 53 push ebx
004D6F29 8BD8 mov ebx, eax
* Reference to control TMainForm.ClientSocket : TClientSocket
|
004D6F2B 8B8390030000 mov eax, [ebx+$0390]
* Reference to field TClientSocket.Active : Boolean
|
004D6F31 80783000 cmp byte ptr [eax+$30], $00
004D6F35 754D jnz 004D6F84
* Reference to TLoginForm instance
|
004D6F37 8B0DB4BC4D00 mov ecx, [$004DBCB4]
* Reference to TApplication instance
|
004D6F3D A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D6F42 8B00 mov eax, [eax]
* Reference to class TLoginForm
|
004D6F44 8B1540394D00 mov edx, [$004D3940]
* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
| or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
004D6F4A E8DD14FBFF call 0048842C
* Reference to TLoginForm instance
|
004D6F4F A1B4BC4D00 mov eax, dword ptr [$004DBCB4]
004D6F54 8B00 mov eax, [eax]
004D6F56 8B10 mov edx, [eax]
* Reference to method TLoginForm.ShowModal()
|
004D6F58 FF92EC000000 call dword ptr [edx+$00EC]
* Reference to control TMainForm.ClientSocket : TClientSocket
|
004D6F5E 8B8390030000 mov eax, [ebx+$0390]
* Reference to field TClientSocket.Active : Boolean
|
004D6F64 80783000 cmp byte ptr [eax+$30], $00
004D6F68 751A jnz 004D6F84
004D6F6A B201 mov dl, $01
* Reference to control TMainForm.LinkSpr : TToolButton
|
004D6F6C 8B8398030000 mov eax, [ebx+$0398]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
004D6F72 E8AD0AF9FF call 00467A24
004D6F77 B201 mov dl, $01
* Reference to control TMainForm.LinkSvrBtn : TToolButton
|
004D6F79 8B8394030000 mov eax, [ebx+$0394]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
004D6F7F E8A00AF9FF call 00467A24
004D6F84 5B pop ebx
004D6F85 C3 ret
*)
end;
procedure TMainForm.FormActivate(Sender : TObject);
begin
(*
004D6F88 56 push esi
004D6F89 803DA2D44D0000 cmp byte ptr [$004DD4A2], $00
004D6F90 750F jnz 004D6FA1
* Reference to control TMainForm.LinkSvrBtn : TToolButton
|
004D6F92 8B8094030000 mov eax, [eax+$0394]
004D6F98 66BEEBFF mov si, $FFEB
* Reference to: System.@CallDynaInst;
|
004D6F9C E8D7C6F2FF call 00403678
004D6FA1 C605A2D44D0001 mov byte ptr [$004DD4A2], $01
004D6FA8 5E pop esi
004D6FA9 C3 ret
*)
end;
procedure TMainForm.ClientSocketRead(Sender : TObject);
begin
(*
004D6FAC 53 push ebx
004D6FAD 56 push esi
004D6FAE 57 push edi
004D6FAF 55 push ebp
004D6FB0 8BF9 mov edi, ecx
004D6FB2 8BF0 mov esi, eax
004D6FB4 8BC7 mov eax, edi
* Reference to: ComCtrls.THeaderSections.Add(THeaderSections):THeaderSection;
| or: ComCtrls.TListItems.Add(TListItems):TListItem;
| or: ScktComp.TCustomWinSocket.ReceiveLength(TCustomWinSocket):Integer;
|
004D6FB6 E8B14CFBFF call 0048BC6C
004D6FBB 8BD8 mov ebx, eax
004D6FBD 8BC3 mov eax, ebx
* Reference to: SysUtils.AllocMem(Cardinal):Pointer;
|
004D6FBF E8CC16F3FF call 00408690
004D6FC4 8BE8 mov ebp, eax
004D6FC6 8BD5 mov edx, ebp
004D6FC8 8BCB mov ecx, ebx
004D6FCA 8BC7 mov eax, edi
* Reference to: ScktComp.TCustomWinSocket.ReceiveBuf(TCustomWinSocket;void;void;Integer):Integer;
|
004D6FCC E82F4BFBFF call 0048BB00
004D6FD1 8BDD mov ebx, ebp
004D6FD3 66813B5A5A cmp word ptr [ebx], $5A5A
004D6FD8 0F858D000000 jnz 004D706B
* Reference to control TMainForm.SBar : TStatusBar
|
004D6FDE 8B8638030000 mov eax, [esi+$0338]
* Reference to field TStatusBar.Panels : TStatusPanels
|
004D6FE4 8B8008020000 mov eax, [eax+$0208]
004D6FEA BA02000000 mov edx, $00000002
* Reference to: ComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel;
| or: QComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel;
|
004D6FEF E88C29F7FF call 00449980
* Possible String Reference to: '已收到服务器统计的封号信息...'
|
004D6FF4 BAE0704D00 mov edx, $004D70E0
* Reference to: ComCtrls.TStatusPanel.SetText(TStatusPanel;AnsiString);
| or: ComCtrls.THeaderSection.SetText(THeaderSection;AnsiString);
|
004D6FF9 E8DE28F7FF call 004498DC
004D6FFE B201 mov dl, $01
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D7000 8B8674030000 mov eax, [esi+$0374]
004D7006 8B08 mov ecx, [eax]
* Reference to method TToolButton.SetEnabled(Boolean)
|
004D7008 FF5164 call dword ptr [ecx+$64]
004D700B 56 push esi
004D700C 8BF3 mov esi, ebx
004D700E BF28CF4D00 mov edi, $004DCF28
004D7013 B919010000 mov ecx, $00000119
004D7018 F3 rep
004D7019 A5 movsd
004D701A 66A5 movsw
004D701C A4 movsb
004D701D 5E pop esi
004D701E 8B86F4030000 mov eax, [esi+$03F4]
004D7024 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TTreeNodes.BeginUpdate(TTreeNodes);
| or: ComCtrls.TListItems.BeginUpdate(TListItems);
|
004D702A E8F14AF7FF call 0044BB20
004D702F 8B86F4030000 mov eax, [esi+$03F4]
004D7035 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TTreeNodes.GetCount(TTreeNodes):Integer;
| or: ComCtrls.TListItems.GetCount(TListItems):Integer;
|
004D703B E8CC49F7FF call 0044BA0C
004D7040 8BF8 mov edi, eax
004D7042 4F dec edi
004D7043 85FF test edi, edi
004D7045 7C11 jl 004D7058
004D7047 47 inc edi
004D7048 33DB xor ebx, ebx
004D704A 8D5301 lea edx, [ebx+$01]
004D704D 8BC6 mov eax, esi
* Reference to : TMainForm._PROC_004D77C4()
|
004D704F E870070000 call 004D77C4
004D7054 43 inc ebx
004D7055 4F dec edi
004D7056 75F2 jnz 004D704A
004D7058 8B86F4030000 mov eax, [esi+$03F4]
004D705E 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TTreeNodes.EndUpdate(TTreeNodes);
| or: ComCtrls.TListItems.EndUpdate(TListItems);
|
004D7064 E8934CF7FF call 0044BCFC
004D7069 EB60 jmp 004D70CB
004D706B 8A4302 mov al, byte ptr [ebx+$02]
004D706E 2C06 sub al, $06
004D7070 7559 jnz 004D70CB
004D7072 8D4B04 lea ecx, [ebx+$04]
004D7075 8A5303 mov dl, byte ptr [ebx+$03]
004D7078 8BC6 mov eax, esi
|
004D707A E8110D0000 call 004D7D90
004D707F 33C0 xor eax, eax
004D7081 8A4303 mov al, byte ptr [ebx+$03]
004D7084 8D0480 lea eax, [eax+eax*4]
004D7087 8D0480 lea eax, [eax+eax*4]
004D708A 56 push esi
004D708B 8D7304 lea esi, [ebx+$04]
004D708E 8DB811CF4D00 lea edi, [eax+$4DCF11]
004D7094 B906000000 mov ecx, $00000006
004D7099 F3 rep
004D709A A5 movsd
004D709B A4 movsb
004D709C 5E pop esi
004D709D 8B86F4030000 mov eax, [esi+$03F4]
004D70A3 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TTreeNodes.BeginUpdate(TTreeNodes);
| or: ComCtrls.TListItems.BeginUpdate(TListItems);
|
004D70A9 E8724AF7FF call 0044BB20
004D70AE 33D2 xor edx, edx
004D70B0 8A5303 mov dl, byte ptr [ebx+$03]
004D70B3 8BC6 mov eax, esi
* Reference to : TMainForm._PROC_004D77C4()
|
004D70B5 E80A070000 call 004D77C4
004D70BA 8B86F4030000 mov eax, [esi+$03F4]
004D70C0 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TTreeNodes.EndUpdate(TTreeNodes);
| or: ComCtrls.TListItems.EndUpdate(TListItems);
|
004D70C6 E8314CF7FF call 0044BCFC
004D70CB 8BC5 mov eax, ebp
* Reference to: System.@FreeMem(Pointer):Integer;
|
004D70CD E8D6B6F2FF call 004027A8
004D70D2 5D pop ebp
004D70D3 5F pop edi
004D70D4 5E pop esi
004D70D5 5B pop ebx
004D70D6 C3 ret
*)
end;
procedure TMainForm.PopupMenu1Popup(Sender : TObject);
begin
(*
004D7100 53 push ebx
004D7101 56 push esi
004D7102 57 push edi
004D7103 55 push ebp
004D7104 8BF8 mov edi, eax
004D7106 8B8704030000 mov eax, [edi+$0304]
* Reference to field TMainForm.OFFS_0034
|
004D710C 8B4034 mov eax, [eax+$34]
* Reference to: Menus.TMenuItem.GetCount(TMenuItem):Integer;
|
004D710F E8102CFAFF call 00479D24
004D7114 8BF0 mov esi, eax
004D7116 4E dec esi
004D7117 85F6 test esi, esi
004D7119 7C36 jl 004D7151
004D711B 46 inc esi
004D711C 33ED xor ebp, ebp
004D711E 8B8704030000 mov eax, [edi+$0304]
004D7124 8B4034 mov eax, [eax+$34]
004D7127 8BD5 mov edx, ebp
* Reference to: Menus.TMenuItem.GetItem(TMenuItem;Integer):TMenuItem;
|
004D7129 E8062CFAFF call 00479D34
004D712E 8BD8 mov ebx, eax
004D7130 837B0C01 cmp dword ptr [ebx+$0C], +$01
004D7134 7517 jnz 004D714D
004D7136 8B87F4030000 mov eax, [edi+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D713C E8A37FF7FF call 0044F0E4
004D7141 85C0 test eax, eax
004D7143 0F95C2 setnz dl
004D7146 8BC3 mov eax, ebx
* Reference to: Menus.TMenuItem.SetEnabled(TMenuItem;Boolean);
|
004D7148 E8032BFAFF call 00479C50
004D714D 45 inc ebp
004D714E 4E dec esi
004D714F 75CD jnz 004D711E
004D7151 5D pop ebp
004D7152 5F pop edi
004D7153 5E pop esi
004D7154 5B pop ebx
004D7155 C3 ret
*)
end;
procedure TMainForm.VBtnClick(Sender : TObject);
begin
(*
004D7158 56 push esi
004D7159 57 push edi
004D715A 8BF0 mov esi, eax
* Reference to control TMainForm.IDList : TListView
|
004D715C 8BBE44040000 mov edi, [esi+$0444]
004D7162 80BF1502000000 cmp byte ptr [edi+$0215], $00
004D7169 7529 jnz 004D7194
004D716B B203 mov dl, $03
004D716D 8BC7 mov eax, edi
004D716F 8B08 mov ecx, [eax]
* Reference to method TListView.ViewStyle()
|
004D7171 FF9128010000 call dword ptr [ecx+$0128]
004D7177 B201 mov dl, $01
* Reference to control TMainForm.VBtn2 : TToolButton
|
004D7179 8B863C040000 mov eax, [esi+$043C]
* Reference to: ComCtrls.TToolButton.SetDown(TToolButton;Boolean);
|
004D717F E8BC9AF7FF call 00450C40
004D7184 B201 mov dl, $01
* Reference to control TMainForm.VPop2 : TMenuItem
|
004D7186 8B8620030000 mov eax, [esi+$0320]
* Reference to: Menus.TMenuItem.SetChecked(TMenuItem;Boolean);
|
004D718C E86B2AFAFF call 00479BFC
004D7191 5F pop edi
004D7192 5E pop esi
004D7193 C3 ret
004D7194 33D2 xor edx, edx
004D7196 8BC7 mov eax, edi
004D7198 8B08 mov ecx, [eax]
004D719A FF9128010000 call dword ptr [ecx+$0128]
004D71A0 B201 mov dl, $01
004D71A2 8B8638040000 mov eax, [esi+$0438]
* Reference to: ComCtrls.TToolButton.SetDown(TToolButton;Boolean);
|
004D71A8 E8939AF7FF call 00450C40
004D71AD B201 mov dl, $01
004D71AF 8B861C030000 mov eax, [esi+$031C]
* Reference to: Menus.TMenuItem.SetChecked(TMenuItem;Boolean);
|
004D71B5 E8422AFAFF call 00479BFC
004D71BA 5F pop edi
004D71BB 5E pop esi
004D71BC C3 ret
*)
end;
procedure TMainForm.IDListDblClick(Sender : TObject);
begin
(*
004D71C0 53 push ebx
004D71C1 8BD8 mov ebx, eax
* Reference to control TMainForm.IDList : TListView
|
004D71C3 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D71C9 E8167FF7FF call 0044F0E4
004D71CE 85C0 test eax, eax
004D71D0 743E jz 004D7210
* Reference to control TMainForm.ScrPanel : TPanel
|
004D71D2 8B83DC030000 mov eax, [ebx+$03DC]
* Reference to: Controls.TControl.Show(TControl);
|
004D71D8 E8570EF9FF call 00468034
* Reference to control TMainForm.ScrPanel : TPanel
|
004D71DD 8B83DC030000 mov eax, [ebx+$03DC]
* Reference to: Controls.TControl.BringToFront(TControl);
|
004D71E3 E87C0BF9FF call 00467D64
* Reference to control TMainForm.IDList : TListView
|
004D71E8 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D71EE E8F17EF7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D71F3 E88C46F7FF call 0044B884
004D71F8 8BD0 mov edx, eax
004D71FA 42 inc edx
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D71FB 8B83A0030000 mov eax, [ebx+$03A0]
004D7201 8B08 mov ecx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_01A0
|
004D7203 FF91A0010000 call dword ptr [ecx+$01A0]
004D7209 C605A8D44D0000 mov byte ptr [$004DD4A8], $00
004D7210 5B pop ebx
004D7211 C3 ret
*)
end;
procedure TMainForm.SpeedButton1Click(Sender : TObject);
begin
(*
004D73F4 55 push ebp
004D73F5 8BEC mov ebp, esp
004D73F7 33C9 xor ecx, ecx
004D73F9 51 push ecx
004D73FA 51 push ecx
004D73FB 51 push ecx
004D73FC 51 push ecx
004D73FD 51 push ecx
004D73FE 53 push ebx
004D73FF 56 push esi
004D7400 8BD8 mov ebx, eax
004D7402 33C0 xor eax, eax
004D7404 55 push ebp
* Possible String Reference to: '?球?柁[?]?
|
004D7405 68CD744D00 push $004D74CD
***** TRY
|
004D740A 64FF30 push dword ptr fs:[eax]
004D740D 648920 mov fs:[eax], esp
004D7410 A0DC744D00 mov al, byte ptr [$004D74DC]
004D7415 50 push eax
004D7416 8D55EC lea edx, [ebp-$14]
* Reference to control TMainForm.LocaIDEdit : TEdit
|
004D7419 8B83D0030000 mov eax, [ebx+$03D0]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004D741F E8E006F9FF call 00467B04
004D7424 8B55EC mov edx, [ebp-$14]
004D7427 8D45F0 lea eax, [ebp-$10]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
004D742A E841D9F3FF call 00414D70
004D742F 8D4DF0 lea ecx, [ebp-$10]
* Possible String Reference to: 'GameID'
|
004D7432 BAE8744D00 mov edx, $004D74E8
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D7437 8B83A0030000 mov eax, [ebx+$03A0]
004D743D 8B30 mov esi, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0244
|
004D743F FF9644020000 call dword ptr [esi+$0244]
004D7445 84C0 test al, al
004D7447 7458 jz 004D74A1
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D7449 8B83A0030000 mov eax, [ebx+$03A0]
004D744F 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0150
|
004D7451 FF9250010000 call dword ptr [edx+$0150]
004D7457 8BD0 mov edx, eax
004D7459 4A dec edx
* Reference to control TMainForm.IDList : TListView
|
004D745A 8B8344040000 mov eax, [ebx+$0444]
004D7460 8B08 mov ecx, [eax]
* Possible reference to virtual method TListView.OFFS_00D0
|
004D7462 FF91D0000000 call dword ptr [ecx+$00D0]
* Reference to control TMainForm.MemTable : TkbmMemTable
|
004D7468 8B83A0030000 mov eax, [ebx+$03A0]
004D746E 8B10 mov edx, [eax]
* Possible reference to virtual method TkbmMemTable.OFFS_0150
|
004D7470 FF9250010000 call dword ptr [edx+$0150]
004D7476 8BD0 mov edx, eax
004D7478 4A dec edx
* Reference to control TMainForm.IDList : TListView
|
004D7479 8B8344040000 mov eax, [ebx+$0444]
* Reference to field TListView.Items : TListItems
|
004D747F 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
004D7485 E8B245F7FF call 0044BA3C
004D748A B201 mov dl, $01
* Reference to: ComCtrls.TListItem.MakeVisible(TListItem;Boolean);
|
004D748C E8EF3EF7FF call 0044B380
* Reference to control TMainForm.IDList : TListView
|
004D7491 8B8344040000 mov eax, [ebx+$0444]
004D7497 8B10 mov edx, [eax]
* Reference to method TListView.SetFocus()
|
004D7499 FF92C4000000 call dword ptr [edx+$00C4]
004D749F EB0E jmp 004D74AF
* Reference to control TMainForm.LocaIDEdit : TEdit
|
004D74A1 8B83D0030000 mov eax, [ebx+$03D0]
004D74A7 8B10 mov edx, [eax]
* Reference to method TEdit.SetFocus()
|
004D74A9 FF92C4000000 call dword ptr [edx+$00C4]
004D74AF 33C0 xor eax, eax
004D74B1 5A pop edx
004D74B2 59 pop ecx
004D74B3 59 pop ecx
004D74B4 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[?]?
|
004D74B7 68D4744D00 push $004D74D4
004D74BC 8D45EC lea eax, [ebp-$14]
* Reference to: System.@LStrClr(void;void);
|
004D74BF E8CCCDF2FF call 00404290
004D74C4 8D45F0 lea eax, [ebp-$10]
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
004D74C7 E87C92F3FF call 00410748
004D74CC C3 ret
* Reference to: System.@HandleFinally;
|
004D74CD E93EC7F2FF jmp 00403C10
004D74D2 EBE8 jmp 004D74BC
****** END
|
004D74D4 5E pop esi
004D74D5 5B pop ebx
004D74D6 8BE5 mov esp, ebp
004D74D8 5D pop ebp
004D74D9 C3 ret
*)
end;
procedure TMainForm.ToolButton15Click(Sender : TObject);
begin
(*
* Reference to control TMainForm.ScrPanel : TPanel
|
004D74F0 8B80DC030000 mov eax, [eax+$03DC]
* Reference to: Controls.TWinControl.Realign(TWinControl);
|
004D74F6 E8310BF9FF call 0046802C
004D74FB C3 ret
*)
end;
procedure TMainForm.N28Click(Sender : TObject);
begin
(*
004D752C 53 push ebx
004D752D 8BD8 mov ebx, eax
004D752F 6AFF push $FF
* Reference to control TMainForm.IDList : TListView
|
004D7531 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7537 E8A87BF7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D753C E84343F7FF call 0044B884
004D7541 8BC8 mov ecx, eax
004D7543 B20D mov dl, $0D
004D7545 8BC3 mov eax, ebx
|
004D7547 E864F5FFFF call 004D6AB0
004D754C 5B pop ebx
004D754D C3 ret
*)
end;
procedure TMainForm.PopupMenu2Popup(Sender : TObject);
begin
(*
004D7550 53 push ebx
004D7551 56 push esi
004D7552 57 push edi
004D7553 55 push ebp
004D7554 8BF8 mov edi, eax
004D7556 8B8714030000 mov eax, [edi+$0314]
* Reference to field TMainForm.OFFS_0034
|
004D755C 8B4034 mov eax, [eax+$34]
* Reference to: Menus.TMenuItem.GetCount(TMenuItem):Integer;
|
004D755F E8C027FAFF call 00479D24
004D7564 8BF0 mov esi, eax
004D7566 4E dec esi
004D7567 85F6 test esi, esi
004D7569 7C36 jl 004D75A1
004D756B 46 inc esi
004D756C 33ED xor ebp, ebp
004D756E 8B8714030000 mov eax, [edi+$0314]
004D7574 8B4034 mov eax, [eax+$34]
004D7577 8BD5 mov edx, ebp
* Reference to: Menus.TMenuItem.GetItem(TMenuItem;Integer):TMenuItem;
|
004D7579 E8B627FAFF call 00479D34
004D757E 8BD8 mov ebx, eax
004D7580 837B0C01 cmp dword ptr [ebx+$0C], +$01
004D7584 7517 jnz 004D759D
004D7586 8B8744040000 mov eax, [edi+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D758C E8537BF7FF call 0044F0E4
004D7591 85C0 test eax, eax
004D7593 0F95C2 setnz dl
004D7596 8BC3 mov eax, ebx
* Reference to: Menus.TMenuItem.SetEnabled(TMenuItem;Boolean);
|
004D7598 E8B326FAFF call 00479C50
004D759D 45 inc ebp
004D759E 4E dec esi
004D759F 75CD jnz 004D756E
004D75A1 5D pop ebp
004D75A2 5F pop edi
004D75A3 5E pop esi
004D75A4 5B pop ebx
004D75A5 C3 ret
*)
end;
procedure TMainForm.AutoCheckClick(Sender : TObject);
begin
(*
004D75A8 53 push ebx
004D75A9 8BD8 mov ebx, eax
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D75AB 8B8374030000 mov eax, [ebx+$0374]
* Reference to field TToolButton.Down : Boolean
|
004D75B1 80B86A01000000 cmp byte ptr [eax+$016A], $00
004D75B8 0F8499000000 jz 004D7657
* Reference to TOptionForm instance
|
004D75BE A1C0BD4D00 mov eax, dword ptr [$004DBDC0]
004D75C3 8B00 mov eax, [eax]
004D75C5 8B10 mov edx, [eax]
* Reference to method TOptionForm.ShowModal()
|
004D75C7 FF92EC000000 call dword ptr [edx+$00EC]
004D75CD 48 dec eax
004D75CE 740D jz 004D75DD
004D75D0 33D2 xor edx, edx
* Reference to control TMainForm.AutoCheck : TToolButton
|
004D75D2 8B8374030000 mov eax, [ebx+$0374]
* Reference to: ComCtrls.TToolButton.SetDown(TToolButton;Boolean);
|
004D75D8 E86396F7FF call 00450C40
* Reference to TOptionForm instance
|
004D75DD A1C0BD4D00 mov eax, dword ptr [$004DBDC0]
004D75E2 8B00 mov eax, [eax]
* Reference to control TOptionForm.GMROOMRadio : TRadioGroup
|
004D75E4 8B80F8020000 mov eax, [eax+$02F8]
* Reference to field TRadioGroup.ItemIndex : Integer
|
004D75EA 8B8018020000 mov eax, [eax+$0218]
004D75F0 50 push eax
* Possible String Reference to: 'GmRoomRadio'
|
004D75F1 B964764D00 mov ecx, $004D7664
* Possible String Reference to: 'Setup'
|
004D75F6 BA78764D00 mov edx, $004D7678
004D75FB A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D7600 8B18 mov ebx, [eax]
004D7602 FF530C call dword ptr [ebx+$0C]
* Reference to TOptionForm instance
|
004D7605 A1C0BD4D00 mov eax, dword ptr [$004DBDC0]
004D760A 8B00 mov eax, [eax]
* Reference to control TOptionForm.SeeGMRadio : TRadioGroup
|
004D760C 8B8004030000 mov eax, [eax+$0304]
* Reference to field TRadioGroup.ItemIndex : Integer
|
004D7612 8B8018020000 mov eax, [eax+$0218]
004D7618 50 push eax
* Possible String Reference to: 'SeeGMRadio'
|
004D7619 B988764D00 mov ecx, $004D7688
* Possible String Reference to: 'Setup'
|
004D761E BA78764D00 mov edx, $004D7678
004D7623 A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D7628 8B18 mov ebx, [eax]
004D762A FF530C call dword ptr [ebx+$0C]
* Reference to TOptionForm instance
|
004D762D A1C0BD4D00 mov eax, dword ptr [$004DBDC0]
004D7632 8B00 mov eax, [eax]
* Reference to control TOptionForm.AutoNext : TCheckBox
|
004D7634 8B8008030000 mov eax, [eax+$0308]
004D763A 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D763C FF92C8000000 call dword ptr [edx+$00C8]
004D7642 50 push eax
* Possible String Reference to: 'AutoNext'
|
004D7643 B99C764D00 mov ecx, $004D769C
* Possible String Reference to: 'Setup'
|
004D7648 BA78764D00 mov edx, $004D7678
004D764D A1B8D44D00 mov eax, dword ptr [$004DD4B8]
004D7652 8B18 mov ebx, [eax]
004D7654 FF5314 call dword ptr [ebx+$14]
004D7657 5B pop ebx
004D7658 C3 ret
*)
end;
procedure TMainForm.ServerInfoListCustomDrawItem(Sender : TObject);
begin
(*
004D76A8 55 push ebp
004D76A9 8BEC mov ebp, esp
004D76AB 83C4F0 add esp, -$10
004D76AE 53 push ebx
004D76AF 56 push esi
004D76B0 8BD9 mov ebx, ecx
004D76B2 8BF2 mov esi, edx
004D76B4 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D76B6 E8C941F7FF call 0044B884
004D76BB 83F82A cmp eax, +$2A
004D76BE 0F8FC0000000 jnle 004D7784
004D76C4 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D76C6 E8B941F7FF call 0044B884
004D76CB 8D0480 lea eax, [eax+eax*4]
004D76CE 8D0480 lea eax, [eax+eax*4]
004D76D1 DD802DCF4D00 fld qword ptr [eax+$4DCF2D]
004D76D7 D81D8C774D00 fcomp dword ptr [$004D778C]
004D76DD DFE0 fstsw ax
004D76DF 9E sahf
004D76E0 7722 jnbe 004D7704
004D76E2 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D76E4 E89B41F7FF call 0044B884
004D76E9 8D0480 lea eax, [eax+eax*4]
004D76EC 8D0480 lea eax, [eax+eax*4]
004D76EF DD8037CF4D00 fld qword ptr [eax+$4DCF37]
004D76F5 D81D8C774D00 fcomp dword ptr [$004D778C]
004D76FB DFE0 fstsw ax
004D76FD 9E sahf
004D76FE 0F8680000000 jbe 004D7784
004D7704 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7706 E87941F7FF call 0044B884
004D770B 8D0480 lea eax, [eax+eax*4]
004D770E 8D0480 lea eax, [eax+eax*4]
004D7711 052DCF4D00 add eax, +$004DCF2D
004D7716 50 push eax
* Reference to: SysUtils.Now:TDateTime;
|
004D7717 E82037F3FF call 0040AE3C
004D771C 58 pop eax
004D771D DC20 fsub qword ptr [eax]
004D771F DD5DF8 fstp qword ptr [ebp-$08]
004D7722 9B wait
004D7723 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7725 E85A41F7FF call 0044B884
004D772A 8D0480 lea eax, [eax+eax*4]
004D772D 8D0480 lea eax, [eax+eax*4]
004D7730 0537CF4D00 add eax, +$004DCF37
004D7735 50 push eax
* Reference to: SysUtils.Now:TDateTime;
|
004D7736 E80137F3FF call 0040AE3C
004D773B 58 pop eax
004D773C DC20 fsub qword ptr [eax]
004D773E DD5DF0 fstp qword ptr [ebp-$10]
004D7741 9B wait
004D7742 DD45F8 fld qword ptr [ebp-$08]
004D7745 D81D90774D00 fcomp dword ptr [$004D7790]
004D774B DFE0 fstsw ax
004D774D 9E sahf
004D774E 720E jb 004D775E
004D7750 DD45F0 fld qword ptr [ebp-$10]
004D7753 D81D90774D00 fcomp dword ptr [$004D7790]
004D7759 DFE0 fstsw ax
004D775B 9E sahf
004D775C 7326 jnb 004D7784
004D775E 8B8610020000 mov eax, [esi+$0210]
004D7764 8B4014 mov eax, [eax+$14]
004D7767 BA80000000 mov edx, $00000080
* Reference to: Graphics.TBrush.SetColor(TBrush;TColor);
|
004D776C E8472EF5FF call 0042A5B8
004D7771 8B8610020000 mov eax, [esi+$0210]
004D7777 8B400C mov eax, [eax+$0C]
004D777A BAFFFFFF00 mov edx, $00FFFFFF
* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
004D777F E86826F5FF call 00429DEC
004D7784 5E pop esi
004D7785 5B pop ebx
004D7786 8BE5 mov esp, ebp
004D7788 5D pop ebp
004D7789 C20800 ret $0008
*)
end;
procedure TMainForm.IDListCustomDrawItem(Sender : TObject);
begin
(*
004D7794 55 push ebp
004D7795 8BEC mov ebp, esp
004D7797 53 push ebx
004D7798 56 push esi
004D7799 8BD9 mov ebx, ecx
004D779B 8BF2 mov esi, edx
004D779D 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D779F E8E040F7FF call 0044B884
004D77A4 A801 test al, $01
004D77A6 7513 jnz 004D77BB
004D77A8 8B8610020000 mov eax, [esi+$0210]
004D77AE 8B4014 mov eax, [eax+$14]
004D77B1 BAF2F2F200 mov edx, $00F2F2F2
* Reference to: Graphics.TBrush.SetColor(TBrush;TColor);
|
004D77B6 E8FD2DF5FF call 0042A5B8
004D77BB 5E pop esi
004D77BC 5B pop ebx
004D77BD 5D pop ebp
004D77BE C20800 ret $0008
*)
end;
procedure TMainForm.N17Click(Sender : TObject);
begin
(*
004D7A5C 53 push ebx
004D7A5D 51 push ecx
004D7A5E 8BD8 mov ebx, eax
* Reference to TGJSetupForm instance
|
004D7A60 8B0D50BB4D00 mov ecx, [$004DBB50]
* Reference to TApplication instance
|
004D7A66 A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D7A6B 8B00 mov eax, [eax]
* Reference to class TGJSetupForm
|
004D7A6D 8B1500434D00 mov edx, [$004D4300]
* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
| or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
004D7A73 E8B409FBFF call 0048842C
* Reference to TGJSetupForm instance
|
004D7A78 A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7A7D 8B00 mov eax, [eax]
004D7A7F 8B10 mov edx, [eax]
* Reference to method TGJSetupForm.ShowModal()
|
004D7A81 FF92EC000000 call dword ptr [edx+$00EC]
004D7A87 48 dec eax
004D7A88 7556 jnz 004D7AE0
004D7A8A C60424FF mov byte ptr [esp], $FF
* Reference to TGJSetupForm instance
|
004D7A8E A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7A93 8B00 mov eax, [eax]
* Reference to control TGJSetupForm.BBCheck : TCheckBox
|
004D7A95 8B80F8020000 mov eax, [eax+$02F8]
004D7A9B 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D7A9D FF92C8000000 call dword ptr [edx+$00C8]
004D7AA3 88442401 mov [esp+$01], al
* Reference to TGJSetupForm instance
|
004D7AA7 A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7AAC 8B00 mov eax, [eax]
* Reference to control TGJSetupForm.CKCheck : TCheckBox
|
004D7AAE 8B80FC020000 mov eax, [eax+$02FC]
004D7AB4 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D7AB6 FF92C8000000 call dword ptr [edx+$00C8]
004D7ABC 88442402 mov [esp+$02], al
004D7AC0 8BC4 mov eax, esp
004D7AC2 8B00 mov eax, [eax]
004D7AC4 50 push eax
* Reference to control TMainForm.IDList : TListView
|
004D7AC5 8B8344040000 mov eax, [ebx+$0444]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7ACB E81476F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7AD0 E8AF3DF7FF call 0044B884
004D7AD5 8BC8 mov ecx, eax
004D7AD7 B211 mov dl, $11
004D7AD9 8BC3 mov eax, ebx
|
004D7ADB E8D0EFFFFF call 004D6AB0
* Reference to TGJSetupForm instance
|
004D7AE0 A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7AE5 8B00 mov eax, [eax]
* Reference to: System.TObject.Free(TObject);
|
004D7AE7 E890B9F2FF call 0040347C
004D7AEC 5A pop edx
004D7AED 5B pop ebx
004D7AEE C3 ret
*)
end;
procedure TMainForm.N4Click(Sender : TObject);
begin
(*
004D7AF0 55 push ebp
004D7AF1 8BEC mov ebp, esp
004D7AF3 6A00 push $00
004D7AF5 53 push ebx
004D7AF6 8BD8 mov ebx, eax
004D7AF8 33C0 xor eax, eax
004D7AFA 55 push ebp
* Possible String Reference to: '?莉?疔Y]?
|
004D7AFB 687A7B4D00 push $004D7B7A
***** TRY
|
004D7B00 64FF30 push dword ptr fs:[eax]
004D7B03 648920 mov fs:[eax], esp
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7B06 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7B0C E8D375F7FF call 0044F0E4
004D7B11 85C0 test eax, eax
004D7B13 744F jz 004D7B64
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7B15 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7B1B E8C475F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7B20 E85F3DF7FF call 0044B884
004D7B25 40 inc eax
004D7B26 8D55FC lea edx, [ebp-$04]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D7B29 E80E12F3FF call 00408D3C
004D7B2E 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '服回城'
|
004D7B31 BA907B4D00 mov edx, $004D7B90
* Reference to: System.@LStrCat;
|
004D7B36 E81DCAF2FF call 00404558
004D7B3B 8B45FC mov eax, [ebp-$04]
|
004D7B3E E869D9FFFF call 004D54AC
004D7B43 84C0 test al, al
004D7B45 741D jz 004D7B64
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7B47 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7B4D E89275F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7B52 E82D3DF7FF call 0044B884
004D7B57 40 inc eax
004D7B58 50 push eax
004D7B59 33C9 xor ecx, ecx
004D7B5B B20A mov dl, $0A
004D7B5D 8BC3 mov eax, ebx
|
004D7B5F E80CEEFFFF call 004D6970
004D7B64 33C0 xor eax, eax
004D7B66 5A pop edx
004D7B67 59 pop ecx
004D7B68 59 pop ecx
004D7B69 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[Y]?
|
004D7B6C 68817B4D00 push $004D7B81
004D7B71 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D7B74 E817C7F2FF call 00404290
004D7B79 C3 ret
* Reference to: System.@HandleFinally;
|
004D7B7A E991C0F2FF jmp 00403C10
004D7B7F EBF0 jmp 004D7B71
****** END
|
004D7B81 5B pop ebx
004D7B82 59 pop ecx
004D7B83 5D pop ebp
004D7B84 C3 ret
*)
end;
procedure TMainForm.N5Click(Sender : TObject);
begin
(*
004D7B98 55 push ebp
004D7B99 8BEC mov ebp, esp
004D7B9B 6A00 push $00
004D7B9D 53 push ebx
004D7B9E 8BD8 mov ebx, eax
004D7BA0 33C0 xor eax, eax
004D7BA2 55 push ebp
* Possible String Reference to: '殚框?疔Y]?
|
004D7BA3 68227C4D00 push $004D7C22
***** TRY
|
004D7BA8 64FF30 push dword ptr fs:[eax]
004D7BAB 648920 mov fs:[eax], esp
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7BAE 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7BB4 E82B75F7FF call 0044F0E4
004D7BB9 85C0 test eax, eax
004D7BBB 744F jz 004D7C0C
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7BBD 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7BC3 E81C75F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7BC8 E8B73CF7FF call 0044B884
004D7BCD 40 inc eax
004D7BCE 8D55FC lea edx, [ebp-$04]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D7BD1 E86611F3FF call 00408D3C
004D7BD6 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '服强退'
|
004D7BD9 BA387C4D00 mov edx, $004D7C38
* Reference to: System.@LStrCat;
|
004D7BDE E875C9F2FF call 00404558
004D7BE3 8B45FC mov eax, [ebp-$04]
|
004D7BE6 E8C1D8FFFF call 004D54AC
004D7BEB 84C0 test al, al
004D7BED 741D jz 004D7C0C
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7BEF 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7BF5 E8EA74F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7BFA E8853CF7FF call 0044B884
004D7BFF 40 inc eax
004D7C00 50 push eax
004D7C01 33C9 xor ecx, ecx
004D7C03 B209 mov dl, $09
004D7C05 8BC3 mov eax, ebx
|
004D7C07 E864EDFFFF call 004D6970
004D7C0C 33C0 xor eax, eax
004D7C0E 5A pop edx
004D7C0F 59 pop ecx
004D7C10 59 pop ecx
004D7C11 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[Y]?
|
004D7C14 68297C4D00 push $004D7C29
004D7C19 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D7C1C E86FC6F2FF call 00404290
004D7C21 C3 ret
* Reference to: System.@HandleFinally;
|
004D7C22 E9E9BFF2FF jmp 00403C10
004D7C27 EBF0 jmp 004D7C19
****** END
|
004D7C29 5B pop ebx
004D7C2A 59 pop ecx
004D7C2B 5D pop ebp
004D7C2C C3 ret
*)
end;
procedure TMainForm.N7Click(Sender : TObject);
begin
(*
004D7C40 53 push ebx
004D7C41 51 push ecx
004D7C42 8BD8 mov ebx, eax
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7C44 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7C4A E89574F7FF call 0044F0E4
004D7C4F 85C0 test eax, eax
004D7C51 0F848C000000 jz 004D7CE3
* Reference to TGJSetupForm instance
|
004D7C57 8B0D50BB4D00 mov ecx, [$004DBB50]
* Reference to TApplication instance
|
004D7C5D A1DCBB4D00 mov eax, dword ptr [$004DBBDC]
004D7C62 8B00 mov eax, [eax]
* Reference to class TGJSetupForm
|
004D7C64 8B1500434D00 mov edx, [$004D4300]
* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
| or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
004D7C6A E8BD07FBFF call 0048842C
* Reference to TGJSetupForm instance
|
004D7C6F A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7C74 8B00 mov eax, [eax]
004D7C76 8B10 mov edx, [eax]
* Reference to method TGJSetupForm.ShowModal()
|
004D7C78 FF92EC000000 call dword ptr [edx+$00EC]
004D7C7E 48 dec eax
004D7C7F 7556 jnz 004D7CD7
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7C81 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7C87 E85874F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7C8C E8F33BF7FF call 0044B884
004D7C91 40 inc eax
004D7C92 880424 mov [esp], al
* Reference to TGJSetupForm instance
|
004D7C95 A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7C9A 8B00 mov eax, [eax]
* Reference to control TGJSetupForm.BBCheck : TCheckBox
|
004D7C9C 8B80F8020000 mov eax, [eax+$02F8]
004D7CA2 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D7CA4 FF92C8000000 call dword ptr [edx+$00C8]
004D7CAA 88442401 mov [esp+$01], al
* Reference to TGJSetupForm instance
|
004D7CAE A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7CB3 8B00 mov eax, [eax]
* Reference to control TGJSetupForm.CKCheck : TCheckBox
|
004D7CB5 8B80FC020000 mov eax, [eax+$02FC]
004D7CBB 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
004D7CBD FF92C8000000 call dword ptr [edx+$00C8]
004D7CC3 88442402 mov [esp+$02], al
004D7CC7 8BC4 mov eax, esp
004D7CC9 8B00 mov eax, [eax]
004D7CCB 50 push eax
004D7CCC 33C9 xor ecx, ecx
004D7CCE B211 mov dl, $11
004D7CD0 8BC3 mov eax, ebx
|
004D7CD2 E899ECFFFF call 004D6970
* Reference to TGJSetupForm instance
|
004D7CD7 A150BB4D00 mov eax, dword ptr [$004DBB50]
004D7CDC 8B00 mov eax, [eax]
* Reference to: System.TObject.Free(TObject);
|
004D7CDE E899B7F2FF call 0040347C
004D7CE3 5A pop edx
004D7CE4 5B pop ebx
004D7CE5 C3 ret
*)
end;
procedure TMainForm.N6Click(Sender : TObject);
begin
(*
004D7CE8 55 push ebp
004D7CE9 8BEC mov ebp, esp
004D7CEB 6A00 push $00
004D7CED 53 push ebx
004D7CEE 8BD8 mov ebx, eax
004D7CF0 33C0 xor eax, eax
004D7CF2 55 push ebp
* Possible String Reference to: '?掘?疔Y]?
|
004D7CF3 68727D4D00 push $004D7D72
***** TRY
|
004D7CF8 64FF30 push dword ptr fs:[eax]
004D7CFB 648920 mov fs:[eax], esp
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7CFE 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7D04 E8DB73F7FF call 0044F0E4
004D7D09 85C0 test eax, eax
004D7D0B 744F jz 004D7D5C
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7D0D 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7D13 E8CC73F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7D18 E8673BF7FF call 0044B884
004D7D1D 40 inc eax
004D7D1E 8D55FC lea edx, [ebp-$04]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D7D21 E81610F3FF call 00408D3C
004D7D26 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '服关机'
|
004D7D29 BA887D4D00 mov edx, $004D7D88
* Reference to: System.@LStrCat;
|
004D7D2E E825C8F2FF call 00404558
004D7D33 8B45FC mov eax, [ebp-$04]
|
004D7D36 E871D7FFFF call 004D54AC
004D7D3B 84C0 test al, al
004D7D3D 741D jz 004D7D5C
* Reference to control TMainForm.ServerInfoList : TListView
|
004D7D3F 8B83F4030000 mov eax, [ebx+$03F4]
* Reference to: ComCtrls.TCustomListView.GetSelected(TCustomListView):TListItem;
| or: ComCtrls.TCustomListView.GetFocused(TCustomListView):TListItem;
|
004D7D45 E89A73F7FF call 0044F0E4
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D7D4A E8353BF7FF call 0044B884
004D7D4F 40 inc eax
004D7D50 50 push eax
004D7D51 33C9 xor ecx, ecx
004D7D53 B20B mov dl, $0B
004D7D55 8BC3 mov eax, ebx
|
004D7D57 E814ECFFFF call 004D6970
004D7D5C 33C0 xor eax, eax
004D7D5E 5A pop edx
004D7D5F 59 pop ecx
004D7D60 59 pop ecx
004D7D61 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[Y]?
|
004D7D64 68797D4D00 push $004D7D79
004D7D69 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
004D7D6C E81FC5F2FF call 00404290
004D7D71 C3 ret
* Reference to: System.@HandleFinally;
|
004D7D72 E999BEF2FF jmp 00403C10
004D7D77 EBF0 jmp 004D7D69
****** END
|
004D7D79 5B pop ebx
004D7D7A 59 pop ecx
004D7D7B 5D pop ebp
004D7D7C C3 ret
*)
end;
procedure TMainForm.ISeeBtnClick(Sender : TObject);
begin
(*
004D8204 C605BCD44D0000 mov byte ptr [$004DD4BC], $00
004D820B 33D2 xor edx, edx
* Reference to control TMainForm.ISeeBtn : TButton
|
004D820D 8B8014040000 mov eax, [eax+$0414]
004D8213 8B08 mov ecx, [eax]
* Reference to method TButton.SetEnabled(Boolean)
|
004D8215 FF5164 call dword ptr [ecx+$64]
004D8218 C3 ret
*)
end;
procedure TMainForm.ServerInfoListCustomDrawSubItem(Sender : TObject);
begin
(*
004D821C 55 push ebp
004D821D 8BEC mov ebp, esp
004D821F 83C4F8 add esp, -$08
004D8222 53 push ebx
004D8223 56 push esi
004D8224 8BD9 mov ebx, ecx
004D8226 8BF2 mov esi, edx
004D8228 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D822A E85536F7FF call 0044B884
004D822F A801 test al, $01
004D8231 7515 jnz 004D8248
004D8233 8B8610020000 mov eax, [esi+$0210]
004D8239 8B4014 mov eax, [eax+$14]
004D823C BAF2F2F200 mov edx, $00F2F2F2
* Reference to: Graphics.TBrush.SetColor(TBrush;TColor);
|
004D8241 E87223F5FF call 0042A5B8
004D8246 EB13 jmp 004D825B
004D8248 8B8610020000 mov eax, [esi+$0210]
004D824E 8B4014 mov eax, [eax+$14]
004D8251 BAFFFFFF00 mov edx, $00FFFFFF
* Reference to: Graphics.TBrush.SetColor(TBrush;TColor);
|
004D8256 E85D23F5FF call 0042A5B8
004D825B 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D825D E82236F7FF call 0044B884
004D8262 83F82A cmp eax, +$2A
004D8265 0F8F3F010000 jnle 004D83AA
004D826B 8B4510 mov eax, [ebp+$10]
004D826E 83E804 sub eax, +$04
004D8271 740C jz 004D827F
004D8273 48 dec eax
004D8274 0F84A0000000 jz 004D831A
004D827A E92B010000 jmp 004D83AA
* Reference to: SysUtils.Now:TDateTime;
|
004D827F E8B82BF3FF call 0040AE3C
004D8284 83C4F8 add esp, -$08
004D8287 DD1C24 fstp qword ptr [esp]
004D828A 9B wait
004D828B 8BC3 mov eax, ebx
* Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer;
|
004D828D E8F235F7FF call 0044B884
004D8292 8D0480 lea eax, [eax+eax*4]
004D8295 8D0480 lea eax, [eax+eax*4]
004D8298 FFB031CF4D00 push dword ptr [eax+$4DCF31]
004D829E FFB02DCF4D00 push dword ptr [eax+$4DCF2D]
|
004D82A4 E8EB5BFBFF call 0048DE94
004D82A9 8945F8 mov [ebp-$08], eax
004D82AC 8955FC mov [ebp-$04], edx
004D82AF 837DFC00 cmp dword ptr [ebp-$04], +$00
004D82B3 750B jnz 004D82C0
004D82B5 817DF8A0050000 cmp dword ptr [ebp-$08], $000005A0
004D82BC 7344 jnb 004D8302
004D82BE EB02 jmp 004D82C2
004D82C0 7D40 jnl 004D8302
004D82C2 837DFC00 cmp dword ptr [ebp-$04], +$00
004D82C6 7508 jnz 004D82D0
004D82C8 837DF80A cmp dword ptr [ebp-$08], +$0A
004D82CC 731C jnb 004D82EA
004D82CE EB02 jmp 004D82D2
004D82D0 7D18 jnl 004D82EA
004D82D2 8B8610020000 mov eax, [esi+$0210]
004D82D8 8B400C mov eax, [eax+$0C]
004D82DB BA0000FF00 mov edx, $00FF0000
* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
004D82E0 E8071BF5FF call 00429DEC
004D82E5 E9C0000000 jmp 004D83AA
004D82EA 8B8610020000 mov eax, [esi+$0210]
004D82F0 8B400C mov eax, [eax+$0C]
004D82F3 BAFF000000 mov edx, $000000FF
* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
004D82F8 E8EF1AF5FF call 00429DEC
004D82FD E9A8000000 jmp 004D83AA
004D8302 8B8610020000 mov eax, [esi+$0210]
004D8308 8B400C mov eax, [eax+$0C]
004D830B BA080000FF mov edx, $FF000008
赞赏
|
|
|---|---|
|
|
* Reference to: Graphics.TFont.SetColor(TFont;TColor);
| 004D8310 E8D71AF5FF call 00429DEC 004D8315 E990000000 jmp 004D83AA * Reference to: SysUtils.Now:TDateTime; | 004D831A E81D2BF3FF call 0040AE3C 004D831F 83C4F8 add esp, -$08 004D8322 DD1C24 fstp qword ptr [esp] 004D8325 9B wait 004D8326 8BC3 mov eax, ebx * Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer; | 004D8328 E85735F7FF call 0044B884 004D832D 8D0480 lea eax, [eax+eax*4] 004D8330 8D0480 lea eax, [eax+eax*4] 004D8333 FFB03BCF4D00 push dword ptr [eax+$4DCF3B] 004D8339 FFB037CF4D00 push dword ptr [eax+$4DCF37] | 004D833F E8505BFBFF call 0048DE94 004D8344 8945F8 mov [ebp-$08], eax 004D8347 8955FC mov [ebp-$04], edx 004D834A 837DFC00 cmp dword ptr [ebp-$04], +$00 004D834E 750B jnz 004D835B 004D8350 817DF8A0050000 cmp dword ptr [ebp-$08], $000005A0 004D8357 733E jnb 004D8397 004D8359 EB02 jmp 004D835D 004D835B 7D3A jnl 004D8397 004D835D 837DFC00 cmp dword ptr [ebp-$04], +$00 004D8361 7508 jnz 004D836B 004D8363 837DF80A cmp dword ptr [ebp-$08], +$0A 004D8367 7319 jnb 004D8382 004D8369 EB02 jmp 004D836D 004D836B 7D15 jnl 004D8382 004D836D 8B8610020000 mov eax, [esi+$0210] 004D8373 8B400C mov eax, [eax+$0C] 004D8376 BA0000FF00 mov edx, $00FF0000 * Reference to: Graphics.TFont.SetColor(TFont;TColor); | 004D837B E86C1AF5FF call 00429DEC 004D8380 EB28 jmp 004D83AA 004D8382 8B8610020000 mov eax, [esi+$0210] 004D8388 8B400C mov eax, [eax+$0C] 004D838B BAFF000000 mov edx, $000000FF * Reference to: Graphics.TFont.SetColor(TFont;TColor); | 004D8390 E8571AF5FF call 00429DEC 004D8395 EB13 jmp 004D83AA 004D8397 8B8610020000 mov eax, [esi+$0210] 004D839D 8B400C mov eax, [eax+$0C] 004D83A0 BA080000FF mov edx, $FF000008 * Reference to: Graphics.TFont.SetColor(TFont;TColor); | 004D83A5 E8421AF5FF call 00429DEC 004D83AA 5E pop esi 004D83AB 5B pop ebx 004D83AC 59 pop ecx 004D83AD 59 pop ecx 004D83AE 5D pop ebp 004D83AF C20C00 ret $000C *) end; procedure TMainForm.MemTableBeforeInsert(Sender : TObject); begin (* 004D83B4 53 push ebx * Reference to control TMainForm.IDList : TListView | 004D83B5 8B8044040000 mov eax, [eax+$0444] * Reference to field TListView.Items : TListItems | 004D83BB 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TListItems.Add(TListItems):TListItem; | 004D83C1 E8EA35F7FF call 0044B9B0 004D83C6 8BD8 mov ebx, eax * Possible String Reference to: '待机' | 004D83C8 BAEC834D00 mov edx, $004D83EC 004D83CD 8BC3 mov eax, ebx * Reference to: ComCtrls.TListItem.SetCaption(TListItem;AnsiString); | 004D83CF E87C30F7FF call 0044B450 * Possible String Reference to: '-,-,-' | 004D83D4 BAFC834D00 mov edx, $004D83FC * Reference to field TListItems.OFFS_0008 | 004D83D9 8B4308 mov eax, [ebx+$08] * Reference to: Classes.TStrings.SetCommaText(TStrings;AnsiString); | 004D83DC E89376F4FF call 0041FA74 004D83E1 5B pop ebx 004D83E2 C3 ret *) end; procedure TMainForm.MemTableBeforeDelete(Sender : TObject); begin (* 004D8404 53 push ebx 004D8405 56 push esi 004D8406 8BF2 mov esi, edx 004D8408 8BD8 mov ebx, eax 004D840A 8BC6 mov eax, esi 004D840C 8B10 mov edx, [eax] 004D840E FF9250010000 call dword ptr [edx+$0150] 004D8414 8BD0 mov edx, eax 004D8416 4A dec edx * Reference to control TMainForm.IDList : TListView | 004D8417 8B8344040000 mov eax, [ebx+$0444] * Reference to field TListView.Items : TListItems | 004D841D 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TListItems.Delete(TListItems;Integer); | 004D8423 E8E03EF7FF call 0044C308 004D8428 5E pop esi 004D8429 5B pop ebx 004D842A C3 ret *) end; procedure TMainForm.MemTableAfterPost(Sender : TObject); begin (* * Reference to : TMainForm._PROC_004D842C() | 004D8604 E823FEFFFF call 004D842C 004D8609 C3 ret *) end; procedure TMainForm.ServerInfoListSelectItem(Sender : TObject); begin (* 004D86AC 55 push ebp 004D86AD 8BEC mov ebp, esp 004D86AF 51 push ecx 004D86B0 B906000000 mov ecx, $00000006 004D86B5 6A00 push $00 004D86B7 6A00 push $00 004D86B9 49 dec ecx 004D86BA 75F9 jnz 004D86B5 004D86BC 51 push ecx 004D86BD 874DFC xchg [ebp-$04], ecx 004D86C0 53 push ebx 004D86C1 56 push esi 004D86C2 57 push edi 004D86C3 8BF1 mov esi, ecx 004D86C5 8BD8 mov ebx, eax 004D86C7 33C0 xor eax, eax 004D86C9 55 push ebp 004D86CA 68A0884D00 push $004D88A0 ***** TRY | 004D86CF 64FF30 push dword ptr fs:[eax] 004D86D2 648920 mov fs:[eax], esp 004D86D5 85F6 test esi, esi 004D86D7 0F8476010000 jz 004D8853 * Possible String Reference to: '信息详解:' | 004D86DD BAB8884D00 mov edx, $004D88B8 * Reference to control TMainForm.MapInfo : TPanel | 004D86E2 8B8324040000 mov eax, [ebx+$0424] * Reference to: Controls.TControl.SetText(TControl;TCaption); | 004D86E8 E847F4F8FF call 00467B34 004D86ED 8BC6 mov eax, esi * Reference to: ComCtrls.TListItem.GetIndex(TListItem):Integer; | 004D86EF E89031F7FF call 0044B884 004D86F4 8D0480 lea eax, [eax+eax*4] 004D86F7 8D0480 lea eax, [eax+eax*4] 004D86FA 052ACF4D00 add eax, +$004DCF2A 004D86FF 8BF0 mov esi, eax 004D8701 DD4603 fld qword ptr [esi+$03] 004D8704 D81DC4884D00 fcomp dword ptr [$004D88C4] 004D870A DFE0 fstsw ax 004D870C 9E sahf 004D870D 7674 jbe 004D8783 004D870F 8D55FC lea edx, [ebp-$04] * Reference to control TMainForm.MapInfo : TPanel | 004D8712 8BBB24040000 mov edi, [ebx+$0424] 004D8718 8BC7 mov eax, edi * Reference to: Controls.TControl.GetText(TControl):TCaption; | 004D871A E8E5F3F8FF call 00467B04 004D871F 8D45FC lea eax, [ebp-$04] 004D8722 50 push eax 004D8723 8D45F8 lea eax, [ebp-$08] 004D8726 50 push eax 004D8727 FF7607 push dword ptr [esi+$07] 004D872A FF7603 push dword ptr [esi+$03] 004D872D 8D55E4 lea edx, [ebp-$1C] * Possible String Reference to: 'YYYY-MM-DD HH:MM' | 004D8730 B8D0884D00 mov eax, $004D88D0 | 004D8735 E87E33F3FF call 0040BAB8 004D873A 8B45E4 mov eax, [ebp-$1C] 004D873D 8945E8 mov [ebp-$18], eax 004D8740 C645EC0B mov byte ptr [ebp-$14], $0B 004D8744 8D4DE0 lea ecx, [ebp-$20] 004D8747 668B560B mov dx, word ptr [esi+$0B] 004D874B 8BC3 mov eax, ebx | 004D874D E8BAFEFFFF call 004D860C 004D8752 8B45E0 mov eax, [ebp-$20] 004D8755 8945F0 mov [ebp-$10], eax 004D8758 C645F40B mov byte ptr [ebp-$0C], $0B 004D875C 8D55E8 lea edx, [ebp-$18] 004D875F B901000000 mov ecx, $00000001 * Possible String Reference to: '有人 %S 被拖入GM小屋,之前活动在[%S] | , ' | 004D8764 B8EC884D00 mov eax, $004D88EC | 004D8769 E85A15F3FF call 00409CC8 004D876E 8B55F8 mov edx, [ebp-$08] 004D8771 58 pop eax * Reference to: System.@LStrCat; | 004D8772 E8E1BDF2FF call 00404558 004D8777 8B55FC mov edx, [ebp-$04] 004D877A 8BC7 mov eax, edi * Reference to: Controls.TControl.SetText(TControl;TCaption); | 004D877C E8B3F3F8FF call 00467B34 004D8781 EB27 jmp 004D87AA 004D8783 8D55DC lea edx, [ebp-$24] * Reference to control TMainForm.MapInfo : TPanel | 004D8786 8BBB24040000 mov edi, [ebx+$0424] 004D878C 8BC7 mov eax, edi * Reference to: Controls.TControl.GetText(TControl):TCaption; | 004D878E E871F3F8FF call 00467B04 004D8793 8D45DC lea eax, [ebp-$24] * Possible String Reference to: '尚未收到有人进GM小屋的信息 , ' | 004D8796 BA1C894D00 mov edx, $004D891C * Reference to: System.@LStrCat; | 004D879B E8B8BDF2FF call 00404558 004D87A0 8B55DC mov edx, [ebp-$24] 004D87A3 8BC7 mov eax, edi * Reference to: Controls.TControl.SetText(TControl;TCaption); | 004D87A5 E88AF3F8FF call 00467B34 004D87AA DD460D fld qword ptr [esi+$0D] 004D87AD D81DC4884D00 fcomp dword ptr [$004D88C4] 004D87B3 DFE0 fstsw ax 004D87B5 9E sahf 004D87B6 7674 jbe 004D882C 004D87B8 8D55D8 lea edx, [ebp-$28] * Reference to control TMainForm.MapInfo : TPanel | 004D87BB 8BBB24040000 mov edi, [ebx+$0424] 004D87C1 8BC7 mov eax, edi * Reference to: Controls.TControl.GetText(TControl):TCaption; | 004D87C3 E83CF3F8FF call 00467B04 004D87C8 8D45D8 lea eax, [ebp-$28] 004D87CB 50 push eax 004D87CC 8D45D4 lea eax, [ebp-$2C] 004D87CF 50 push eax 004D87D0 FF7611 push dword ptr [esi+$11] 004D87D3 FF760D push dword ptr [esi+$0D] 004D87D6 8D55D0 lea edx, [ebp-$30] * Possible String Reference to: 'YYYY-MM-DD HH:MM' | 004D87D9 B8D0884D00 mov eax, $004D88D0 | 004D87DE E8D532F3FF call 0040BAB8 004D87E3 8B45D0 mov eax, [ebp-$30] 004D87E6 8945E8 mov [ebp-$18], eax 004D87E9 C645EC0B mov byte ptr [ebp-$14], $0B 004D87ED 8D4DCC lea ecx, [ebp-$34] 004D87F0 668B5615 mov dx, word ptr [esi+$15] 004D87F4 8BC3 mov eax, ebx | 004D87F6 E811FEFFFF call 004D860C 004D87FB 8B45CC mov eax, [ebp-$34] 004D87FE 8945F0 mov [ebp-$10], eax 004D8801 C645F40B mov byte ptr [ebp-$0C], $0B 004D8805 8D55E8 lea edx, [ebp-$18] 004D8808 B901000000 mov ecx, $00000001 * Possible String Reference to: '有人 %S 在[%S]见到过GM' | 004D880D B844894D00 mov eax, $004D8944 | 004D8812 E8B114F3FF call 00409CC8 004D8817 8B55D4 mov edx, [ebp-$2C] 004D881A 58 pop eax * Reference to: System.@LStrCat; | 004D881B E838BDF2FF call 00404558 004D8820 8B55D8 mov edx, [ebp-$28] 004D8823 8BC7 mov eax, edi * Reference to: Controls.TControl.SetText(TControl;TCaption); | 004D8825 E80AF3F8FF call 00467B34 004D882A EB27 jmp 004D8853 004D882C 8D55C8 lea edx, [ebp-$38] * Reference to control TMainForm.MapInfo : TPanel | 004D882F 8BB324040000 mov esi, [ebx+$0424] 004D8835 8BC6 mov eax, esi * Reference to: Controls.TControl.GetText(TControl):TCaption; | 004D8837 E8C8F2F8FF call 00467B04 004D883C 8D45C8 lea eax, [ebp-$38] * Possible String Reference to: '尚未收到有人见过GM的信息' | 004D883F BA64894D00 mov edx, $004D8964 * Reference to: System.@LStrCat; | 004D8844 E80FBDF2FF call 00404558 004D8849 8B55C8 mov edx, [ebp-$38] 004D884C 8BC6 mov eax, esi * Reference to: Controls.TControl.SetText(TControl;TCaption); | 004D884E E8E1F2F8FF call 00467B34 004D8853 33C0 xor eax, eax 004D8855 5A pop edx 004D8856 59 pop ecx 004D8857 59 pop ecx 004D8858 648910 mov fs:[eax], edx ****** FINALLY | 004D885B 68A7884D00 push $004D88A7 004D8860 8D45C8 lea eax, [ebp-$38] * Reference to: System.@LStrClr(void;void); | 004D8863 E828BAF2FF call 00404290 004D8868 8D45CC lea eax, [ebp-$34] 004D886B BA03000000 mov edx, $00000003 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D8870 E83FBAF2FF call 004042B4 004D8875 8D45D8 lea eax, [ebp-$28] 004D8878 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D887D E832BAF2FF call 004042B4 004D8882 8D45E0 lea eax, [ebp-$20] 004D8885 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D888A E825BAF2FF call 004042B4 004D888F 8D45F8 lea eax, [ebp-$08] * Reference to: System.@LStrClr(void;void); | 004D8892 E8F9B9F2FF call 00404290 004D8897 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 004D889A E8F1B9F2FF call 00404290 004D889F C3 ret * Reference to: System.@HandleFinally; | 004D88A0 E96BB3F2FF jmp 00403C10 004D88A5 EBB9 jmp 004D8860 ****** END | 004D88A7 5F pop edi 004D88A8 5E pop esi 004D88A9 5B pop ebx 004D88AA 8BE5 mov esp, ebp 004D88AC 5D pop ebp 004D88AD C20400 ret $0004 *) end; procedure TMainForm.ToolButton1Click(Sender : TObject); begin (* 004D8980 53 push ebx 004D8981 51 push ecx 004D8982 8BD8 mov ebx, eax * Reference to TGJSetupForm instance | 004D8984 8B0D50BB4D00 mov ecx, [$004DBB50] * Reference to TApplication instance | 004D898A A1DCBB4D00 mov eax, dword ptr [$004DBBDC] 004D898F 8B00 mov eax, [eax] * Reference to class TGJSetupForm | 004D8991 8B1500434D00 mov edx, [$004D4300] * Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void); | or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void); | 004D8997 E890FAFAFF call 0048842C * Reference to TGJSetupForm instance | 004D899C A150BB4D00 mov eax, dword ptr [$004DBB50] 004D89A1 8B00 mov eax, [eax] 004D89A3 8B10 mov edx, [eax] * Reference to method TGJSetupForm.ShowModal() | 004D89A5 FF92EC000000 call dword ptr [edx+$00EC] 004D89AB 48 dec eax 004D89AC 7546 jnz 004D89F4 004D89AE C60424FF mov byte ptr [esp], $FF * Reference to TGJSetupForm instance | 004D89B2 A150BB4D00 mov eax, dword ptr [$004DBB50] 004D89B7 8B00 mov eax, [eax] * Reference to control TGJSetupForm.BBCheck : TCheckBox | 004D89B9 8B80F8020000 mov eax, [eax+$02F8] 004D89BF 8B10 mov edx, [eax] * Reference to method TCheckBox.GetChecked() | 004D89C1 FF92C8000000 call dword ptr [edx+$00C8] 004D89C7 88442401 mov [esp+$01], al * Reference to TGJSetupForm instance | 004D89CB A150BB4D00 mov eax, dword ptr [$004DBB50] 004D89D0 8B00 mov eax, [eax] * Reference to control TGJSetupForm.CKCheck : TCheckBox | 004D89D2 8B80FC020000 mov eax, [eax+$02FC] 004D89D8 8B10 mov edx, [eax] * Reference to method TCheckBox.GetChecked() | 004D89DA FF92C8000000 call dword ptr [edx+$00C8] 004D89E0 88442402 mov [esp+$02], al 004D89E4 8BC4 mov eax, esp 004D89E6 8B00 mov eax, [eax] 004D89E8 50 push eax 004D89E9 33C9 xor ecx, ecx 004D89EB B211 mov dl, $11 004D89ED 8BC3 mov eax, ebx | 004D89EF E87CDFFFFF call 004D6970 * Reference to TGJSetupForm instance | 004D89F4 A150BB4D00 mov eax, dword ptr [$004DBB50] 004D89F9 8B00 mov eax, [eax] * Reference to: System.TObject.Free(TObject); | 004D89FB E87CAAF2FF call 0040347C 004D8A00 5A pop edx 004D8A01 5B pop ebx 004D8A02 C3 ret *) end; procedure TMainForm.FormShow(Sender : TObject); begin (* 004D8A04 33D2 xor edx, edx * Reference to control TMainForm.Page : TPageControl | 004D8A06 8B802C040000 mov eax, [eax+$042C] * Reference to: ComCtrls.TPageControl.SetActivePageIndex(TPageControl;Integer); | or: QComCtrls.TPageControl.SetActivePageIndex(TPageControl;Integer); | 004D8A0C E87B0CF7FF call 0044968C 004D8A11 C3 ret *) end; procedure TMainForm.N1Click(Sender : TObject); begin (* 004D8A14 53 push ebx 004D8A15 56 push esi 004D8A16 57 push edi 004D8A17 8BF8 mov edi, eax 004D8A19 8B87F4030000 mov eax, [edi+$03F4] * Reference to field TMainForm.OFFS_022C | 004D8A1F 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TTreeNodes.GetCount(TTreeNodes):Integer; | or: ComCtrls.TListItems.GetCount(TListItems):Integer; | 004D8A25 E8E22FF7FF call 0044BA0C 004D8A2A 8BD8 mov ebx, eax 004D8A2C 4B dec ebx 004D8A2D 85DB test ebx, ebx 004D8A2F 7C21 jl 004D8A52 004D8A31 43 inc ebx 004D8A32 33F6 xor esi, esi 004D8A34 8B87F4030000 mov eax, [edi+$03F4] 004D8A3A 8B802C020000 mov eax, [eax+$022C] 004D8A40 8BD6 mov edx, esi * Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem; | 004D8A42 E8F52FF7FF call 0044BA3C 004D8A47 B201 mov dl, $01 * Reference to: ComCtrls.TListItem.SetChecked(TListItem;Boolean); | 004D8A49 E89A29F7FF call 0044B3E8 004D8A4E 46 inc esi 004D8A4F 4B dec ebx 004D8A50 75E2 jnz 004D8A34 004D8A52 5F pop edi 004D8A53 5E pop esi 004D8A54 5B pop ebx 004D8A55 C3 ret *) end; procedure TMainForm.N3Click(Sender : TObject); begin (* 004D8A58 53 push ebx 004D8A59 56 push esi 004D8A5A 57 push edi 004D8A5B 8BF8 mov edi, eax 004D8A5D 8B87F4030000 mov eax, [edi+$03F4] * Reference to field TMainForm.OFFS_022C | 004D8A63 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TTreeNodes.GetCount(TTreeNodes):Integer; | or: ComCtrls.TListItems.GetCount(TListItems):Integer; | 004D8A69 E89E2FF7FF call 0044BA0C 004D8A6E 8BD8 mov ebx, eax 004D8A70 4B dec ebx 004D8A71 85DB test ebx, ebx 004D8A73 7C21 jl 004D8A96 004D8A75 43 inc ebx 004D8A76 33F6 xor esi, esi 004D8A78 8B87F4030000 mov eax, [edi+$03F4] 004D8A7E 8B802C020000 mov eax, [eax+$022C] 004D8A84 8BD6 mov edx, esi * Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem; | 004D8A86 E8B12FF7FF call 0044BA3C 004D8A8B 33D2 xor edx, edx * Reference to: ComCtrls.TListItem.SetChecked(TListItem;Boolean); | 004D8A8D E85629F7FF call 0044B3E8 004D8A92 46 inc esi 004D8A93 4B dec ebx 004D8A94 75E2 jnz 004D8A78 004D8A96 5F pop edi 004D8A97 5E pop esi 004D8A98 5B pop ebx 004D8A99 C3 ret *) end; procedure TMainForm.N10Click(Sender : TObject); begin (* 004D8A9C 53 push ebx 004D8A9D 56 push esi 004D8A9E 57 push edi 004D8A9F 55 push ebp 004D8AA0 8BE8 mov ebp, eax * Reference to control ServerInfoList:TListView | 004D8AA2 8B85F4030000 mov eax, [ebp+$03F4] * Reference to field TListView.Items : TListItems | 004D8AA8 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TListItems.GetCount(TListItems):Integer; | 004D8AAE E8592FF7FF call 0044BA0C 004D8AB3 8BF0 mov esi, eax 004D8AB5 4E dec esi 004D8AB6 85F6 test esi, esi 004D8AB8 7C2E jl 004D8AE8 004D8ABA 46 inc esi 004D8ABB 33FF xor edi, edi 004D8ABD BB94D34D00 mov ebx, $004DD394 * Reference to control ServerInfoList:TListView | 004D8AC2 8B85F4030000 mov eax, [ebp+$03F4] * Reference to field TListView.Items : TListItems | 004D8AC8 8B802C020000 mov eax, [eax+$022C] 004D8ACE 8BD7 mov edx, edi * Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem; | 004D8AD0 E8672FF7FF call 0044BA3C 004D8AD5 66833B00 cmp word ptr [ebx], +$00 004D8AD9 0F97C2 setnbe dl * Reference to: ComCtrls.TListItem.SetChecked(TListItem;Boolean); | 004D8ADC E80729F7FF call 0044B3E8 004D8AE1 47 inc edi 004D8AE2 83C306 add ebx, +$06 004D8AE5 4E dec esi 004D8AE6 75DA jnz 004D8AC2 004D8AE8 5D pop ebp 004D8AE9 5F pop edi 004D8AEA 5E pop esi 004D8AEB 5B pop ebx 004D8AEC C3 ret *) end; procedure TMainForm.GameSocketRead(Sender : TObject); begin (* 004D8AF0 55 push ebp 004D8AF1 8BEC mov ebp, esp 004D8AF3 81C410FCFFFF add esp, $FFFFFC10 004D8AF9 53 push ebx 004D8AFA 56 push esi 004D8AFB 57 push edi 004D8AFC 33DB xor ebx, ebx 004D8AFE 899D10FCFFFF mov [ebp+$FFFFFC10], ebx 004D8B04 8BF1 mov esi, ecx 004D8B06 33C0 xor eax, eax 004D8B08 55 push ebp 004D8B09 68788B4D00 push $004D8B78 ***** TRY | 004D8B0E 64FF30 push dword ptr fs:[eax] 004D8B11 648920 mov fs:[eax], esp 004D8B14 8BC6 mov eax, esi * Reference to: ComCtrls.THeaderSections.Add(THeaderSections):THeaderSection; | or: ComCtrls.TListItems.Add(TListItems):TListItem; | or: ScktComp.TCustomWinSocket.ReceiveLength(TCustomWinSocket):Integer; | 004D8B16 E85131FBFF call 0048BC6C 004D8B1B 8BD8 mov ebx, eax 004D8B1D 8BC3 mov eax, ebx * Reference to: SysUtils.AllocMem(Cardinal):Pointer; | 004D8B1F E86CFBF2FF call 00408690 004D8B24 8BF8 mov edi, eax 004D8B26 8D9517FCFFFF lea edx, [ebp+$FFFFFC17] 004D8B2C 8BCB mov ecx, ebx 004D8B2E 8BC6 mov eax, esi * Reference to: ScktComp.TCustomWinSocket.ReceiveBuf(TCustomWinSocket;void;void;Integer):Integer; | 004D8B30 E8CB2FFBFF call 0048BB00 004D8B35 8D8D10FCFFFF lea ecx, [ebp+$FFFFFC10] 004D8B3B 33C0 xor eax, eax 004D8B3D 8A8519FCFFFF mov al, byte ptr [ebp+$FFFFFC19] 004D8B43 BA02000000 mov edx, $00000002 * Reference to: SysUtils.IntToHex(Integer;Integer):AnsiString;overload; | 004D8B48 E80303F3FF call 00408E50 004D8B4D 8B8510FCFFFF mov eax, [ebp+$FFFFFC10] * Reference to: Dialogs.ShowMessage(AnsiString); | 004D8B53 E82CD8F5FF call 00436384 004D8B58 8BC7 mov eax, edi * Reference to: System.@FreeMem(Pointer):Integer; | 004D8B5A E8499CF2FF call 004027A8 004D8B5F 33C0 xor eax, eax 004D8B61 5A pop edx 004D8B62 59 pop ecx 004D8B63 59 pop ecx 004D8B64 648910 mov fs:[eax], edx ****** FINALLY | 004D8B67 687F8B4D00 push $004D8B7F 004D8B6C 8D8510FCFFFF lea eax, [ebp+$FFFFFC10] * Reference to: System.@LStrClr(void;void); | 004D8B72 E819B7F2FF call 00404290 004D8B77 C3 ret * Reference to: System.@HandleFinally; | 004D8B78 E993B0F2FF jmp 00403C10 004D8B7D EBED jmp 004D8B6C ****** END | 004D8B7F 5F pop edi 004D8B80 5E pop esi 004D8B81 5B pop ebx 004D8B82 8BE5 mov esp, ebp 004D8B84 5D pop ebp 004D8B85 C3 ret *) end; procedure TMainForm.GameSocketError(Sender : TObject); begin (* 004D8B88 55 push ebp 004D8B89 8BEC mov ebp, esp 004D8B8B 8B4508 mov eax, [ebp+$08] 004D8B8E 33D2 xor edx, edx 004D8B90 8910 mov [eax], edx 004D8B92 8BC1 mov eax, ecx * Reference to: ScktComp.TCustomWinSocket.Close(TCustomWinSocket); | 004D8B94 E85F24FBFF call 0048AFF8 004D8B99 5D pop ebp 004D8B9A C20800 ret $0008 *) end; procedure TMainForm.StartBtnClick(Sender : TObject); begin (* 004D8BA0 53 push ebx 004D8BA1 83C4F0 add esp, -$10 004D8BA4 8BD8 mov ebx, eax * Reference to control TMainForm.GameSocket : TClientSocket | 004D8BA6 8B834C040000 mov eax, [ebx+$044C] * Reference to: ScktComp.TAbstractSocket.Open(TAbstractSocket); | 004D8BAC E86742FBFF call 0048CE18 004D8BB1 EB31 jmp 004D8BE4 004D8BB3 BA54B74D00 mov edx, $004DB754 004D8BB8 8BC4 mov eax, esp 004D8BBA B90E000000 mov ecx, $0000000E * Reference to: Classes.TPersistent.AssignTo(TPersistent;TPersistent); | or: Classes.TComponent.ReadState(TComponent;TReader); | or: FMTBcd.VarFMTBcdCreate(TBcd;TBcd):Variant;overload; | or: QGraphics.TGraphic.AssignsTo(classofTGraphic;TGraphicClass):Boolean; | or: SqlTimSt.VarSQLTimeStampCreate(TSQLTimeStamp;TSQLTimeStamp):Variant;overload; | or: System.WideCharToStrVar(PWideChar;String;String); | 004D8BBF E80CE8F2FF call 004073D0 * Reference to control TMainForm.GameSocket : TClientSocket | 004D8BC4 8B834C040000 mov eax, [ebx+$044C] * Reference to field TClientSocket.Socket : TClientWinSocket | 004D8BCA 8B8090000000 mov eax, [eax+$0090] * Reference to field TClientWinSocket.SocketHandle : TSocket | 004D8BD0 8B4004 mov eax, [eax+$04] 004D8BD3 50 push eax 004D8BD4 8D542404 lea edx, [esp+$04] 004D8BD8 B90E000000 mov ecx, $0000000E 004D8BDD 8BC3 mov eax, ebx | 004D8BDF E848000000 call 004D8C2C 004D8BE4 83C410 add esp, +$10 004D8BE7 5B pop ebx 004D8BE8 C3 ret *) end; procedure TMainForm.GameSocketDisconnect(Sender : TObject); begin (* * Possible String Reference to: 'Disconnect' | 004D8BEC B8008C4D00 mov eax, $004D8C00 * Reference to: Dialogs.ShowMessage(AnsiString); | 004D8BF1 E88ED7F5FF call 00436384 004D8BF6 C3 ret *) end; procedure TMainForm.GameSocketConnect(Sender : TObject); begin (* * Possible String Reference to: 'Connect' | 004D8D58 BA6C8D4D00 mov edx, $004D8D6C * Reference to: Controls.TControl.SetText(TControl;TCaption); | 004D8D5D E8D2EDF8FF call 00467B34 004D8D62 C3 ret *) end; procedure TMainForm._PROC_004D53D1(Sender : TObject); begin (* 004D53D1 8BEC mov ebp, esp 004D53D3 83C4F8 add esp, -$08 004D53D6 53 push ebx 004D53D7 33C9 xor ecx, ecx 004D53D9 894DF8 mov [ebp-$08], ecx 004D53DC 8945FC mov [ebp-$04], eax * Reference to MainForm | 004D53DF 8B45FC mov eax, [ebp-$04] * Reference to: System.@LStrAddRef(void;void):Pointer; | 004D53E2 E859F3F2FF call 00404740 004D53E7 33C0 xor eax, eax 004D53E9 55 push ebp * Possible String Reference to: '?珧?脎YY]? | 004D53EA 6882544D00 push $004D5482 ***** TRY | 004D53EF 64FF30 push dword ptr fs:[eax] 004D53F2 648920 mov fs:[eax], esp * Reference to MainForm | 004D53F5 A124CF4D00 mov eax, dword ptr [$004DCF24] * Reference to field MainForm.OFFS_0418 | 004D53FA 8B9818040000 mov ebx, [eax+$0418] * Reference to: SysUtils.Now:TDateTime; | 004D5400 E8375AF3FF call 0040AE3C 004D5405 83C4F8 add esp, -$08 004D5408 DD1C24 fstp qword ptr [esp] 004D540B 9B wait 004D540C 8D55F8 lea edx, [ebp-$08] * Possible String Reference to: '[YY-MM-DD HH:MM] ' | 004D540F B898544D00 mov eax, $004D5498 | 004D5414 E89F66F3FF call 0040BAB8 004D5419 8D45F8 lea eax, [ebp-$08] * Reference to MainForm | 004D541C 8B55FC mov edx, [ebp-$04] * Reference to: System.@LStrCat; | 004D541F E834F1F2FF call 00404558 004D5424 8B55F8 mov edx, [ebp-$08] 004D5427 8B8318020000 mov eax, [ebx+$0218] * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D542D E85A9BF4FF call 0041EF8C 004D5432 8B8318020000 mov eax, [ebx+$0218] 004D5438 8B10 mov edx, [eax] 004D543A FF5214 call dword ptr [edx+$14] 004D543D 83F832 cmp eax, +$32 004D5440 7E0D jle 004D544F 004D5442 33D2 xor edx, edx 004D5444 8B8318020000 mov eax, [ebx+$0218] 004D544A 8B08 mov ecx, [eax] 004D544C FF5148 call dword ptr [ecx+$48] 004D544F 8B8318020000 mov eax, [ebx+$0218] 004D5455 8B10 mov edx, [eax] 004D5457 FF5214 call dword ptr [edx+$14] 004D545A 8BD0 mov edx, eax 004D545C 4A dec edx 004D545D 8BC3 mov eax, ebx 004D545F 8B08 mov ecx, [eax] 004D5461 FF91D0000000 call dword ptr [ecx+$00D0] 004D5467 33C0 xor eax, eax 004D5469 5A pop edx 004D546A 59 pop ecx 004D546B 59 pop ecx 004D546C 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[YY]? | 004D546F 6889544D00 push $004D5489 004D5474 8D45F8 lea eax, [ebp-$08] 004D5477 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D547C E833EEF2FF call 004042B4 004D5481 C3 ret * Reference to: System.@HandleFinally; | 004D5482 E989E7F2FF jmp 00403C10 004D5487 EBEB jmp 004D5474 ****** END | 004D5489 5B pop ebx 004D548A 59 pop ecx 004D548B 59 pop ecx 004D548C 5D pop ebp 004D548D C3 ret *) end; procedure TMainForm._PROC_004D54AD(Sender : TObject); begin (* 004D54AD 8BEC mov ebp, esp 004D54AF 6A00 push $00 004D54B1 6A00 push $00 004D54B3 6A00 push $00 004D54B5 53 push ebx 004D54B6 8945FC mov [ebp-$04], eax * Reference to MainForm | 004D54B9 8B45FC mov eax, [ebp-$04] * Reference to: System.@LStrAddRef(void;void):Pointer; | 004D54BC E87FF2F2FF call 00404740 004D54C1 33C0 xor eax, eax 004D54C3 55 push ebp * Possible String Reference to: '槟骝??蜜?]? | 004D54C4 6847554D00 push $004D5547 ***** TRY | 004D54C9 64FF30 push dword ptr fs:[eax] 004D54CC 648920 mov fs:[eax], esp 004D54CF 6821010000 push $00000121 004D54D4 8D55F8 lea edx, [ebp-$08] * Reference to MainForm | 004D54D7 A124CF4D00 mov eax, dword ptr [$004DCF24] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 004D54DC E82326F9FF call 00467B04 004D54E1 8B45F8 mov eax, [ebp-$08] * Reference to: System.@LStrToPChar(String):PAnsiChar; | 004D54E4 E867F2F2FF call 00404750 004D54E9 50 push eax * Possible String Reference to: '确认现在进行全体 ' | 004D54EA 6860554D00 push $004D5560 004D54EF FF75FC push dword ptr [ebp-$04] * Possible String Reference to: ' 吗？' | 004D54F2 687C554D00 push $004D557C 004D54F7 8D45F4 lea eax, [ebp-$0C] 004D54FA BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 004D54FF E80CF1F2FF call 00404610 004D5504 8B45F4 mov eax, [ebp-$0C] * Reference to: System.@LStrToPChar(String):PAnsiChar; | 004D5507 E844F2F2FF call 00404750 004D550C 50 push eax * Reference to MainForm | 004D550D A124CF4D00 mov eax, dword ptr [$004DCF24] * Reference to: Controls.TWinControl.GetHandle(TWinControl):HWND; | or: QComCtrls.TTrackBar.GetHandle(TTrackBar):QClxSliderH; | or: QComCtrls.TCustomViewControl.GetHandle(TCustomViewControl):QListViewH; | or: QComCtrls.TCustomViewControl.ViewportHandle(TCustomViewControl):QWidgetH; | or: QComCtrls.TCustomHeaderControl.GetHandle(TCustomHeaderControl):QHeaderH; | or: QComCtrls.TCustomSpinEdit.GetHandle(TCustomSpinEdit):QClxSpinBoxH; | 004D5512 E8218FF9FF call 0046E438 004D5517 50 push eax | 004D5518 E8DB1CF3FF call 004071F8 004D551D 48 dec eax 004D551E 0F94C3 setz bl 004D5521 33C0 xor eax, eax 004D5523 5A pop edx 004D5524 59 pop ecx 004D5525 59 pop ecx 004D5526 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '?[?]? | 004D5529 684E554D00 push $004D554E 004D552E 8D45F4 lea eax, [ebp-$0C] * Reference to: System.@LStrClr(void;void); | 004D5531 E85AEDF2FF call 00404290 004D5536 8D45F8 lea eax, [ebp-$08] * Reference to: System.@LStrClr(void;void); | 004D5539 E852EDF2FF call 00404290 004D553E 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 004D5541 E84AEDF2FF call 00404290 004D5546 C3 ret * Reference to: System.@HandleFinally; | 004D5547 E9C4E6F2FF jmp 00403C10 004D554C EBE0 jmp 004D552E ****** END | 004D554E 8BC3 mov eax, ebx 004D5550 5B pop ebx 004D5551 8BE5 mov esp, ebp 004D5553 5D pop ebp 004D5554 C3 ret *) end; procedure TMainForm._PROC_004D5588(Sender : TObject); begin (* 004D5588 81C430FEFFFF add esp, $FFFFFE30 004D558E 8BE8 mov ebp, eax 004D5590 8D442440 lea eax, [esp+$40] 004D5594 50 push eax 004D5595 6801010000 push $00000101 | 004D559A E85145FBFF call 00489AF0 004D559F 8BC5 mov eax, ebp * Reference to: System.@LStrClr(void;void); | 004D55A1 E8EAECF2FF call 00404290 004D55A6 6A40 push $40 004D55A8 8D442404 lea eax, [esp+$04] 004D55AC 50 push eax | 004D55AD E80E45FBFF call 00489AC0 004D55B2 54 push esp | 004D55B3 E8F844FBFF call 00489AB0 004D55B8 85C0 test eax, eax 004D55BA 7422 jz 004D55DE 004D55BC 8B700C mov esi, [eax+$0C] 004D55BF 33DB xor ebx, ebx 004D55C1 EB0F jmp 004D55D2 004D55C3 FF37 push dword ptr [edi] | 004D55C5 E88E44FBFF call 00489A58 004D55CA 8BD5 mov edx, ebp * Reference to: Dialogs.FixFileName(AnsiString):AnsiString; | or: SysUtils.StrPas(PChar):AnsiString; | 004D55CC E80742F3FF call 004097D8 004D55D1 43 inc ebx 004D55D2 8B3C9E mov edi, [esi+ebx*4] 004D55D5 85FF test edi, edi 004D55D7 75EA jnz 004D55C3 * Reference to: t.WSACleanup() | 004D55D9 E81A45FBFF call 00489AF8 004D55DE 81C4D0010000 add esp, $000001D0 004D55E4 5D pop ebp 004D55E5 5F pop edi 004D55E6 5E pop esi 004D55E7 5B pop ebx 004D55E8 C3 ret *) end; procedure TMainForm._PROC_004D55EC(Sender : TObject); begin (* 004D55EC 55 push ebp 004D55ED 8BEC mov ebp, esp 004D55EF 83C4F8 add esp, -$08 004D55F2 53 push ebx 004D55F3 56 push esi 004D55F4 894DF8 mov [ebp-$08], ecx 004D55F7 8955FC mov [ebp-$04], edx 004D55FA 8BD8 mov ebx, eax 004D55FC 8B7508 mov esi, [ebp+$08] 004D55FF 8B45FC mov eax, [ebp-$04] * Reference to: System.@LStrAddRef(void;void):Pointer; | 004D5602 E839F1F2FF call 00404740 004D5607 8B45F8 mov eax, [ebp-$08] * Reference to: System.@LStrAddRef(void;void):Pointer; | 004D560A E831F1F2FF call 00404740 004D560F 33C0 xor eax, eax 004D5611 55 push ebp 004D5612 6852564D00 push $004D5652 ***** TRY | 004D5617 64FF30 push dword ptr fs:[eax] 004D561A 648920 mov fs:[eax], esp 004D561D 84DB test bl, bl 004D561F 740C jz 004D562D 004D5621 8BC6 mov eax, esi 004D5623 8B55FC mov edx, [ebp-$04] * Reference to: System.@LStrAsg(void;void;void;void); | 004D5626 E8B9ECF2FF call 004042E4 004D562B EB0A jmp 004D5637 004D562D 8BC6 mov eax, esi 004D562F 8B55F8 mov edx, [ebp-$08] * Reference to: System.@LStrAsg(void;void;void;void); | 004D5632 E8ADECF2FF call 004042E4 004D5637 33C0 xor eax, eax 004D5639 5A pop edx 004D563A 59 pop ecx 004D563B 59 pop ecx 004D563C 648910 mov fs:[eax], edx ****** FINALLY | 004D563F 6859564D00 push $004D5659 004D5644 8D45F8 lea eax, [ebp-$08] 004D5647 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D564C E863ECF2FF call 004042B4 004D5651 C3 ret * Reference to: System.@HandleFinally; | 004D5652 E9B9E5F2FF jmp 00403C10 004D5657 EBEB jmp 004D5644 ****** END | 004D5659 5E pop esi 004D565A 5B pop ebx 004D565B 59 pop ecx 004D565C 59 pop ecx 004D565D 5D pop ebp 004D565E C20400 ret $0004 *) end; procedure TMainForm._PROC_004D5B29(Sender : TObject); begin (* 004D5B29 6E outsb 004D5B2A 47 inc edi 004D5B2B 4D dec ebp 004D5B2C 43 inc ebx 004D5B2D 6865636B00 push $006B6365 004D5B32 0000 add [eax], al *) end; procedure TMainForm._PROC_004D5B5D(Sender : TObject); begin (* 004D5B5D 8BEC mov ebp, esp 004D5B5F 33C9 xor ecx, ecx 004D5B61 51 push ecx 004D5B62 51 push ecx 004D5B63 51 push ecx 004D5B64 51 push ecx 004D5B65 53 push ebx 004D5B66 56 push esi 004D5B67 57 push edi 004D5B68 8BFA mov edi, edx 004D5B6A 8BD8 mov ebx, eax 004D5B6C 33C0 xor eax, eax 004D5B6E 55 push ebp 004D5B6F 68D25C4D00 push $004D5CD2 ***** TRY | 004D5B74 64FF30 push dword ptr fs:[eax] 004D5B77 648920 mov fs:[eax], esp 004D5B7A B800040000 mov eax, $00000400 * Reference to: SysUtils.AllocMem(Cardinal):Pointer; | 004D5B7F E80C2BF3FF call 00408690 004D5B84 8BF0 mov esi, eax 004D5B86 C745FC10000000 mov dword ptr [ebp-$04], $00000010 004D5B8D 68B9080000 push $000008B9 | 004D5B92 E8B13EFBFF call 00489A48 * Reference to field TMainForm.OFFS_04FA | 004D5B97 668983FA040000 mov [ebx+$04FA], ax 004D5B9E 8B4708 mov eax, [edi+$08] * Reference to : TApplication._PROC_00489A04() | 004D5BA1 E85E3EFBFF call 00489A04 004D5BA6 6683F801 cmp ax, +$01 004D5BAA 0F8507010000 jnz 004D5CB7 004D5BB0 8D45FC lea eax, [ebp-$04] 004D5BB3 50 push eax * Reference to field TMainForm.OFFS_04F8 | 004D5BB4 8D83F8040000 lea eax, [ebx+$04F8] 004D5BBA 50 push eax 004D5BBB 6A00 push $00 004D5BBD 6800040000 push $00000400 004D5BC2 56 push esi * Reference to field TMainForm.OFFS_04E4 | 004D5BC3 8B83E4040000 mov eax, [ebx+$04E4] 004D5BC9 50 push eax | 004D5BCA E8B13EFBFF call 00489A80 004D5BCF 8945FC mov [ebp-$04], eax * Reference to field TMainForm.OFFS_04FC | 004D5BD2 81BBFC040000DA53A119 cmp dword ptr [ebx+$04FC], $19A153DA 004D5BDC 0F85D5000000 jnz 004D5CB7 004D5BE2 668B06 mov ax, word ptr [esi] 004D5BE5 662D5A5A sub ax, $5A5A 004D5BE9 0F84C8000000 jz 004D5CB7 004D5BEF 8D55F8 lea edx, [ebp-$08] 004D5BF2 8BC6 mov eax, esi * Reference to: Dialogs.FixFileName(AnsiString):AnsiString; | or: SysUtils.StrPas(PChar):AnsiString; | 004D5BF4 E8DF3BF3FF call 004097D8 004D5BF9 8B45F8 mov eax, [ebp-$08] 004D5BFC 50 push eax * Reference to control TMainForm.SBar : TStatusBar | 004D5BFD 8B8338030000 mov eax, [ebx+$0338] * Reference to field TStatusBar.Panels : TStatusPanels | 004D5C03 8B8008020000 mov eax, [eax+$0208] 004D5C09 BA03000000 mov edx, $00000003 * Reference to: ComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel; | or: QComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel; | 004D5C0E E86D3DF7FF call 00449980 004D5C13 5A pop edx * Reference to: ComCtrls.TStatusPanel.SetText(TStatusPanel;AnsiString); | or: ComCtrls.THeaderSection.SetText(THeaderSection;AnsiString); | 004D5C14 E8C33CF7FF call 004498DC 004D5C19 8D45F4 lea eax, [ebp-$0C] 004D5C1C 50 push eax * Reference to control TMainForm.SBar : TStatusBar | 004D5C1D 8B8338030000 mov eax, [ebx+$0338] * Reference to field TStatusBar.Panels : TStatusPanels | 004D5C23 8B8008020000 mov eax, [eax+$0208] 004D5C29 BA03000000 mov edx, $00000003 * Reference to: ComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel; | or: QComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel; | 004D5C2E E84D3DF7FF call 00449980 * Reference to field TStatusPanels.UpdateCount : Integer | 004D5C33 8B400C mov eax, [eax+$0C] 004D5C36 B908000000 mov ecx, $00000008 004D5C3B BA01000000 mov edx, $00000001 * Reference to: System.@LStrCopy; | 004D5C40 E86BEBF2FF call 004047B0 004D5C45 8B45F4 mov eax, [ebp-$0C] 004D5C48 50 push eax 004D5C49 8D4DF0 lea ecx, [ebp-$10] 004D5C4C 33D2 xor edx, edx * Possible String Reference to: '人兀同氟' | 004D5C4E B8E85C4D00 mov eax, $004D5CE8 | 004D5C53 E890F6FFFF call 004D52E8 004D5C58 8B55F0 mov edx, [ebp-$10] 004D5C5B 58 pop eax * Reference to: System.@LStrCmp; | 004D5C5C E83BEAF2FF call 0040469C 004D5C61 750D jnz 004D5C70 * Reference to control TMainForm.ClientSocket : TClientSocket | 004D5C63 8B8390030000 mov eax, [ebx+$0390] * Reference to: ScktComp.TAbstractSocket.Open(TAbstractSocket); | 004D5C69 E8AA71FBFF call 0048CE18 004D5C6E EB47 jmp 004D5CB7 004D5C70 33C0 xor eax, eax 004D5C72 55 push ebp 004D5C73 68AD5C4D00 push $004D5CAD ***** TRY | 004D5C78 64FF30 push dword ptr fs:[eax] 004D5C7B 648920 mov fs:[eax], esp * Reference to TLoginForm instance | 004D5C7E A1B4BC4D00 mov eax, dword ptr [$004DBCB4] 004D5C83 8B00 mov eax, [eax] * Reference to control TLoginForm.Timer1 : TTimer | 004D5C85 8B9818030000 mov ebx, [eax+$0318] 004D5C8B 33D2 xor edx, edx 004D5C8D 8BC3 mov eax, ebx * Reference to: ExtCtrls.TTimer.SetEnabled(TTimer;Boolean); | 004D5C8F E88035F6FF call 00439214 * Reference to field TTimer.Tag : Longint | 004D5C94 C7430C0A000000 mov dword ptr [ebx+$0C], $0000000A 004D5C9B 33D2 xor edx, edx * Reference to field TTimer.OFFS_003C | 004D5C9D 8B433C mov eax, [ebx+$3C] * Possible reference to virtual method TTimer.OFFS_38 | 004D5CA0 FF5338 call dword ptr [ebx+$38] 004D5CA3 33C0 xor eax, eax 004D5CA5 5A pop edx 004D5CA6 59 pop ecx 004D5CA7 59 pop ecx 004D5CA8 648910 mov fs:[eax], edx 004D5CAB EB0A jmp 004D5CB7 * Reference to: System.@HandleAnyException; | 004D5CAD E9AADCF2FF jmp 0040395C * Reference to: System.@DoneExcept; | 004D5CB2 E80DE0F2FF call 00403CC4 ****** END | 004D5CB7 33C0 xor eax, eax 004D5CB9 5A pop edx 004D5CBA 59 pop ecx 004D5CBB 59 pop ecx 004D5CBC 648910 mov fs:[eax], edx ****** FINALLY | 004D5CBF 68D95C4D00 push $004D5CD9 004D5CC4 8D45F0 lea eax, [ebp-$10] 004D5CC7 BA03000000 mov edx, $00000003 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D5CCC E8E3E5F2FF call 004042B4 004D5CD1 C3 ret * Reference to: System.@HandleFinally; | 004D5CD2 E939DFF2FF jmp 00403C10 004D5CD7 EBEB jmp 004D5CC4 ****** END | 004D5CD9 5F pop edi 004D5CDA 5E pop esi 004D5CDB 5B pop ebx 004D5CDC 8BE5 mov esp, ebp 004D5CDE 5D pop ebp 004D5CDF C3 ret *) end; procedure TMainForm._PROC_004D5EC1(Sender : TObject); begin (* 004D5EC1 6E outsb 004D5EC2 47 inc edi 004D5EC3 4D dec ebp 004D5EC4 43 inc ebx 004D5EC5 6865636B00 push $006B6365 004D5ECA 0000 add [eax], al *) end; procedure TMainForm._PROC_004D5ED7(Sender : TObject); begin (* 004D5ED7 FC cld 004D5ED8 0400 add al, +$00 004D5EDA 00FF add bh, bh 004D5EDC FFFF DB $FF, $FF // 004D5EDE FF68B9 jmp [eax-$47] 004D5EE1 0800 or [eax], al 004D5EE3 00E8 add al, ch 004D5EE5 5F pop edi 004D5EE6 3BFB cmp edi, ebx 004D5EE8 FF6689 jmp dword ptr [esi-$77] 004D5EEB 83FA04 cmp edx, +$04 004D5EEE 0000 add [eax], al *) end; procedure TMainForm._PROC_004D5EF4(Sender : TObject); begin (* 004D5EF4 F8 clc 004D5EF5 0400 add al, +$00 004D5EF7 00506A add [eax+$6A], dl 004D5EFA 005756 add [edi+$56], dl 004D5EFD 8B83E4040000 mov eax, [ebx+$04E4] 004D5F03 50 push eax | 004D5F04 E88F3BFBFF call 00489A98 004D5F09 5F pop edi 004D5F0A 5E pop esi 004D5F0B 5B pop ebx 004D5F0C C3 ret *) end; procedure TMainForm._PROC_004D67C7(Sender : TObject); begin (* * Reference to: System.@HandleFinally; | 004D67C7 E944D4F2FF jmp 00403C10 | 004D67CC EBD8 jmp 004D67A6 004D67CE 5F pop edi 004D67CF 5E pop esi 004D67D0 5B pop ebx 004D67D1 8BE5 mov esp, ebp 004D67D3 5D pop ebp 004D67D4 C3 ret *) end; procedure TMainForm._PROC_004D6971(Sender : TObject); begin (* 004D6971 8BEC mov ebp, esp 004D6973 83C4F8 add esp, -$08 004D6976 53 push ebx 004D6977 66C745F90700 mov word ptr [ebp-$07], $0007 004D697D 8B5D08 mov ebx, [ebp+$08] 004D6980 895DFC mov [ebp-$04], ebx 004D6983 8855FB mov [ebp-$05], dl 004D6986 85C9 test ecx, ecx 004D6988 750E jnz 004D6998 004D698A 0FB74DF9 movzx ecx, word ptr [ebp-$07] 004D698E 8D55F9 lea edx, [ebp-$07] | 004D6991 E836F5FFFF call 004D5ECC 004D6996 EB11 jmp 004D69A9 004D6998 6A00 push $00 004D699A 0FB745F9 movzx eax, word ptr [ebp-$07] 004D699E 50 push eax 004D699F 8D45F9 lea eax, [ebp-$07] 004D69A2 50 push eax 004D69A3 51 push ecx | 004D69A4 E8E730FBFF call 00489A90 004D69A9 5B pop ebx 004D69AA 59 pop ecx 004D69AB 59 pop ecx 004D69AC 5D pop ebp 004D69AD C20400 ret $0004 *) end; procedure TMainForm._PROC_004D6AB1(Sender : TObject); begin (* 004D6AB1 8BEC mov ebp, esp 004D6AB3 51 push ecx 004D6AB4 53 push ebx 004D6AB5 8855FF mov [ebp-$01], dl 004D6AB8 8BD8 mov ebx, eax 004D6ABA 8D5101 lea edx, [ecx+$01] * Reference to control TMainForm.MemTable : TkbmMemTable | 004D6ABD 8B83A0030000 mov eax, [ebx+$03A0] 004D6AC3 8B08 mov ecx, [eax] * Possible reference to virtual method TkbmMemTable.OFFS_01A0 | 004D6AC5 FF91A0010000 call dword ptr [ecx+$01A0] * Possible String Reference to: 'Sock' | 004D6ACB BA046B4D00 mov edx, $004D6B04 * Reference to control TMainForm.MemTable : TkbmMemTable | 004D6AD0 8B83A0030000 mov eax, [ebx+$03A0] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 004D6AD6 E831E5FCFF call 004A500C 004D6ADB 8B10 mov edx, [eax] * Possible reference to virtual method TkbmMemTable.OFFS_58 | 004D6ADD FF5258 call dword ptr [edx+$58] 004D6AE0 85C0 test eax, eax 004D6AE2 7E10 jle 004D6AF4 004D6AE4 8B5508 mov edx, [ebp+$08] 004D6AE7 52 push edx 004D6AE8 8BC8 mov ecx, eax 004D6AEA 8A55FF mov dl, byte ptr [ebp-$01] 004D6AED 8BC3 mov eax, ebx | 004D6AEF E87CFEFFFF call 004D6970 004D6AF4 5B pop ebx 004D6AF5 59 pop ecx 004D6AF6 5D pop ebp 004D6AF7 C20400 ret $0004 *) end; procedure TMainForm._PROC_004D6DC5(Sender : TObject); begin (* 004D6DC5 8BEC mov ebp, esp 004D6DC7 51 push ecx 004D6DC8 53 push ebx 004D6DC9 8955FC mov [ebp-$04], edx 004D6DCC 8BD8 mov ebx, eax 004D6DCE 8B45FC mov eax, [ebp-$04] * Reference to: System.@LStrAddRef(void;void):Pointer; | 004D6DD1 E86AD9F2FF call 00404740 004D6DD6 33C0 xor eax, eax 004D6DD8 55 push ebp * Possible String Reference to: '轶万?疔Y]?S?禾nM' | 004D6DD9 68186E4D00 push $004D6E18 ***** TRY | 004D6DDE 64FF30 push dword ptr fs:[eax] 004D6DE1 648920 mov fs:[eax], esp * Reference to control TMainForm.SBar : TStatusBar | 004D6DE4 8B8338030000 mov eax, [ebx+$0338] * Reference to field TStatusBar.Panels : TStatusPanels | 004D6DEA 8B8008020000 mov eax, [eax+$0208] 004D6DF0 BA01000000 mov edx, $00000001 * Reference to: ComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel; | or: QComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel; | 004D6DF5 E8862BF7FF call 00449980 004D6DFA 8B55FC mov edx, [ebp-$04] * Reference to: ComCtrls.TStatusPanel.SetText(TStatusPanel;AnsiString); | or: ComCtrls.THeaderSection.SetText(THeaderSection;AnsiString); | 004D6DFD E8DA2AF7FF call 004498DC 004D6E02 33C0 xor eax, eax 004D6E04 5A pop edx 004D6E05 59 pop ecx 004D6E06 59 pop ecx 004D6E07 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[Y]?S?禾nM' | 004D6E0A 681F6E4D00 push $004D6E1F 004D6E0F 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 004D6E12 E879D4F2FF call 00404290 004D6E17 C3 ret * Reference to: System.@HandleFinally; | 004D6E18 E9F3CDF2FF jmp 00403C10 004D6E1D EBF0 jmp 004D6E0F ****** END | 004D6E1F 5B pop ebx 004D6E20 59 pop ecx 004D6E21 5D pop ebp 004D6E22 C3 ret *) end; procedure TMainForm._PROC_004D7214(Sender : TObject); begin (* 004D7214 55 push ebp 004D7215 8BEC mov ebp, esp 004D7217 33C9 xor ecx, ecx 004D7219 51 push ecx 004D721A 51 push ecx 004D721B 51 push ecx 004D721C 51 push ecx 004D721D 51 push ecx 004D721E 51 push ecx 004D721F 51 push ecx 004D7220 53 push ebx 004D7221 56 push esi 004D7222 57 push edi 004D7223 8BF2 mov esi, edx 004D7225 8BF8 mov edi, eax 004D7227 33C0 xor eax, eax 004D7229 55 push ebp * Possible String Reference to: '楦闰?脒^[?]? | 004D722A 6853734D00 push $004D7353 ***** TRY | 004D722F 64FF30 push dword ptr fs:[eax] 004D7232 648920 mov fs:[eax], esp 004D7235 8BC7 mov eax, edi 004D7237 B900E1F505 mov ecx, $05F5E100 004D723C 99 cdq 004D723D F7F9 idiv ecx 004D723F 8BD8 mov ebx, eax 004D7241 8BC6 mov eax, esi * Reference to: System.@LStrClr(void;void); | 004D7243 E848D0F2FF call 00404290 004D7248 56 push esi 004D7249 8D55FC lea edx, [ebp-$04] 004D724C 8BC3 mov eax, ebx * Reference to: SysUtils.IntToStr(Integer):AnsiString;overload; | 004D724E E8E91AF3FF call 00408D3C 004D7253 8D45FC lea eax, [ebp-$04] * Possible String Reference to: '亿' | 004D7256 BA6C734D00 mov edx, $004D736C * Reference to: System.@LStrCat; | 004D725B E8F8D2F2FF call 00404558 004D7260 8B55FC mov edx, [ebp-$04] 004D7263 85DB test ebx, ebx 004D7265 0F9FC0 setnle al 004D7268 33C9 xor ecx, ecx * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D726A E87DE3FFFF call 004D55EC 004D726F 8BC7 mov eax, edi 004D7271 B900E1F505 mov ecx, $05F5E100 004D7276 99 cdq 004D7277 F7F9 idiv ecx 004D7279 8BFA mov edi, edx 004D727B 8BC7 mov eax, edi 004D727D B910270000 mov ecx, $00002710 004D7282 99 cdq 004D7283 F7F9 idiv ecx 004D7285 8BD8 mov ebx, eax 004D7287 8D45F8 lea eax, [ebp-$08] 004D728A 50 push eax 004D728B 85DB test ebx, ebx 004D728D 7E0D jle 004D729C 004D728F 81FBE8030000 cmp ebx, $000003E8 004D7295 7D05 jnl 004D729C 004D7297 833E00 cmp dword ptr [esi], +$00 004D729A 7504 jnz 004D72A0 004D729C 33C0 xor eax, eax 004D729E EB02 jmp 004D72A2 004D72A0 B001 mov al, $01 004D72A2 33C9 xor ecx, ecx * Possible String Reference to: '零' | 004D72A4 BA78734D00 mov edx, $004D7378 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D72A9 E83EE3FFFF call 004D55EC 004D72AE 8B55F8 mov edx, [ebp-$08] 004D72B1 8BC6 mov eax, esi * Reference to: System.@LStrCat; | 004D72B3 E8A0D2F2FF call 00404558 004D72B8 8D45F4 lea eax, [ebp-$0C] 004D72BB 50 push eax 004D72BC 8D45F0 lea eax, [ebp-$10] 004D72BF 50 push eax 004D72C0 833E00 cmp dword ptr [esi], +$00 004D72C3 0F95C0 setnz al 004D72C6 33C9 xor ecx, ecx * Possible String Reference to: '零' | 004D72C8 BA78734D00 mov edx, $004D7378 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D72CD E81AE3FFFF call 004D55EC 004D72D2 8B45F0 mov eax, [ebp-$10] 004D72D5 50 push eax 004D72D6 8D55EC lea edx, [ebp-$14] 004D72D9 8BC3 mov eax, ebx * Reference to: SysUtils.IntToStr(Integer):AnsiString;overload; | 004D72DB E85C1AF3FF call 00408D3C 004D72E0 8D45EC lea eax, [ebp-$14] * Possible String Reference to: '万' | 004D72E3 BA84734D00 mov edx, $004D7384 * Reference to: System.@LStrCat; | 004D72E8 E86BD2F2FF call 00404558 004D72ED 8B55EC mov edx, [ebp-$14] 004D72F0 85DB test ebx, ebx 004D72F2 0F9FC0 setnle al 004D72F5 59 pop ecx * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D72F6 E8F1E2FFFF call 004D55EC 004D72FB 8B55F4 mov edx, [ebp-$0C] 004D72FE 8BC6 mov eax, esi * Reference to: System.@LStrCat; | 004D7300 E853D2F2FF call 00404558 004D7305 8BC7 mov eax, edi 004D7307 B910270000 mov ecx, $00002710 004D730C 99 cdq 004D730D F7F9 idiv ecx 004D730F 8BDA mov ebx, edx 004D7311 8D45E8 lea eax, [ebp-$18] 004D7314 50 push eax 004D7315 8D55E4 lea edx, [ebp-$1C] 004D7318 8BC3 mov eax, ebx * Reference to: SysUtils.IntToStr(Integer):AnsiString;overload; | 004D731A E81D1AF3FF call 00408D3C 004D731F 8B55E4 mov edx, [ebp-$1C] 004D7322 85DB test ebx, ebx 004D7324 0F9FC0 setnle al 004D7327 33C9 xor ecx, ecx * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D7329 E8BEE2FFFF call 004D55EC 004D732E 8B55E8 mov edx, [ebp-$18] 004D7331 8BC6 mov eax, esi * Reference to: System.@LStrCat; | 004D7333 E820D2F2FF call 00404558 004D7338 33C0 xor eax, eax 004D733A 5A pop edx 004D733B 59 pop ecx 004D733C 59 pop ecx 004D733D 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '_^[?]? | 004D7340 685A734D00 push $004D735A 004D7345 8D45E4 lea eax, [ebp-$1C] 004D7348 BA07000000 mov edx, $00000007 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D734D E862CFF2FF call 004042B4 004D7352 C3 ret * Reference to: System.@HandleFinally; | 004D7353 E9B8C8F2FF jmp 00403C10 004D7358 EBEB jmp 004D7345 ****** END | 004D735A 5F pop edi 004D735B 5E pop esi 004D735C 5B pop ebx 004D735D 8BE5 mov esp, ebp 004D735F 5D pop ebp 004D7360 C3 ret *) end; procedure TMainForm._PROC_004D7389(Sender : TObject); begin (* 004D7389 8BEC mov ebp, esp 004D738B 6A00 push $00 004D738D 53 push ebx 004D738E 8BD8 mov ebx, eax 004D7390 33C0 xor eax, eax 004D7392 55 push ebp * Possible String Reference to: '?闰?疔Y]?U?3裳QQQQSV?3勒h汪M' | 004D7393 68E8734D00 push $004D73E8 ***** TRY | 004D7398 64FF30 push dword ptr fs:[eax] 004D739B 648920 mov fs:[eax], esp * Reference to field TMainForm.OFFS_04E0 | 004D739E 8993E0040000 mov [ebx+$04E0], edx 004D73A4 8D55FC lea edx, [ebp-$04] * Reference to field TMainForm.OFFS_04E0 | 004D73A7 8B83E0040000 mov eax, [ebx+$04E0] * Reference to : TMainForm._PROC_004D7214() | 004D73AD E862FEFFFF call 004D7214 004D73B2 8B45FC mov eax, [ebp-$04] 004D73B5 50 push eax * Reference to control TMainForm.SBar : TStatusBar | 004D73B6 8B8338030000 mov eax, [ebx+$0338] * Reference to field TStatusBar.Panels : TStatusPanels | 004D73BC 8B8008020000 mov eax, [eax+$0208] 004D73C2 BA05000000 mov edx, $00000005 * Reference to: ComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel; | or: QComCtrls.TStatusPanels.GetItem(TStatusPanels;Integer):TStatusPanel; | 004D73C7 E8B425F7FF call 00449980 004D73CC 5A pop edx * Reference to: ComCtrls.TStatusPanel.SetText(TStatusPanel;AnsiString); | or: ComCtrls.THeaderSection.SetText(THeaderSection;AnsiString); | 004D73CD E80A25F7FF call 004498DC 004D73D2 33C0 xor eax, eax 004D73D4 5A pop edx 004D73D5 59 pop ecx 004D73D6 59 pop ecx 004D73D7 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[Y]?U?3裳QQQQSV?3勒h汪M' | 004D73DA 68EF734D00 push $004D73EF 004D73DF 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 004D73E2 E8A9CEF2FF call 00404290 004D73E7 C3 ret * Reference to: System.@HandleFinally; | 004D73E8 E923C8F2FF jmp 00403C10 004D73ED EBF0 jmp 004D73DF ****** END | 004D73EF 5B pop ebx 004D73F0 59 pop ecx 004D73F1 5D pop ebp 004D73F2 C3 ret *) end; procedure TMainForm._PROC_004D74FD(Sender : TObject); begin (* 004D74FD C4F8 les edi, ax 004D74FF 66C704240800 mov word ptr [esp], $0008 004D7505 C644240210 mov byte ptr [esp+$02], $10 004D750A A0A8D44D00 mov al, byte ptr [$004DD4A8] 004D750F 88442407 mov [esp+$07], al 004D7513 6A00 push $00 004D7515 0FB7442404 movzx eax, word ptr [esp+$04] 004D751A 50 push eax 004D751B 8D442408 lea eax, [esp+$08] 004D751F 50 push eax 004D7520 52 push edx | 004D7521 E86A25FBFF call 00489A90 004D7526 59 pop ecx 004D7527 5A pop edx 004D7528 C3 ret *) end; procedure TMainForm._PROC_004D77C4(Sender : TObject); begin (* 004D77C4 55 push ebp 004D77C5 8BEC mov ebp, esp 004D77C7 B909000000 mov ecx, $00000009 004D77CC 6A00 push $00 004D77CE 6A00 push $00 004D77D0 49 dec ecx 004D77D1 75F9 jnz 004D77CC 004D77D3 53 push ebx 004D77D4 56 push esi 004D77D5 57 push edi 004D77D6 8BFA mov edi, edx 004D77D8 8BD8 mov ebx, eax 004D77DA 33C0 xor eax, eax 004D77DC 55 push ebp 004D77DD 68027A4D00 push $004D7A02 ***** TRY | 004D77E2 64FF30 push dword ptr fs:[eax] 004D77E5 648920 mov fs:[eax], esp 004D77E8 33C0 xor eax, eax 004D77EA 55 push ebp 004D77EB 68D0794D00 push $004D79D0 ***** TRY | 004D77F0 64FF30 push dword ptr fs:[eax] 004D77F3 648920 mov fs:[eax], esp 004D77F6 8BD7 mov edx, edi 004D77F8 4A dec edx * Reference to control TMainForm.ServerInfoList : TListView | 004D77F9 8B83F4030000 mov eax, [ebx+$03F4] * Reference to field TListView.Items : TListItems | 004D77FF 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem; | 004D7805 E83242F7FF call 0044BA3C * Reference to field TListItems.OFFS_0008 | 004D780A 8B7008 mov esi, [eax+$08] 004D780D 8D04BF lea eax, [edi+edi*4] 004D7810 8D0480 lea eax, [eax+eax*4] 004D7813 8D9811CF4D00 lea ebx, [eax+$4DCF11] 004D7819 8BC6 mov eax, esi 004D781B 8B10 mov edx, [eax] 004D781D FF5244 call dword ptr [edx+$44] 004D7820 8D45FC lea eax, [ebp-$04] 004D7823 50 push eax 004D7824 8A03 mov al, byte ptr [ebx] 004D7826 B9187A4D00 mov ecx, $004D7A18 * Possible String Reference to: '在线' | 004D782B BA247A4D00 mov edx, $004D7A24 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D7830 E8B7DDFFFF call 004D55EC 004D7835 8B55FC mov edx, [ebp-$04] 004D7838 8BC6 mov eax, esi * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D783A E84D77F4FF call 0041EF8C 004D783F 8D45F8 lea eax, [ebp-$08] 004D7842 50 push eax 004D7843 8D55F4 lea edx, [ebp-$0C] 004D7846 8D047F lea eax, [edi+edi*2] 004D7849 0FB704458ED34D00 movzx eax, word ptr [$4DD38E+eax*2] * Reference to: SysUtils.IntToStr(Integer):AnsiString;overload; | 004D7851 E8E614F3FF call 00408D3C 004D7856 8B55F4 mov edx, [ebp-$0C] 004D7859 8D047F lea eax, [edi+edi*2] 004D785C 66833C458ED34D0000 cmp word ptr [$4DD38E+eax*2], +$00 004D7865 0F97C0 setnbe al 004D7868 B9187A4D00 mov ecx, $004D7A18 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D786D E87ADDFFFF call 004D55EC 004D7872 8B55F8 mov edx, [ebp-$08] 004D7875 8BC6 mov eax, esi * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D7877 E81077F4FF call 0041EF8C 004D787C 8D45F0 lea eax, [ebp-$10] 004D787F 50 push eax 004D7880 8D55EC lea edx, [ebp-$14] 004D7883 0FB74301 movzx eax, word ptr [ebx+$01] * Reference to: SysUtils.IntToStr(Integer):AnsiString;overload; | 004D7887 E8B014F3FF call 00408D3C 004D788C 8B55EC mov edx, [ebp-$14] 004D788F 66837B0100 cmp word ptr [ebx+$01], +$00 004D7894 0F97C0 setnbe al 004D7897 B9187A4D00 mov ecx, $004D7A18 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D789C E84BDDFFFF call 004D55EC 004D78A1 8B55F0 mov edx, [ebp-$10] 004D78A4 8BC6 mov eax, esi * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D78A6 E8E176F4FF call 0041EF8C 004D78AB 8D45E8 lea eax, [ebp-$18] 004D78AE 50 push eax 004D78AF 8D45E4 lea eax, [ebp-$1C] 004D78B2 50 push eax 004D78B3 FF7307 push dword ptr [ebx+$07] 004D78B6 FF7303 push dword ptr [ebx+$03] 004D78B9 8D55D0 lea edx, [ebp-$30] * Possible String Reference to: 'YY-MM-DD HH:MM' | 004D78BC B8347A4D00 mov eax, $004D7A34 | 004D78C1 E8F241F3FF call 0040BAB8 004D78C6 8B45D0 mov eax, [ebp-$30] 004D78C9 8945D4 mov [ebp-$2C], eax 004D78CC C645D80B mov byte ptr [ebp-$28], $0B 004D78D0 0FBF430B movsx eax, word ptr [ebx+$0B] 004D78D4 8945DC mov [ebp-$24], eax 004D78D7 C645E000 mov byte ptr [ebp-$20], $00 004D78DB 8D55D4 lea edx, [ebp-$2C] 004D78DE B901000000 mov ecx, $00000001 * Possible String Reference to: '%S |%04.d' | 004D78E3 B84C7A4D00 mov eax, $004D7A4C | 004D78E8 E8DB23F3FF call 00409CC8 004D78ED 8B55E4 mov edx, [ebp-$1C] 004D78F0 DD4303 fld qword ptr [ebx+$03] 004D78F3 D81D587A4D00 fcomp dword ptr [$004D7A58] 004D78F9 DFE0 fstsw ax 004D78FB 9E sahf 004D78FC 0F97C0 setnbe al 004D78FF B9187A4D00 mov ecx, $004D7A18 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D7904 E8E3DCFFFF call 004D55EC 004D7909 8B55E8 mov edx, [ebp-$18] 004D790C 8BC6 mov eax, esi * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D790E E87976F4FF call 0041EF8C 004D7913 8D45CC lea eax, [ebp-$34] 004D7916 50 push eax 004D7917 8D45C8 lea eax, [ebp-$38] 004D791A 50 push eax 004D791B FF7311 push dword ptr [ebx+$11] 004D791E FF730D push dword ptr [ebx+$0D] 004D7921 8D55C4 lea edx, [ebp-$3C] * Possible String Reference to: 'YY-MM-DD HH:MM' | 004D7924 B8347A4D00 mov eax, $004D7A34 | 004D7929 E88A41F3FF call 0040BAB8 004D792E 8B45C4 mov eax, [ebp-$3C] 004D7931 8945D4 mov [ebp-$2C], eax 004D7934 C645D80B mov byte ptr [ebp-$28], $0B 004D7938 0FBF4315 movsx eax, word ptr [ebx+$15] 004D793C 8945DC mov [ebp-$24], eax 004D793F C645E000 mov byte ptr [ebp-$20], $00 004D7943 8D55D4 lea edx, [ebp-$2C] 004D7946 B901000000 mov ecx, $00000001 * Possible String Reference to: '%S |%04.d' | 004D794B B84C7A4D00 mov eax, $004D7A4C | 004D7950 E87323F3FF call 00409CC8 004D7955 8B55C8 mov edx, [ebp-$38] 004D7958 DD430D fld qword ptr [ebx+$0D] 004D795B D81D587A4D00 fcomp dword ptr [$004D7A58] 004D7961 DFE0 fstsw ax 004D7963 9E sahf 004D7964 0F97C0 setnbe al 004D7967 B9187A4D00 mov ecx, $004D7A18 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D796C E87BDCFFFF call 004D55EC 004D7971 8B55CC mov edx, [ebp-$34] 004D7974 8BC6 mov eax, esi * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D7976 E81176F4FF call 0041EF8C 004D797B 8D45C0 lea eax, [ebp-$40] 004D797E 50 push eax 004D797F 8D55BC lea edx, [ebp-$44] 004D7982 0FB74317 movzx eax, word ptr [ebx+$17] * Reference to: SysUtils.IntToStr(Integer):AnsiString;overload; | 004D7986 E8B113F3FF call 00408D3C 004D798B 8B55BC mov edx, [ebp-$44] 004D798E 66837B1700 cmp word ptr [ebx+$17], +$00 004D7993 0F97C0 setnbe al 004D7996 B9187A4D00 mov ecx, $004D7A18 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D799B E84CDCFFFF call 004D55EC 004D79A0 8B55C0 mov edx, [ebp-$40] 004D79A3 8BC6 mov eax, esi * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D79A5 E8E275F4FF call 0041EF8C 004D79AA 8D55B8 lea edx, [ebp-$48] 004D79AD 8D047F lea eax, [edi+edi*2] 004D79B0 8B044590D34D00 mov eax, [$4DD390+eax*2] * Reference to : TMainForm._PROC_004D7214() | 004D79B7 E858F8FFFF call 004D7214 004D79BC 8B55B8 mov edx, [ebp-$48] 004D79BF 8BC6 mov eax, esi * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D79C1 E8C675F4FF call 0041EF8C 004D79C6 33C0 xor eax, eax 004D79C8 5A pop edx 004D79C9 59 pop ecx 004D79CA 59 pop ecx 004D79CB 648910 mov fs:[eax], edx 004D79CE EB0A jmp 004D79DA * Reference to: System.@HandleAnyException; | 004D79D0 E987BFF2FF jmp 0040395C * Reference to: System.@DoneExcept; | 004D79D5 E8EAC2F2FF call 00403CC4 ****** END | 004D79DA 33C0 xor eax, eax 004D79DC 5A pop edx 004D79DD 59 pop ecx 004D79DE 59 pop ecx 004D79DF 648910 mov fs:[eax], edx ****** FINALLY | 004D79E2 68097A4D00 push $004D7A09 004D79E7 8D45B8 lea eax, [ebp-$48] 004D79EA BA07000000 mov edx, $00000007 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D79EF E8C0C8F2FF call 004042B4 004D79F4 8D45E4 lea eax, [ebp-$1C] 004D79F7 BA07000000 mov edx, $00000007 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D79FC E8B3C8F2FF call 004042B4 004D7A01 C3 ret * Reference to: System.@HandleFinally; | 004D7A02 E909C2F2FF jmp 00403C10 004D7A07 EBDE jmp 004D79E7 ****** END | 004D7A09 5F pop edi 004D7A0A 5E pop esi 004D7A0B 5B pop ebx 004D7A0C 8BE5 mov esp, ebp 004D7A0E 5D pop ebp 004D7A0F C3 ret *) end; procedure TMainForm._PROC_004D7D91(Sender : TObject); begin (* 004D7D91 8BEC mov ebp, esp 004D7D93 83C4A8 add esp, -$58 004D7D96 53 push ebx 004D7D97 56 push esi 004D7D98 57 push edi 004D7D99 33DB xor ebx, ebx 004D7D9B 895DB0 mov [ebp-$50], ebx 004D7D9E 895DB8 mov [ebp-$48], ebx 004D7DA1 895DB4 mov [ebp-$4C], ebx 004D7DA4 895DC8 mov [ebp-$38], ebx 004D7DA7 895DC4 mov [ebp-$3C], ebx 004D7DAA 895DC0 mov [ebp-$40], ebx 004D7DAD 895DBC mov [ebp-$44], ebx 004D7DB0 895DE0 mov [ebp-$20], ebx 004D7DB3 895DCC mov [ebp-$34], ebx 004D7DB6 8BF1 mov esi, ecx 004D7DB8 8D7DE7 lea edi, [ebp-$19] 004D7DBB B906000000 mov ecx, $00000006 004D7DC0 F3 rep 004D7DC1 A5 movsd 004D7DC2 A4 movsb 004D7DC3 8BDA mov ebx, edx 004D7DC5 8BF0 mov esi, eax 004D7DC7 33C0 xor eax, eax 004D7DC9 55 push ebp * Possible String Reference to: '轶候?氵^[?]? | 004D7DCA 6818814D00 push $004D8118 ***** TRY | 004D7DCF 64FF30 push dword ptr fs:[eax] 004D7DD2 648920 mov fs:[eax], esp 004D7DD5 33C0 xor eax, eax 004D7DD7 8AC3 mov al, bl 004D7DD9 8D0480 lea eax, [eax+eax*4] 004D7DDC 8D0480 lea eax, [eax+eax*4] 004D7DDF 8DB811CF4D00 lea edi, [eax+$4DCF11] 004D7DE5 8A07 mov al, byte ptr [edi] 004D7DE7 3A45E7 cmp al, byte ptr [ebp-$19] 004D7DEA 0F84B7000000 jz 004D7EA7 004D7DF0 33D2 xor edx, edx 004D7DF2 8AD3 mov dl, bl 004D7DF4 4A dec edx * Reference to control TMainForm.ServerInfoList : TListView | 004D7DF5 8B86F4030000 mov eax, [esi+$03F4] * Reference to field TListView.Items : TListItems | 004D7DFB 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem; | 004D7E01 E8363CF7FF call 0044BA3C * Reference to: ComCtrls.TListItem.GetChecked(TListItem):Boolean; | 004D7E06 E89935F7FF call 0044B3A4 004D7E0B 84C0 test al, al 004D7E0D 7512 jnz 004D7E21 * Reference to control TMainForm.UnGMCheck : TCheckBox | 004D7E0F 8B86DC040000 mov eax, [esi+$04DC] 004D7E15 8B10 mov edx, [eax] * Reference to method TCheckBox.GetChecked() | 004D7E17 FF92C8000000 call dword ptr [edx+$00C8] 004D7E1D 84C0 test al, al 004D7E1F 754E jnz 004D7E6F 004D7E21 8D45E0 lea eax, [ebp-$20] 004D7E24 50 push eax 004D7E25 33C0 xor eax, eax 004D7E27 8AC3 mov al, bl 004D7E29 8945D0 mov [ebp-$30], eax 004D7E2C C645D400 mov byte ptr [ebp-$2C], $00 004D7E30 8D45CC lea eax, [ebp-$34] 004D7E33 50 push eax * Possible String Reference to: '下线了' | 004D7E34 B930814D00 mov ecx, $004D8130 * Possible String Reference to: '上线了' | 004D7E39 BA40814D00 mov edx, $004D8140 004D7E3E 8A45E7 mov al, byte ptr [ebp-$19] * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D7E41 E8A6D7FFFF call 004D55EC 004D7E46 8B45CC mov eax, [ebp-$34] 004D7E49 8945D8 mov [ebp-$28], eax 004D7E4C C645DC0B mov byte ptr [ebp-$24], $0B 004D7E50 8D55D0 lea edx, [ebp-$30] 004D7E53 B901000000 mov ecx, $00000001 * Possible String Reference to: '第 %02.D 服务器 GM %S' | 004D7E58 B850814D00 mov eax, $004D8150 | 004D7E5D E8661EF3FF call 00409CC8 004D7E62 8B45E0 mov eax, [ebp-$20] 004D7E65 BA00800000 mov edx, $00008000 | 004D7E6A E861D5FFFF call 004D53D0 004D7E6F 33D2 xor edx, edx 004D7E71 8AD3 mov dl, bl 004D7E73 4A dec edx * Reference to control TMainForm.ServerInfoList : TListView | 004D7E74 8B86F4030000 mov eax, [esi+$03F4] * Reference to field TListView.Items : TListItems | 004D7E7A 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem; | 004D7E80 E8B73BF7FF call 0044BA3C * Reference to: ComCtrls.TListItem.GetChecked(TListItem):Boolean; | 004D7E85 E81A35F7FF call 0044B3A4 004D7E8A 84C0 test al, al 004D7E8C 7419 jz 004D7EA7 * Reference to control TMainForm.GMOLCheck : TCheckBox | 004D7E8E 8B8604040000 mov eax, [esi+$0404] 004D7E94 8B10 mov edx, [eax] * Reference to method TCheckBox.GetChecked() | 004D7E96 FF92C8000000 call dword ptr [edx+$00C8] 004D7E9C 84C0 test al, al 004D7E9E 7407 jz 004D7EA7 004D7EA0 C605BCD44D0001 mov byte ptr [$004DD4BC], $01 004D7EA7 DD4703 fld qword ptr [edi+$03] 004D7EAA DC5DEA fcomp qword ptr [ebp-$16] 004D7EAD DFE0 fstsw ax 004D7EAF 9E sahf 004D7EB0 0F84F9000000 jz 004D7FAF 004D7EB6 8D45C8 lea eax, [ebp-$38] 004D7EB9 50 push eax 004D7EBA 33C0 xor eax, eax 004D7EBC 8AC3 mov al, bl 004D7EBE 8945D0 mov [ebp-$30], eax 004D7EC1 C645D400 mov byte ptr [ebp-$2C], $00 004D7EC5 8D45C4 lea eax, [ebp-$3C] 004D7EC8 50 push eax 004D7EC9 8D4DBC lea ecx, [ebp-$44] 004D7ECC 668B55F2 mov dx, word ptr [ebp-$0E] 004D7ED0 8BC6 mov eax, esi | 004D7ED2 E835070000 call 004D860C 004D7ED7 8B4DBC mov ecx, [ebp-$44] 004D7EDA 8D45C0 lea eax, [ebp-$40] * Possible String Reference to: ',之前活动在:' | 004D7EDD BA70814D00 mov edx, $004D8170 * Reference to: System.@LStrCat3; | 004D7EE2 E8B5C6F2FF call 0040459C 004D7EE7 8B4DC0 mov ecx, [ebp-$40] 004D7EEA 66837DF200 cmp word ptr [ebp-$0E], +$00 004D7EEF 0F9CC0 setl al 004D7EF2 33D2 xor edx, edx * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D7EF4 E8F3D6FFFF call 004D55EC 004D7EF9 8B45C4 mov eax, [ebp-$3C] 004D7EFC 8945D8 mov [ebp-$28], eax 004D7EFF C645DC0B mov byte ptr [ebp-$24], $0B 004D7F03 8D55D0 lea edx, [ebp-$30] 004D7F06 B901000000 mov ecx, $00000001 * Possible String Reference to: '第 %02.D 服务器 有人被拖入GM小屋%S' | 004D7F0B B888814D00 mov eax, $004D8188 | 004D7F10 E8B31DF3FF call 00409CC8 004D7F15 8B45C8 mov eax, [ebp-$38] 004D7F18 BA80000000 mov edx, $00000080 | 004D7F1D E8AED4FFFF call 004D53D0 004D7F22 66837DF200 cmp word ptr [ebp-$0E], +$00 004D7F27 0F8C82000000 jl 004D7FAF 004D7F2D 33D2 xor edx, edx 004D7F2F 8AD3 mov dl, bl 004D7F31 4A dec edx * Reference to control TMainForm.ServerInfoList : TListView | 004D7F32 8B86F4030000 mov eax, [esi+$03F4] * Reference to field TListView.Items : TListItems | 004D7F38 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem; | 004D7F3E E8F93AF7FF call 0044BA3C * Reference to: ComCtrls.TListItem.GetChecked(TListItem):Boolean; | 004D7F43 E85C34F7FF call 0044B3A4 004D7F48 84C0 test al, al 004D7F4A 7463 jz 004D7FAF * Reference to control TMainForm.GMRoomCheck : TCheckBox | 004D7F4C 8B8608040000 mov eax, [esi+$0408] 004D7F52 8B10 mov edx, [eax] * Reference to method TCheckBox.GetChecked() | 004D7F54 FF92C8000000 call dword ptr [edx+$00C8] 004D7F5A 84C0 test al, al 004D7F5C 7407 jz 004D7F65 004D7F5E C605BCD44D0001 mov byte ptr [$004DD4BC], $01 * Reference to TOptionForm instance | 004D7F65 A1C0BD4D00 mov eax, dword ptr [$004DBDC0] 004D7F6A 8B00 mov eax, [eax] * Reference to control TOptionForm.GMROOMRadio : TRadioGroup | 004D7F6C 8B80F8020000 mov eax, [eax+$02F8] * Reference to field TRadioGroup.ItemIndex : Integer | 004D7F72 8B8018020000 mov eax, [eax+$0218] 004D7F78 83E801 sub eax, +$01 004D7F7B 7207 jb 004D7F84 004D7F7D 740E jz 004D7F8D 004D7F7F 48 dec eax 004D7F80 741D jz 004D7F9F 004D7F82 EB2B jmp 004D7FAF 004D7F84 C605BCD44D0001 mov byte ptr [$004DD4BC], $01 004D7F8B EB22 jmp 004D7FAF 004D7F8D 33C0 xor eax, eax 004D7F8F 8AC3 mov al, bl 004D7F91 50 push eax 004D7F92 33C9 xor ecx, ecx 004D7F94 B20A mov dl, $0A 004D7F96 8BC6 mov eax, esi | 004D7F98 E8D3E9FFFF call 004D6970 004D7F9D EB10 jmp 004D7FAF 004D7F9F 33C0 xor eax, eax 004D7FA1 8AC3 mov al, bl 004D7FA3 50 push eax 004D7FA4 33C9 xor ecx, ecx 004D7FA6 B209 mov dl, $09 004D7FA8 8BC6 mov eax, esi | 004D7FAA E8C1E9FFFF call 004D6970 004D7FAF DD470D fld qword ptr [edi+$0D] 004D7FB2 DC5DF4 fcomp qword ptr [ebp-$0C] 004D7FB5 DFE0 fstsw ax 004D7FB7 9E sahf 004D7FB8 0F84C8000000 jz 004D8086 004D7FBE 8D45B8 lea eax, [ebp-$48] 004D7FC1 50 push eax 004D7FC2 33C0 xor eax, eax 004D7FC4 8AC3 mov al, bl 004D7FC6 8945D0 mov [ebp-$30], eax 004D7FC9 C645D400 mov byte ptr [ebp-$2C], $00 004D7FCD 8D4DB4 lea ecx, [ebp-$4C] 004D7FD0 668B55FC mov dx, word ptr [ebp-$04] 004D7FD4 8BC6 mov eax, esi | 004D7FD6 E831060000 call 004D860C 004D7FDB 8B45B4 mov eax, [ebp-$4C] 004D7FDE 8945D8 mov [ebp-$28], eax 004D7FE1 C645DC0B mov byte ptr [ebp-$24], $0B 004D7FE5 8D55D0 lea edx, [ebp-$30] 004D7FE8 B901000000 mov ecx, $00000001 * Possible String Reference to: '第 %02.D 服务器 有人在%S看到了GM' | 004D7FED B8B4814D00 mov eax, $004D81B4 | 004D7FF2 E8D11CF3FF call 00409CC8 004D7FF7 8B45B8 mov eax, [ebp-$48] 004D7FFA BAFF00FF00 mov edx, $00FF00FF | 004D7FFF E8CCD3FFFF call 004D53D0 004D8004 33D2 xor edx, edx 004D8006 8AD3 mov dl, bl 004D8008 4A dec edx * Reference to control TMainForm.ServerInfoList : TListView | 004D8009 8B86F4030000 mov eax, [esi+$03F4] * Reference to field TListView.Items : TListItems | 004D800F 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem; | 004D8015 E8223AF7FF call 0044BA3C * Reference to: ComCtrls.TListItem.GetChecked(TListItem):Boolean; | 004D801A E88533F7FF call 0044B3A4 004D801F 84C0 test al, al 004D8021 7463 jz 004D8086 * Reference to control TMainForm.SeeGMCheck : TCheckBox | 004D8023 8B860C040000 mov eax, [esi+$040C] 004D8029 8B10 mov edx, [eax] * Reference to method TCheckBox.GetChecked() | 004D802B FF92C8000000 call dword ptr [edx+$00C8] 004D8031 84C0 test al, al 004D8033 7407 jz 004D803C 004D8035 C605BCD44D0001 mov byte ptr [$004DD4BC], $01 * Reference to TOptionForm instance | 004D803C A1C0BD4D00 mov eax, dword ptr [$004DBDC0] 004D8041 8B00 mov eax, [eax] * Reference to control TOptionForm.SeeGMRadio : TRadioGroup | 004D8043 8B8004030000 mov eax, [eax+$0304] * Reference to field TRadioGroup.ItemIndex : Integer | 004D8049 8B8018020000 mov eax, [eax+$0218] 004D804F 83E801 sub eax, +$01 004D8052 7207 jb 004D805B 004D8054 740E jz 004D8064 004D8056 48 dec eax 004D8057 741D jz 004D8076 004D8059 EB2B jmp 004D8086 004D805B C605BCD44D0001 mov byte ptr [$004DD4BC], $01 004D8062 EB22 jmp 004D8086 004D8064 33C0 xor eax, eax 004D8066 8AC3 mov al, bl 004D8068 50 push eax 004D8069 33C9 xor ecx, ecx 004D806B B20A mov dl, $0A 004D806D 8BC6 mov eax, esi | 004D806F E8FCE8FFFF call 004D6970 004D8074 EB10 jmp 004D8086 004D8076 33C0 xor eax, eax 004D8078 8AC3 mov al, bl 004D807A 50 push eax 004D807B 33C9 xor ecx, ecx 004D807D B209 mov dl, $09 004D807F 8BC6 mov eax, esi | 004D8081 E8EAE8FFFF call 004D6970 004D8086 668B4717 mov ax, word ptr [edi+$17] 004D808A 663B45FE cmp ax, word ptr [ebp-$02] 004D808E 7465 jz 004D80F5 004D8090 8D45B0 lea eax, [ebp-$50] 004D8093 50 push eax 004D8094 8BFB mov edi, ebx 004D8096 81E7FF000000 and edi, $000000FF 004D809C 897DA8 mov [ebp-$58], edi 004D809F C645AC00 mov byte ptr [ebp-$54], $00 004D80A3 8D55A8 lea edx, [ebp-$58] 004D80A6 33C9 xor ecx, ecx * Possible String Reference to: '第 %02.D 服务器 收到新的封号信息' | 004D80A8 B8E0814D00 mov eax, $004D81E0 | 004D80AD E8161CF3FF call 00409CC8 004D80B2 8B45B0 mov eax, [ebp-$50] 004D80B5 BAFF000000 mov edx, $000000FF | 004D80BA E811D3FFFF call 004D53D0 004D80BF 8BD7 mov edx, edi 004D80C1 4A dec edx * Reference to control TMainForm.ServerInfoList : TListView | 004D80C2 8B86F4030000 mov eax, [esi+$03F4] * Reference to field TListView.Items : TListItems | 004D80C8 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem; | 004D80CE E86939F7FF call 0044BA3C * Reference to: ComCtrls.TListItem.GetChecked(TListItem):Boolean; | 004D80D3 E8CC32F7FF call 0044B3A4 004D80D8 84C0 test al, al 004D80DA 7419 jz 004D80F5 * Reference to control TMainForm.FHCheck : TCheckBox | 004D80DC 8B8610040000 mov eax, [esi+$0410] 004D80E2 8B10 mov edx, [eax] * Reference to method TCheckBox.GetChecked() | 004D80E4 FF92C8000000 call dword ptr [edx+$00C8] 004D80EA 84C0 test al, al 004D80EC 7407 jz 004D80F5 004D80EE C605BCD44D0001 mov byte ptr [$004DD4BC], $01 004D80F5 33C0 xor eax, eax 004D80F7 5A pop edx 004D80F8 59 pop ecx 004D80F9 59 pop ecx 004D80FA 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '_^[?]? | 004D80FD 681F814D00 push $004D811F 004D8102 8D45B0 lea eax, [ebp-$50] 004D8105 BA08000000 mov edx, $00000008 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D810A E8A5C1F2FF call 004042B4 004D810F 8D45E0 lea eax, [ebp-$20] * Reference to: System.@LStrClr(void;void); | 004D8112 E879C1F2FF call 00404290 004D8117 C3 ret * Reference to: System.@HandleFinally; | 004D8118 E9F3BAF2FF jmp 00403C10 004D811D EBE3 jmp 004D8102 ****** END | 004D811F 5F pop edi 004D8120 5E pop esi 004D8121 5B pop ebx 004D8122 8BE5 mov esp, ebp 004D8124 5D pop ebp 004D8125 C3 ret *) end; procedure TMainForm._PROC_004D842C(Sender : TObject); begin (* 004D842C 55 push ebp 004D842D 8BEC mov ebp, esp 004D842F B904000000 mov ecx, $00000004 004D8434 6A00 push $00 004D8436 6A00 push $00 004D8438 49 dec ecx 004D8439 75F9 jnz 004D8434 004D843B 51 push ecx 004D843C 53 push ebx 004D843D 56 push esi 004D843E 57 push edi 004D843F 8BD8 mov ebx, eax 004D8441 33C0 xor eax, eax 004D8443 55 push ebp * Possible String Reference to: '轶厄?脒^[?]? | 004D8444 6898854D00 push $004D8598 ***** TRY | 004D8449 64FF30 push dword ptr fs:[eax] 004D844C 648920 mov fs:[eax], esp * Possible String Reference to: 'SvrID' | 004D844F BAB0854D00 mov edx, $004D85B0 * Reference to control TMainForm.MemTable : TkbmMemTable | 004D8454 8B83A0030000 mov eax, [ebx+$03A0] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 004D845A E8ADCBFCFF call 004A500C 004D845F 8B10 mov edx, [eax] * Possible reference to virtual method TkbmMemTable.OFFS_58 | 004D8461 FF5258 call dword ptr [edx+$58] 004D8464 8BF0 mov esi, eax * Reference to control TMainForm.MemTable : TkbmMemTable | 004D8466 8B83A0030000 mov eax, [ebx+$03A0] 004D846C 8B10 mov edx, [eax] * Possible reference to virtual method TkbmMemTable.OFFS_0150 | 004D846E FF9250010000 call dword ptr [edx+$0150] 004D8474 8BD0 mov edx, eax 004D8476 4A dec edx * Reference to control TMainForm.IDList : TListView | 004D8477 8B8344040000 mov eax, [ebx+$0444] * Reference to field TListView.Items : TListItems | 004D847D 8B802C020000 mov eax, [eax+$022C] * Reference to: ComCtrls.TListItems.GetItem(TListItems;Integer):TListItem; | 004D8483 E8B435F7FF call 0044BA3C 004D8488 8945FC mov [ebp-$04], eax 004D848B 8D45F8 lea eax, [ebp-$08] 004D848E 50 push eax * Possible String Reference to: 'GameID' | 004D848F BAC0854D00 mov edx, $004D85C0 * Reference to control TMainForm.MemTable : TkbmMemTable | 004D8494 8B83A0030000 mov eax, [ebx+$03A0] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 004D849A E86DCBFCFF call 004A500C 004D849F 8D55F4 lea edx, [ebp-$0C] 004D84A2 8B08 mov ecx, [eax] * Possible reference to virtual method TkbmMemTable.OFFS_60 | 004D84A4 FF5160 call dword ptr [ecx+$60] 004D84A7 8B4DF4 mov ecx, [ebp-$0C] 004D84AA 85F6 test esi, esi 004D84AC 0F9CC0 setl al * Possible String Reference to: '待机' | 004D84AF BAD0854D00 mov edx, $004D85D0 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D84B4 E833D1FFFF call 004D55EC 004D84B9 8B55F8 mov edx, [ebp-$08] * Reference to MainForm | 004D84BC 8B45FC mov eax, [ebp-$04] * Reference to: ComCtrls.TListItem.SetCaption(TListItem;AnsiString); | 004D84BF E88C2FF7FF call 0044B450 * Reference to MainForm | 004D84C4 8B45FC mov eax, [ebp-$04] * Reference to field TListItems.OFFS_0008 | 004D84C7 8B7808 mov edi, [eax+$08] 004D84CA 8BC7 mov eax, edi 004D84CC 8B10 mov edx, [eax] 004D84CE FF5244 call dword ptr [edx+$44] 004D84D1 8D45F0 lea eax, [ebp-$10] 004D84D4 50 push eax 004D84D5 8D55EC lea edx, [ebp-$14] 004D84D8 8BC6 mov eax, esi * Reference to: SysUtils.IntToStr(Integer):AnsiString;overload; | 004D84DA E85D08F3FF call 00408D3C 004D84DF 8B4DEC mov ecx, [ebp-$14] 004D84E2 85F6 test esi, esi 004D84E4 0F9CC0 setl al 004D84E7 BAE0854D00 mov edx, $004D85E0 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D84EC E8FBD0FFFF call 004D55EC 004D84F1 8B55F0 mov edx, [ebp-$10] 004D84F4 8BC7 mov eax, edi * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D84F6 E8916AF4FF call 0041EF8C 004D84FB 8D45E8 lea eax, [ebp-$18] 004D84FE 50 push eax * Possible String Reference to: 'MapID' | 004D84FF BAEC854D00 mov edx, $004D85EC * Reference to control TMainForm.MemTable : TkbmMemTable | 004D8504 8B83A0030000 mov eax, [ebx+$03A0] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 004D850A E8FDCAFCFF call 004A500C 004D850F 8D55E4 lea edx, [ebp-$1C] 004D8512 8B08 mov ecx, [eax] * Possible reference to virtual method TkbmMemTable.OFFS_60 | 004D8514 FF5160 call dword ptr [ecx+$60] 004D8517 8B4DE4 mov ecx, [ebp-$1C] 004D851A 85F6 test esi, esi 004D851C 0F9CC0 setl al 004D851F BAE0854D00 mov edx, $004D85E0 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D8524 E8C3D0FFFF call 004D55EC 004D8529 8B55E8 mov edx, [ebp-$18] 004D852C 8BC7 mov eax, edi * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D852E E8596AF4FF call 0041EF8C 004D8533 8D45E0 lea eax, [ebp-$20] 004D8536 50 push eax * Possible String Reference to: 'Gold' | 004D8537 BAFC854D00 mov edx, $004D85FC * Reference to control TMainForm.MemTable : TkbmMemTable | 004D853C 8B83A0030000 mov eax, [ebx+$03A0] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 004D8542 E8C5CAFCFF call 004A500C 004D8547 8B10 mov edx, [eax] * Possible reference to virtual method TkbmMemTable.OFFS_58 | 004D8549 FF5258 call dword ptr [edx+$58] 004D854C 8D55DC lea edx, [ebp-$24] * Reference to : TMainForm._PROC_004D7214() | 004D854F E8C0ECFFFF call 004D7214 004D8554 8B4DDC mov ecx, [ebp-$24] 004D8557 85F6 test esi, esi 004D8559 0F9CC0 setl al 004D855C BAE0854D00 mov edx, $004D85E0 * Reference to: xmlutil.MapDateTime(AnsiString;AnsiString;AnsiString;Boolean):AnsiString; | 004D8561 E886D0FFFF call 004D55EC 004D8566 8B55E0 mov edx, [ebp-$20] 004D8569 8BC7 mov eax, edi * Reference to: Classes.TStrings.Append(TStrings;AnsiString); | or: TeEngine.TChartSeries.AssignValues(TChartSeries;TChartSeries); | 004D856B E81C6AF4FF call 0041EF8C * Reference to field TkbmMemTable.OFFS_0001 | 004D8570 8D4E01 lea ecx, [esi+$01] 004D8573 33D2 xor edx, edx * Reference to MainForm | 004D8575 8B45FC mov eax, [ebp-$04] * Reference to: ComCtrls.TListItem.SetImage(TListItem;Integer;TImageIndex); | 004D8578 E88B30F7FF call 0044B608 004D857D 33C0 xor eax, eax 004D857F 5A pop edx 004D8580 59 pop ecx 004D8581 59 pop ecx 004D8582 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '_^[?]? | 004D8585 689F854D00 push $004D859F 004D858A 8D45DC lea eax, [ebp-$24] 004D858D BA08000000 mov edx, $00000008 * Reference to: System.@LStrArrayClr(void;void;Integer); | 004D8592 E81DBDF2FF call 004042B4 004D8597 C3 ret * Reference to: System.@HandleFinally; | 004D8598 E973B6F2FF jmp 00403C10 004D859D EBEB jmp 004D858A ****** END | 004D859F 5F pop edi 004D85A0 5E pop esi 004D85A1 5B pop ebx 004D85A2 8BE5 mov esp, ebp 004D85A4 5D pop ebp 004D85A5 C3 ret *) end; procedure TMainForm._PROC_004D860D(Sender : TObject); begin (* 004D860D 8BEC mov ebp, esp 004D860F 6A00 push $00 004D8611 53 push ebx 004D8612 56 push esi 004D8613 57 push edi 004D8614 8BD9 mov ebx, ecx 004D8616 8BF2 mov esi, edx 004D8618 33C0 xor eax, eax 004D861A 55 push ebp * Possible String Reference to: '?凋?疬^[Y]? | 004D861B 687A864D00 push $004D867A ***** TRY | 004D8620 64FF30 push dword ptr fs:[eax] 004D8623 648920 mov fs:[eax], esp 004D8626 6683FEFF cmp si, -$01 004D862A 750E jnz 004D863A 004D862C 8BC3 mov eax, ebx * Possible String Reference to: '未知地图' | 004D862E BA90864D00 mov edx, $004D8690 * Reference to: System.@LStrAsg(void;void;void;void); | 004D8633 E8ACBCF2FF call 004042E4 004D8638 EB2A jmp 004D8664 004D863A 8BD3 mov edx, ebx 004D863C 0FB7FE movzx edi, si 004D863F 8BC7 mov eax, edi * Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem; | or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient; | or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem; | or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem; | or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar; | or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter; | 004D8641 E84A0BF3FF call 00409190 004D8646 833B00 cmp dword ptr [ebx], +$00 004D8649 7519 jnz 004D8664 004D864B 8D55FC lea edx, [ebp-$04] 004D864E 8BC7 mov eax, edi * Reference to: SysUtils.IntToStr(Integer):AnsiString;overload; | 004D8650 E8E706F3FF call 00408D3C 004D8655 8B55FC mov edx, [ebp-$04] 004D8658 8BC3 mov eax, ebx * Possible String Reference to: '号地图' | 004D865A B9A4864D00 mov ecx, $004D86A4 * Reference to: System.@LStrCat3; | 004D865F E838BFF2FF call 0040459C 004D8664 33C0 xor eax, eax 004D8666 5A pop edx 004D8667 59 pop ecx 004D8668 59 pop ecx 004D8669 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '_^[Y]? | 004D866C 6881864D00 push $004D8681 004D8671 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 004D8674 E817BCF2FF call 00404290 004D8679 C3 ret * Reference to: System.@HandleFinally; | 004D867A E991B5F2FF jmp 00403C10 004D867F EBF0 jmp 004D8671 ****** END | 004D8681 5F pop edi 004D8682 5E pop esi 004D8683 5B pop ebx 004D8684 59 pop ecx 004D8685 5D pop ebp 004D8686 C3 ret *) end; end. |
|
|
怎么没人能回答
|
|
|
这种发帖方式 没人弄帮上你..
|
|
|
哪怎么发?
|
|
|
004D5830 E89344F3FF call 00409CC8
这个地方看看？ EPX |
|
|
既然已经知道IP地址了,可以写个程序hook网络函数,进行IP地址和端口重定向,没必要分析这些
|
|
|
朋友
刚刚看到你发的那个IP 就知道你在破什么程序了 有兴趣的话 写信给我 一起交流下 |
|
|
你那是违法，会被抓起来的
|
|
|
赞赏
雪币:
留言:
