📄 gloginserver.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 + -