📄 main.dfm
字号:
ParentFont = False
ReadOnly = True
TabOrder = 2
end
object Edit19: TEdit
Left = 144
Top = 168
Width = 177
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = '宋体'
Font.Style = []
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
ParentFont = False
ReadOnly = True
TabOrder = 3
end
object Edit20: TEdit
Left = 144
Top = 224
Width = 177
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = '宋体'
Font.Style = []
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
ParentFont = False
ReadOnly = True
TabOrder = 4
end
object StaticText12: TStaticText
Left = 8
Top = 56
Width = 132
Height = 24
Caption = '空调机工作状态：'
TabOrder = 5
end
object StaticText13: TStaticText
Left = 16
Top = 112
Width = 116
Height = 24
Caption = '风门叶片状态：'
TabOrder = 6
end
object StaticText14: TStaticText
Left = 8
Top = 168
Width = 132
Height = 24
Caption = '空调机工作模式：'
TabOrder = 7
end
object StaticText15: TStaticText
Left = 8
Top = 224
Width = 132
Height = 24
Caption = '空调机风扇转速：'
TabOrder = 8
end
object StaticText16: TStaticText
Left = 24
Top = 280
Width = 84
Height = 24
Caption = '警告类型：'
TabOrder = 9
end
object BitBtn26: TBitBtn
Left = 96
Top = 336
Width = 75
Height = 25
Caption = '获取'
TabOrder = 10
OnClick = BitBtn26Click
end
object BitBtn27: TBitBtn
Left = 208
Top = 336
Width = 75
Height = 25
Caption = '清除'
TabOrder = 11
OnClick = BitBtn27Click
end
end
end
end
end
object TabSheet3: TTabSheet
Caption = '空调控制'
ImageIndex = 2
object ScrollBox6: TScrollBox
Left = 0
Top = 0
Width = 761
Height = 492
HorzScrollBar.Position = 18
Align = alClient
TabOrder = 0
object GroupBox7: TGroupBox
Left = -2
Top = 16
Width = 759
Height = 273
Caption = '空调参数设置'
TabOrder = 0
object RadioGroup1: TRadioGroup
Left = 24
Top = 32
Width = 273
Height = 57
Caption = '设置风门叶片状态：'
Columns = 2
ItemIndex = 0
Items.Strings = (
'扫描（00H）'
'静止（01H）')
TabOrder = 0
end
object RadioGroup2: TRadioGroup
Left = 24
Top = 96
Width = 617
Height = 65
Caption = '设置工作模式：'
Columns = 5
ItemIndex = 0
Items.Strings = (
'制热（00H）'
'制冷（01H）'
'风扇（02H）'
'除湿（03H）'
'自动（04H）')
TabOrder = 1
end
object RadioGroup3: TRadioGroup
Left = 24
Top = 168
Width = 617
Height = 73
Caption = '设置风扇转速：'
Columns = 4
ItemIndex = 0
Items.Strings = (
'自动（00H）'
'大（01H）'
'中（02H）'
'小（03H）')
TabOrder = 2
end
object GroupBox11: TGroupBox
Left = 392
Top = 24
Width = 249
Height = 65
Caption = '设置工作温度：'
TabOrder = 3
object Edit21: TEdit
Left = 88
Top = 24
Width = 121
Height = 28
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
TabOrder = 0
Text = '16'
end
object UpDown4: TUpDown
Left = 209
Top = 24
Width = 16
Height = 28
Associate = Edit21
Min = 16
Max = 30
Position = 16
TabOrder = 1
Wrap = False
end
end
object BitBtn28: TBitBtn
Left = 304
Top = 56
Width = 75
Height = 25
Caption = '确定'
TabOrder = 4
OnClick = BitBtn28Click
end
object BitBtn29: TBitBtn
Left = 648
Top = 56
Width = 75
Height = 25
Caption = '确定'
TabOrder = 5
OnClick = BitBtn29Click
end
object BitBtn30: TBitBtn
Left = 648
Top = 128
Width = 75
Height = 25
Caption = '确定'
TabOrder = 6
OnClick = BitBtn30Click
end
object BitBtn31: TBitBtn
Left = 648
Top = 200
Width = 75
Height = 25
Caption = '确定'
TabOrder = 7
OnClick = BitBtn31Click
end
end
object GroupBox8: TGroupBox
Left = -2
Top = 304
Width = 759
Height = 129
Caption = '其它设置'
TabOrder = 1
object RadioGroup4: TRadioGroup
Left = 24
Top = 32
Width = 241
Height = 65
Caption = '空调开关机：'
Columns = 2
ItemIndex = 0
Items.Strings = (
'空调开机'
'空调关机')
TabOrder = 0
end
object BitBtn32: TBitBtn
Left = 296
Top = 56
Width = 75
Height = 25
Caption = '确定'
TabOrder = 1
OnClick = BitBtn32Click
end
object GroupBox12: TGroupBox
Left = 392
Top = 32
Width = 273
Height = 65
Hint = '输入或选择0~255的十进制数'
Caption = '空调地址修改：'
ParentShowHint = False
ShowHint = True
TabOrder = 2
object Edit22: TEdit
Left = 136
Top = 24
Width = 97
Height = 28
TabStop = False
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
MaxLength = 3
TabOrder = 0
Text = '0'
OnKeyUp = Edit22KeyUp
end
object UpDown3: TUpDown
Left = 233
Top = 24
Width = 16
Height = 28
Associate = Edit22
Min = 0
Max = 255
Position = 0
TabOrder = 1
Wrap = False
end
object StaticText29: TStaticText
Left = 8
Top = 32
Width = 123
Height = 24
Caption = '(0~255十进制数)'
TabOrder = 2
end
end
object BitBtn33: TBitBtn
Left = 672
Top = 56
Width = 75
Height = 25
Caption = '确定'
TabOrder = 3
OnClick = BitBtn33Click
end
object Edit16: TEdit
Left = 536
Top = 104
Width = 65
Height = 28
TabOrder = 4
Text = '0'
Visible = False
end
object BitBtn40: TBitBtn
Left = 672
Top = 88
Width = 75
Height = 25
Caption = '设置/修改密码'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
Visible = False
OnClick = BitBtn40Click
end
end
end
end
object TabSheet5: TTabSheet
Caption = '数据显示和查询'
ImageIndex = 4
object Splitter2: TSplitter
Left = 217
Top = 0
Width = 3
Height = 492
Cursor = crHSplit
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 217
Height = 492
Align = alLeft
TabOrder = 0
object DBGridD: TDBGrid
Left = 1
Top = 1
Width = 215
Height = 490
Align = alClient
DataSource = DataSourceD
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -16
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'Addr'
Title.Caption = '地址'
Visible = True
end
item
Expanded = False
FieldName = 'Date'
Title.Caption = '日期'
Width = 72
Visible = True
end
item
Expanded = False
FieldName = 'Time'
Title.Caption = '时间'
Visible = True
end>
end
end
object Panel2: TPanel
Left = 220
Top = 0
Width = 541
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -