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

📄 gloginserver.pas

📁 传奇源码
💻 PAS
字号:
unit GLoginServer;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TfrmLoginServerConfig=class(TForm)
    PageControl1: TPageControl;
    TabSheet1: TTabSheet;
    GridGateRoute: TStringGrid;
    procedure FormCreate(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  frmLoginServerConfig: TfrmLoginServerConfig;

{This file is generated by DaRk Ver 3.50.04 Copyright (c) 1999-2002 DaFixer}

implementation

{$R *.DFM}

procedure TfrmLoginServerConfig.FormCreate(Sender : TObject);
begin
(*
004A5F58   53                     push    ebx
004A5F59   8BD8                   mov     ebx, eax

* Possible String Reference to: '服务器名称'
|
004A5F5B   68EC5F4A00             push    $004A5FEC
004A5F60   33C9                   xor     ecx, ecx
004A5F62   33D2                   xor     edx, edx
004A5F64   8B8300030000           mov     eax, [ebx+$0300]

* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004A5F6A   E829FDFFFF             call    004A5C98

* Possible String Reference to: '路由标识'
|
004A5F6F   6800604A00             push    $004A6000
004A5F74   33C9                   xor     ecx, ecx
004A5F76   BA01000000             mov     edx, $00000001
004A5F7B   8B8300030000           mov     eax, [ebx+$0300]

* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004A5F81   E812FDFFFF             call    004A5C98

* Possible String Reference to: '登录网关内IP'
|
004A5F86   6814604A00             push    $004A6014
004A5F8B   33C9                   xor     ecx, ecx
004A5F8D   BA02000000             mov     edx, $00000002
004A5F92   8B8300030000           mov     eax, [ebx+$0300]

* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004A5F98   E8FBFCFFFF             call    004A5C98

* Possible String Reference to: '登录网关外IP'
|
004A5F9D   682C604A00             push    $004A602C
004A5FA2   33C9                   xor     ecx, ecx
004A5FA4   BA03000000             mov     edx, $00000003
004A5FA9   8B8300030000           mov     eax, [ebx+$0300]

* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004A5FAF   E8E4FCFFFF             call    004A5C98

* Possible String Reference to: '角色网关'
|
004A5FB4   6844604A00             push    $004A6044
004A5FB9   33C9                   xor     ecx, ecx
004A5FBB   BA04000000             mov     edx, $00000004
004A5FC0   8B8300030000           mov     eax, [ebx+$0300]

* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004A5FC6   E8CDFCFFFF             call    004A5C98

* Possible String Reference to: '端口'
|
004A5FCB   6858604A00             push    $004A6058
004A5FD0   33C9                   xor     ecx, ecx
004A5FD2   BA05000000             mov     edx, $00000005
004A5FD7   8B8300030000           mov     eax, [ebx+$0300]

* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
004A5FDD   E8B6FCFFFF             call    004A5C98
004A5FE2   5B                     pop     ebx
004A5FE3   C3                     ret

*)
end;

end.

⌨️ 快捷键说明

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