📄 unit1.dfm
字号:
object Form1: TForm1
Left = 158
Top = 199
Width = 578
Height = 405
Caption = 'Form1'
Color = clTeal
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 8
Top = 16
Width = 257
Height = 201
Color = clTeal
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label1: TLabel
Left = 24
Top = 64
Width = 36
Height = 16
Caption = #29983#26085#65306
end
object Label2: TLabel
Left = 24
Top = 160
Width = 36
Height = 16
Caption = #24615#21035#65306
end
object leName: TLabeledEdit
Left = 64
Top = 16
Width = 153
Height = 24
EditLabel.Width = 39
EditLabel.Height = 16
EditLabel.Caption = #22995#21517#65306' '
LabelPosition = lpLeft
TabOrder = 0
end
object rbMale: TRadioButton
Left = 88
Top = 160
Width = 57
Height = 17
Caption = #30007
TabOrder = 1
end
object rbFemale: TRadioButton
Left = 152
Top = 160
Width = 57
Height = 17
Caption = #22899
TabOrder = 2
end
object leTel: TLabeledEdit
Left = 64
Top = 112
Width = 153
Height = 24
EditLabel.Width = 39
EditLabel.Height = 16
EditLabel.Caption = #30005#35805#65306' '
LabelPosition = lpLeft
TabOrder = 3
end
object dtp: TDateTimePicker
Left = 64
Top = 64
Width = 153
Height = 24
Date = 0.894931724535126700
Time = 0.894931724535126700
Checked = False
DateFormat = dfLong
TabOrder = 4
end
end
object GroupBox1: TGroupBox
Left = 288
Top = 80
Width = 265
Height = 97
Caption = #29233#22909
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
object cbFishing: TCheckBox
Left = 40
Top = 32
Width = 97
Height = 17
Caption = #38035#40060
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object cbReading: TCheckBox
Left = 144
Top = 32
Width = 97
Height = 17
Caption = #35835#20070
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object cbChess: TCheckBox
Left = 40
Top = 64
Width = 97
Height = 17
Caption = #19979#26827
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object cbBall: TCheckBox
Left = 144
Top = 64
Width = 97
Height = 17
Caption = #25171#29699
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
end
object bbtn1: TBitBtn
Left = 288
Top = 192
Width = 75
Height = 25
Caption = #30830#23450
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = bbtn1Click
Kind = bkOK
end
object bbtn2: TBitBtn
Left = 384
Top = 192
Width = 75
Height = 25
Caption = #21462#28040
TabOrder = 3
OnClick = bbtn2Click
Kind = bkCancel
end
object bbtn3: TBitBtn
Left = 480
Top = 192
Width = 75
Height = 25
Caption = #36864#20986
TabOrder = 4
OnClick = bbtn3Click
Kind = bkIgnore
end
object GroupBox2: TGroupBox
Left = 8
Top = 224
Width = 545
Height = 137
Caption = #20010#20154#36164#26009
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
object mmDisplay: TMemo
Left = 8
Top = 24
Width = 529
Height = 105
Color = clYellow
ScrollBars = ssVertical
TabOrder = 0
end
end
object GroupBox3: TGroupBox
Left = 288
Top = 8
Width = 265
Height = 65
Caption = #27665#26063
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
object rb1: TRadioButton
Left = 40
Top = 24
Width = 81
Height = 17
Caption = #27721#26063
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object rb2: TRadioButton
Left = 128
Top = 24
Width = 97
Height = 17
Caption = #23569#25968#27665#26063
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -