📄 unit1.dfm
字号:
object Form1: TForm1
Left = 413
Top = 213
BorderStyle = bsDialog
Caption = #22696#39321#36741#21161#24037#20855
ClientHeight = 201
ClientWidth = 193
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 193
Height = 49
Caption = #36830#20987#35774#32622'('#28909#38190' ~ )'
TabOrder = 0
object CheckBox5: TLabel
Left = 88
Top = 24
Width = 33
Height = 13
AutoSize = False
Caption = #38388#38548
end
object Label1: TLabel
Left = 8
Top = 24
Width = 33
Height = 13
AutoSize = False
Caption = #25216#33021
end
object UpDown2: TUpDown
Tag = -1
Left = 161
Top = 19
Width = 16
Height = 21
Associate = eAutoMagicGap
Min = 100
Max = 3000
Position = 1600
TabOrder = 0
Thousands = False
OnClick = UpDown2Click
end
object eAutoMagic: TComboBox
Tag = -1
Left = 38
Top = 19
Width = 35
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 1
Text = '1'
OnChange = eAutoMagicChange
Items.Strings = (
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'0')
end
object eAutoMagicGap: TEdit
Left = 120
Top = 19
Width = 41
Height = 21
TabOrder = 2
Text = '1600'
OnChange = eAutoMagicGapChange
end
end
object GroupBox2: TGroupBox
Left = 0
Top = 56
Width = 193
Height = 145
Caption = #25346#25216#33021#35774#32622'('#28909#38190'HOME)-'#20572#27490
TabOrder = 1
object Label2: TLabel
Left = 8
Top = 24
Width = 97
Height = 13
AutoSize = False
Caption = #25216#33021#38388#38548'('#27627#31186')'
end
object Label3: TLabel
Left = 9
Top = 71
Width = 40
Height = 13
AutoSize = False
Caption = #25216#33021'1'
end
object Label4: TLabel
Left = 105
Top = 71
Width = 40
Height = 13
AutoSize = False
Caption = #25216#33021'2'
end
object Label5: TLabel
Left = 9
Top = 95
Width = 40
Height = 13
AutoSize = False
Caption = #25216#33021'3'
end
object Label6: TLabel
Left = 5
Top = 47
Width = 36
Height = 13
AutoSize = False
Caption = #25171#22352
end
object Label7: TLabel
Left = 105
Top = 95
Width = 40
Height = 13
AutoSize = False
Caption = #25216#33021'4'
end
object Label8: TLabel
Left = 80
Top = 48
Width = 57
Height = 13
AutoSize = False
Caption = #26102#38388'('#31186')'
end
object Label9: TLabel
Left = 8
Top = 120
Width = 57
Height = 13
AutoSize = False
Caption = #24490#24490#27425#25968
end
object Edit1: TEdit
Left = 90
Top = 19
Width = 33
Height = 21
TabOrder = 0
Text = '1600'
OnChange = Edit1Change
end
object UpDown1: TUpDown
Tag = -1
Left = 123
Top = 19
Width = 15
Height = 21
Associate = Edit1
Min = 100
Max = 3000
Position = 1600
TabOrder = 1
Thousands = False
OnClick = UpDown1Click
end
object Magic1: TComboBox
Tag = -1
Left = 46
Top = 67
Width = 35
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 2
Text = #20851
OnChange = Magic1Change
Items.Strings = (
#20851
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'0')
end
object Magic2: TComboBox
Tag = -1
Left = 142
Top = 67
Width = 35
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 3
Text = #20851
OnChange = Magic2Change
Items.Strings = (
#20851
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'0')
end
object Magic3: TComboBox
Tag = -1
Left = 46
Top = 91
Width = 35
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 4
Text = #20851
OnChange = Magic3Change
Items.Strings = (
#20851
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'0')
end
object ComboBox4: TComboBox
Tag = -1
Left = 33
Top = 43
Width = 35
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 5
Text = '1'
Items.Strings = (
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'0')
end
object Magic4: TComboBox
Tag = -1
Left = 142
Top = 91
Width = 35
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 6
Text = #20851
OnChange = Magic4Change
Items.Strings = (
#20851
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'0')
end
object Edit2: TEdit
Left = 130
Top = 43
Width = 33
Height = 21
TabOrder = 7
Text = '30'
OnChange = Edit2Change
end
object UpDown3: TUpDown
Tag = -1
Left = 163
Top = 43
Width = 15
Height = 21
Associate = Edit2
Min = 10
Position = 30
TabOrder = 8
Thousands = False
OnClick = UpDown3Click
end
object Edit3: TEdit
Left = 66
Top = 115
Width = 33
Height = 21
TabOrder = 9
Text = '30'
OnChange = Edit2Change
end
object UpDown4: TUpDown
Tag = -1
Left = 99
Top = 115
Width = 15
Height = 21
Associate = Edit3
Min = 1
Position = 30
TabOrder = 10
Thousands = False
OnClick = UpDown3Click
end
object CheckBox1: TCheckBox
Left = 128
Top = 120
Width = 49
Height = 17
Caption = #38190#30424
TabOrder = 11
OnClick = CheckBox1Click
end
object CheckBox2: TCheckBox
Left = 144
Top = 24
Width = 47
Height = 17
Caption = #20572#27490
TabOrder = 12
OnClick = CheckBox2Click
end
end
object Timer1: TTimer
Enabled = False
OnTimer = Timer1Timer
Left = 192
Top = 8
end
object Timer2: TTimer
Enabled = False
OnTimer = Timer2Timer
Left = 200
Top = 80
end
object Timer3: TTimer
Enabled = False
OnTimer = Timer3Timer
Left = 200
Top = 112
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -