📄 mainfrm.dfm
字号:
object MainForm: TMainForm
Left = 0
Top = 0
Caption = #34382#20811#23545#25112#24179#21488#26657#22253#29256
ClientHeight = 573
ClientWidth = 742
Color = clBtnFace
Constraints.MinHeight = 600
Constraints.MinWidth = 750
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poDesktopCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyPress = FormKeyPress
PixelsPerInch = 96
TextHeight = 12
object RightPanel: TPanel
AlignWithMargins = True
Left = 485
Top = 8
Width = 249
Height = 557
Margins.Top = 8
Margins.Right = 8
Margins.Bottom = 8
Align = alRight
BevelOuter = bvNone
TabOrder = 0
object Panel1: TPanel
AlignWithMargins = True
Left = 3
Top = 3
Width = 243
Height = 23
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object Label1: TLabel
Left = 2
Top = 6
Width = 72
Height = 12
Caption = #20449#24687#20844#21578#26639#65306
end
object BeepOnRecvBroadCheck: TCheckBox
Left = 125
Top = 0
Width = 118
Height = 23
Align = alRight
Caption = #25910#21040#20844#21578#28040#24687#21457#22768
TabOrder = 0
OnClick = BeepOnRecvBroadCheckClick
end
end
object Panel2: TPanel
AlignWithMargins = True
Left = 3
Top = 176
Width = 243
Height = 23
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object Label2: TLabel
Left = 2
Top = 6
Width = 84
Height = 12
Caption = #22312#32447#29992#25143#21015#34920#65306
end
object OnlineUserLabel: TLabel
Left = 164
Top = 5
Width = 78
Height = 12
Alignment = taRightJustify
Caption = #24403#21069#22312#32447#65306'0'#20154
end
end
object UserListView: TListView
AlignWithMargins = True
Left = 3
Top = 205
Width = 243
Height = 318
Align = alClient
Columns = <
item
Caption = #29992#25143#21517
Width = 90
end
item
Caption = #31561#32423
Width = 45
end
item
Alignment = taRightJustify
Caption = #28216#25103#29366#24577
Width = 80
end>
HideSelection = False
ReadOnly = True
RowSelect = True
SortType = stText
TabOrder = 2
ViewStyle = vsReport
OnAdvancedCustomDrawItem = UserListViewAdvancedCustomDrawItem
OnClick = UserListViewClick
OnColumnClick = UserListViewColumnClick
OnDblClick = UserListViewDblClick
OnExit = UserListViewExit
OnMouseDown = UserListViewMouseDown
end
object WebMain: TWebBrowser
AlignWithMargins = True
Left = 3
Top = 32
Width = 243
Height = 138
Align = alTop
TabOrder = 3
ExplicitTop = 167
ControlData = {
4C0000001D190000430E00000000000000000000000000000000000000000000
000000004C000000000000000000000001000000E0D057007335CF11AE690800
2B2E126208000000000000004C0000000114020000000000C000000000000046
8000000000000000000000000000000000000000000000000000000000000000
00000000000000000100000000000000000000000000000000000000}
end
object Panel5: TPanel
AlignWithMargins = True
Left = 3
Top = 529
Width = 243
Height = 25
Align = alBottom
BevelOuter = bvNone
TabOrder = 4
DesignSize = (
243
25)
object AbountBtn: TButton
Left = 168
Top = 0
Width = 75
Height = 25
Anchors = [akLeft, akBottom]
Caption = #20851#20110#36719#20214
TabOrder = 0
OnClick = AbountBtnClick
end
object SystemSetBtn: TButton
Left = 92
Top = 0
Width = 75
Height = 25
Anchors = [akLeft, akBottom]
Caption = #31995#32479#35774#32622
TabOrder = 1
OnClick = SystemSetBtnClick
end
object ChangeSrvBtn: TButton
Left = 0
Top = 0
Width = 75
Height = 25
Anchors = [akLeft, akBottom]
Caption = #20999#25442#25151#38388
TabOrder = 2
OnClick = ChangeSrvBtnClick
end
end
end
object Panel3: TPanel
AlignWithMargins = True
Left = 8
Top = 8
Width = 471
Height = 557
Margins.Left = 8
Margins.Top = 8
Margins.Bottom = 8
Align = alClient
BevelOuter = bvNone
Caption = 'Panel3'
TabOrder = 1
object RunGameGroupBox: TGroupBox
AlignWithMargins = True
Left = 3
Top = 424
Width = 465
Height = 130
Align = alBottom
Caption = ' '#21551#21160#28216#25103' '
TabOrder = 0
DesignSize = (
465
130)
object Label10: TLabel
Left = 13
Top = 109
Width = 247
Height = 13
Caption = #27880#24847': '#35774#32622#28216#25103#36335#24452#21153#24517#36873#25321#27491#30830#30340#21487#25191#34892#25991#20214
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 13
Top = 26
Width = 60
Height = 12
Caption = #36873#25321#28216#25103#65306
end
object Label12: TLabel
Left = 13
Top = 52
Width = 60
Height = 12
Caption = #28216#25103#31243#24207#65306
end
object Label13: TLabel
Left = 13
Top = 78
Width = 60
Height = 12
Caption = #36816#34892#21442#25968#65306
end
object GameNameCombox: TComboBox
Left = 79
Top = 23
Width = 110
Height = 20
Style = csDropDownList
Color = clBtnFace
Enabled = False
ItemHeight = 12
TabOrder = 0
OnChange = GameNameComboxChange
end
object RunGameExeEdit: TEdit
Left = 79
Top = 49
Width = 202
Height = 20
Anchors = [akLeft, akTop, akRight]
Color = clBtnFace
Enabled = False
TabOrder = 1
end
object StartGameButton: TButton
Left = 374
Top = 20
Width = 81
Height = 99
Anchors = [akTop, akRight]
Caption = #21551#21160#28216#25103
Enabled = False
TabOrder = 2
OnClick = StartGameButtonClick
end
object SelectExeButton: TButton
Left = 287
Top = 50
Width = 29
Height = 21
Anchors = [akTop, akRight]
Caption = '>>'
Enabled = False
TabOrder = 3
OnClick = SelectExeButtonClick
end
object RunGameParamEdit: TEdit
Left = 79
Top = 75
Width = 202
Height = 20
Anchors = [akLeft, akTop, akRight]
Color = clBtnFace
Enabled = False
TabOrder = 4
end
object SearchGameExeBtn: TButton
Left = 320
Top = 50
Width = 39
Height = 21
Anchors = [akTop, akRight]
Caption = #25628#32034
Enabled = False
TabOrder = 5
OnClick = SearchGameExeBtnClick
end
end
object ChatMsgGroupBox: TGroupBox
AlignWithMargins = True
Left = 3
Top = 3
Width = 465
Height = 415
Align = alClient
Caption = ' '#20449#24687#26694' '
TabOrder = 1
object Panel4: TPanel
AlignWithMargins = True
Left = 5
Top = 332
Width = 455
Height = 78
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
DesignSize = (
455
78)
object Label3: TLabel
Left = 4
Top = 4
Width = 48
Height = 12
Caption = #21457#36865#32473#65306
end
object SelectFont: TSpeedButton
Left = 168
Top = 1
Width = 33
Height = 20
Caption = #23383#20307
Flat = True
OnClick = SelectFontClick
end
object ClearChatMsgBtn: TSpeedButton
Left = 386
Top = 2
Width = 65
Height = 20
Anchors = [akTop, akRight]
Caption = #28165#31354#20449#24687
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 10485760
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
OnClick = ClearChatMsgBtnClick
ExplicitLeft = 382
end
object SendMsgButton: TButton
Left = 392
Top = 28
Width = 58
Height = 46
Hint = #22238#36710#38190#30452#25509#21457#36865#28040#24687
Anchors = [akTop, akRight]
Caption = #21457#36865
Enabled = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = SendMsgButtonClick
end
object SendMsgEdit: TIrisRichEdit
Left = 3
Top = 28
Width = 383
Height = 46
Hint = #22238#36710#38190#30452#25509#21457#36865#28040#24687
EditorOptions = [rvoCtrlJumps, rvoDoNotWantReturns, rvoWantTabs]
ReadOnly = False
Anchors = [akLeft, akTop, akRight]
ParentShowHint = False
ShowHint = True
TabOrder = 1
DoInPaletteMode = rvpaCreateCopies
RTFReadProperties.UnicodeMode = rvruOnlyUnicode
RTFReadProperties.TextStyleMode = rvrsAddIfNeeded
RTFReadProperties.ParaStyleMode = rvrsAddIfNeeded
RVFOptions = [rvfoSavePicturesBody, rvfoSaveControlsBody, rvfoIgnoreUnknownPicFmt, rvfoIgnoreUnknownCtrls, rvfoConvUnknownStylesToZero, rvfoConvLargeImageIdxToZero, rvfoSaveBinary, rvfoSaveTextStyles, rvfoSaveParaStyles]
end
object ToUserCmb: TComboBox
Left = 53
Top = 1
Width = 109
Height = 20
Style = csDropDownList
ItemHeight = 12
ItemIndex = 0
TabOrder = 2
Text = #25152#26377#20154
Items.Strings = (
#25152#26377#20154)
end
object ChatIsPrivateCheck: TCheckBox
Left = 211
Top = 3
Width = 48
Height = 17
Caption = #31169#32842
TabOrder = 3
end
object OnlyDisplayPrivateCheck: TCheckBox
Left = 276
Top = 3
Width = 107
Height = 17
Anchors = [akTop, akRight]
Caption = #21482#26174#31034#31169#32842#20449#24687
TabOrder = 4
end
end
object RecvMsgEdit: TIrisRichEdit
AlignWithMargins = True
Left = 9
Top = 17
Width = 447
Height = 309
Margins.Left = 7
Margins.Right = 7
EditorOptions = [rvoCtrlJumps, rvoWantTabs, rvoHideReadOnlyCaret]
ReadOnly = True
OnChange = RecvMsgEditChange
Align = alClient
TabOrder = 1
DoInPaletteMode = rvpaCreateCopies
RTFReadProperties.UnicodeMode = rvruOnlyUnicode
RTFReadProperties.TextStyleMode = rvrsAddIfNeeded
RTFReadProperties.ParaStyleMode = rvrsAddIfNeeded
RVFOptions = [rvfoSavePicturesBody, rvfoSaveControlsBody, rvfoIgnoreUnknownPicFmt, rvfoIgnoreUnknownCtrls, rvfoConvUnknownStylesToZero, rvfoConvLargeImageIdxToZero, rvfoSaveBinary, rvfoSaveTextStyles, rvfoSaveParaStyles]
end
end
end
object UserNumTimer: TTimer
OnTimer = UserNumTimerTimer
Left = 528
Top = 264
end
object ChatFontDialog: TFontDialog
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
MinFontSize = 9
MaxFontSize = 10
Options = [fdEffects, fdLimitSize]
Left = 40
Top = 80
end
object CheckGameStateTimer: TTimer
Enabled = False
OnTimer = CheckGameStateTimerTimer
Left = 80
Top = 80
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -