generalconfig.dfm
来自「2009最新 传奇汉化0599代码 传奇汉化」· DFM 代码 · 共 630 行 · 第 1/2 页
DFM
630 行
object frmGeneralConfig: TfrmGeneralConfig
Left = 231
Top = 158
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'General Config'
ClientHeight = 328
ClientWidth = 523
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '??'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
ShowHint = True
PixelsPerInch = 96
TextHeight = 15
object PageControl: TPageControl
Left = 10
Top = 10
Width = 501
Height = 311
ActivePage = ServerInfoSheet
TabOrder = 0
OnChanging = PageControlChanging
object ServerInfoSheet: TTabSheet
Caption = 'Server Information'
object GroupBoxInfo: TGroupBox
Left = 10
Top = 6
Width = 231
Height = 122
Caption = 'Server Information'
TabOrder = 0
object Label1: TLabel
Left = 10
Top = 25
Width = 37
Height = 15
Caption = 'Name:'
end
object Label10: TLabel
Left = 10
Top = 55
Width = 70
Height = 15
Caption = 'Server index:'
end
object Label11: TLabel
Left = 128
Top = 55
Width = 57
Height = 15
Caption = 'Server No:'
end
object EditGameName: TEdit
Left = 80
Top = 20
Width = 141
Height = 23
Hint = 'Server name'
TabOrder = 0
Text = '<server name>'
OnChange = EditValueChange
end
object EditServerIndex: TEdit
Left = 88
Top = 50
Width = 31
Height = 23
Hint = 'Server index number'
TabOrder = 1
Text = '0'
OnChange = EditValueChange
end
object EditServerNumber: TEdit
Left = 190
Top = 50
Width = 31
Height = 23
Hint = 'Server number'
TabOrder = 2
Text = '0'
OnChange = EditValueChange
end
object CheckBoxServiceMode: TCheckBox
Left = 10
Top = 80
Width = 91
Height = 21
Hint = '????,?????????????'
Caption = 'Service Mode'
TabOrder = 3
Visible = False
OnClick = EditValueChange
end
end
object GroupBox5: TGroupBox
Left = 250
Top = 6
Width = 207
Height = 122
TabOrder = 1
Visible = False
object Label12: TLabel
Left = 10
Top = 25
Width = 59
Height = 15
Caption = 'Test Level:'
end
object Label13: TLabel
Left = 10
Top = 55
Width = 56
Height = 15
Caption = 'Test Gold:'
end
object Label14: TLabel
Left = 10
Top = 85
Width = 84
Height = 15
Caption = 'Test UserLimit:'
end
object EditTestLevel: TEdit
Left = 96
Top = 20
Width = 91
Height = 23
Hint = '????,???????'
TabOrder = 0
Text = '0'
OnChange = EditValueChange
end
object EditTestGold: TEdit
Left = 96
Top = 50
Width = 91
Height = 23
Hint = '????,????????'
TabOrder = 1
Text = '0'
OnChange = EditValueChange
end
object EditTestUserLimit: TEdit
Left = 96
Top = 80
Width = 91
Height = 23
Hint = '300'
TabOrder = 2
Text = '300'
OnChange = EditValueChange
end
object CheckBoxTestServer: TCheckBox
Left = 10
Top = -3
Width = 91
Height = 22
Hint = '????,?????,?????????????????'
Caption = 'Test Server'
TabOrder = 3
OnClick = CheckBoxTestServerClick
end
end
object ButtonServerInfoSave: TButton
Left = 400
Top = 236
Width = 81
Height = 32
Hint = 'Save settings'
Caption = '&Save'
TabOrder = 2
OnClick = ButtonServerInfoSaveClick
end
object GroupBox6: TGroupBox
Left = 10
Top = 140
Width = 231
Height = 61
Caption = 'Max no of connected users allowed'
TabOrder = 3
Visible = False
object Label15: TLabel
Left = 10
Top = 25
Width = 53
Height = 15
Caption = 'User Full:'
end
object EditUserFull: TEdit
Left = 80
Top = 20
Width = 51
Height = 23
Hint =
'Maximum no of users that can connect before client displays user' +
' full message'
TabOrder = 0
Text = '300'
OnChange = EditValueChange
end
end
end
object NetWorkSheet: TTabSheet
Caption = 'Network Addresses'
ImageIndex = 2
object GroupBoxNet: TGroupBox
Left = 10
Top = 6
Width = 231
Height = 85
Caption = 'Run Gate'
TabOrder = 0
object LabelGateIPaddr: TLabel
Left = 10
Top = 25
Width = 43
Height = 15
Caption = 'Gate IP:'
end
object LabelGatePort: TLabel
Left = 10
Top = 55
Width = 54
Height = 15
Caption = 'Gate Port:'
end
object EditGateAddr: TEdit
Left = 100
Top = 20
Width = 121
Height = 23
Hint = 'Your Gate IP address'
TabOrder = 0
Text = '192.168.0.1'
OnChange = EditValueChange
end
object EditGatePort: TEdit
Left = 100
Top = 50
Width = 51
Height = 23
Hint = 'Your Gate port'
TabOrder = 1
Text = '5000'
OnChange = EditValueChange
end
end
object ButtonNetWorkSave: TButton
Left = 400
Top = 236
Width = 81
Height = 32
Hint = 'Save settings'
Caption = '&Save'
TabOrder = 1
OnClick = ButtonNetWorkSaveClick
end
object GroupBox1: TGroupBox
Left = 10
Top = 96
Width = 231
Height = 85
Caption = 'Database Server'
TabOrder = 2
object Label4: TLabel
Left = 10
Top = 55
Width = 82
Height = 15
Caption = 'Database Port:'
end
object Label5: TLabel
Left = 10
Top = 25
Width = 71
Height = 15
Caption = 'Database IP:'
end
object EditDBPort: TEdit
Left = 100
Top = 50
Width = 51
Height = 23
Hint = 'Your Database servers port'
TabOrder = 0
Text = '6000'
OnChange = EditValueChange
end
object EditDBAddr: TEdit
Left = 100
Top = 20
Width = 121
Height = 23
Hint = 'Your Database servers IP address'
TabOrder = 1
Text = '192.168.0.1'
OnChange = EditValueChange
end
end
object GroupBox2: TGroupBox
Left = 250
Top = 6
Width = 231
Height = 85
Caption = 'Login Server'
TabOrder = 3
object Label2: TLabel
Left = 10
Top = 55
Width = 48
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?