?? main.dfm
字號:
object Form_Main: TForm_Main
Left = 198
Top = 115
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = #32593#32476#20013#22269#35937#26827
ClientHeight = 542
ClientWidth = 704
Color = clSkyBlue
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 504
Top = 80
Width = 49
Height = 20
AutoSize = False
Caption = #26412#26041':'
Font.Charset = GB2312_CHARSET
Font.Color = clMenuText
Font.Height = -16
Font.Name = #24188#22278
Font.Style = []
ParentFont = False
Visible = False
end
object Label2: TLabel
Left = 504
Top = 124
Width = 49
Height = 20
AutoSize = False
Caption = #23545#26041':'
Font.Charset = GB2312_CHARSET
Font.Color = clMenuText
Font.Height = -16
Font.Name = #24188#22278
Font.Style = []
ParentFont = False
Visible = False
end
object Label3: TLabel
Left = 504
Top = 168
Width = 89
Height = 20
AutoSize = False
Caption = #24403#21069#19979#23376#26041':'
Font.Charset = GB2312_CHARSET
Font.Color = clMenuText
Font.Height = -16
Font.Name = #24188#22278
Font.Style = []
ParentFont = False
Visible = False
end
object lblLocal: TLabel
Left = 568
Top = 80
Width = 89
Height = 20
AutoSize = False
Font.Charset = GB2312_CHARSET
Font.Color = clMenuText
Font.Height = -20
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
end
object lblRemote: TLabel
Left = 568
Top = 124
Width = 89
Height = 20
AutoSize = False
Font.Charset = GB2312_CHARSET
Font.Color = clMenuText
Font.Height = -20
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
end
object lblCurrent: TLabel
Left = 608
Top = 168
Width = 73
Height = 20
AutoSize = False
Font.Charset = GB2312_CHARSET
Font.Color = clMenuText
Font.Height = -20
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
end
object Panel_ChessBoard: TPanel
Left = 0
Top = 0
Width = 481
Height = 542
Align = alLeft
AutoSize = True
Color = clSkyBlue
TabOrder = 0
end
object btnQuitGame: TButton
Left = 585
Top = 439
Width = 105
Height = 25
Caption = #26029#24320#26412#27425#28216#25103
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = btnQuitGameClick
end
object btnExit: TButton
Left = 584
Top = 480
Width = 105
Height = 25
Caption = #36864#20986#31243#24207
TabOrder = 2
OnClick = btnExitClick
end
object MainMenu: TMainMenu
Left = 512
Top = 360
object Item_Options: TMenuItem
Caption = #36873#39033'(&O)'
object Item_NewGame: TMenuItem
Caption = #26032#24314#28216#25103'(&N) '
ShortCut = 16462
OnClick = MenuItemClick
end
object Item_JoinGame: TMenuItem
Tag = 1
Caption = #21152#20837#28216#25103'(&J)'
ShortCut = 16458
OnClick = MenuItemClick
end
object Item_QuitGame: TMenuItem
Tag = 2
Caption = #26029#24320#28216#25103'(&Q)'
ShortCut = 16465
OnClick = MenuItemClick
end
object N1: TMenuItem
Caption = '-'
end
object Item_Exit: TMenuItem
Tag = 3
Caption = #36864#20986'(&X)'
ShortCut = 16472
OnClick = MenuItemClick
end
end
end
object TCPClient: TClientSocket
Active = False
ClientType = ctNonBlocking
Port = 0
OnConnect = TCPClientConnect
OnRead = TCPClientRead
Left = 560
Top = 360
end
object TCPServer: TServerSocket
Active = False
Port = 0
ServerType = stNonBlocking
OnAccept = TCPServerAccept
OnClientRead = TCPServerClientRead
Left = 608
Top = 360
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -