?? generalconfig.pas
字號:
unit GeneralConfig;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TfrmGeneralConfig=class(TForm)
Label26: TLabel;
PageControl: TPageControl;
NetWorkSheet: TTabSheet;
GroupBoxNet: TGroupBox;
LabelGateIPaddr: TLabel;
LabelGatePort: TLabel;
EditGateAddr: TEdit;
EditGatePort: TEdit;
ButtonNetWorkSave: TButton;
GroupBox1: TGroupBox;
Label4: TLabel;
Label5: TLabel;
EditDBPort: TEdit;
EditDBAddr: TEdit;
GroupBox2: TGroupBox;
Label2: TLabel;
Label3: TLabel;
EditIDSPort: TEdit;
EditIDSAddr: TEdit;
GroupBox3: TGroupBox;
Label6: TLabel;
Label7: TLabel;
EditLogServerPort: TEdit;
EditLogServerAddr: TEdit;
GroupBox4: TGroupBox;
Label8: TLabel;
Label9: TLabel;
EditMsgSrvPort: TEdit;
EditMsgSrvAddr: TEdit;
ServerInfoSheet: TTabSheet;
GroupBoxInfo: TGroupBox;
Label1: TLabel;
Label10: TLabel;
Label11: TLabel;
EditGameName: TEdit;
EditServerIndex: TEdit;
EditServerNumber: TEdit;
CheckBoxServiceMode: TCheckBox;
GroupBox5: TGroupBox;
Label12: TLabel;
Label13: TLabel;
Label14: TLabel;
EditTestLevel: TEdit;
EditTestGold: TEdit;
EditTestUserLimit: TEdit;
CheckBoxTestServer: TCheckBox;
ButtonServerInfoSave: TButton;
GroupBox6: TGroupBox;
Label15: TLabel;
EditUserFull: TEdit;
GroupBox7: TGroupBox;
Label16: TLabel;
EditDBName: TEdit;
ShareSheet: TTabSheet;
Label17: TLabel;
Label18: TLabel;
Label24: TLabel;
Label23: TLabel;
Label22: TLabel;
Label21: TLabel;
Label20: TLabel;
Label19: TLabel;
Label25: TLabel;
EditGuildDir: TEdit;
EditGuildFile: TEdit;
EditConLogDir: TEdit;
EditCastleDir: TEdit;
EditEnvirDir: TEdit;
EditMapDir: TEdit;
EditNoticeDir: TEdit;
EditPlugDir: TEdit;
EditVentureDir: TEdit;
ButtonShareDirSave: TButton;
TabSheet1: TTabSheet;
GroupBox8: TGroupBox;
ColorBoxHint: TColorBox;
ButtonHintSave: TButton;
GroupBox9: TGroupBox;
ColorBoxMemoLogFontColor: TColorBox;
Label27: TLabel;
Label28: TLabel;
Label29: TLabel;
ColorBoxMemoLogColor: TColorBox;
procedure ButtonNetWorkSaveClick(Sender : TObject);
procedure EditValueChange(Sender : TObject);
procedure PageControlChanging(Sender : TObject);
procedure CheckBoxTestServerClick(Sender : TObject);
procedure ButtonServerInfoSaveClick(Sender : TObject);
procedure ButtonShareDirSaveClick(Sender : TObject);
procedure ColorBoxHintChange(Sender : TObject);
procedure ButtonHintSaveClick(Sender : TObject);
procedure _PROC_0051C270(Sender : TObject);
procedure _PROC_0051C91C(Sender : TObject);
procedure _PROC_0051CAF1(Sender : TObject);
procedure _PROC_0051CF84(Sender : TObject);
procedure _PROC_0051CF93(Sender : TObject);
procedure _PROC_0051D5AB(Sender : TObject);
procedure _PROC_0051D6F7(Sender : TObject);
procedure _PROC_0051DE71(Sender : TObject);
procedure _PROC_0051E0D9(Sender : TObject);
procedure _PROC_0051E108(Sender : TObject);
procedure _PROC_0051E110(Sender : TObject);
procedure _PROC_0051E19A(Sender : TObject);
procedure _PROC_0051E20E(Sender : TObject);
procedure _PROC_0051E695(Sender : TObject);
private
{ Private declarations }
public
{ Public declarations }
end ;
var
frmGeneralConfig: TfrmGeneralConfig;
{This file is generated by DaRk Ver 3.50.04 Copyright (c) 1999-2002 DaFixer}
implementation
{$R *.DFM}
procedure TfrmGeneralConfig.ButtonNetWorkSaveClick(Sender : TObject);
begin
(*
0051C2C4 55 push ebp
0051C2C5 8BEC mov ebp, esp
0051C2C7 B90D000000 mov ecx, $0000000D
0051C2CC 6A00 push $00
0051C2CE 6A00 push $00
0051C2D0 49 dec ecx
0051C2D1 75F9 jnz 0051C2CC
0051C2D3 51 push ecx
0051C2D4 53 push ebx
0051C2D5 8955D0 mov [ebp-$30], edx
0051C2D8 8945FC mov [ebp-$04], eax
0051C2DB 33C0 xor eax, eax
0051C2DD 55 push ebp
* Possible String Reference to: '閒
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -