📄 main.dfm
字号:
Height = 492
Align = alClient
TabOrder = 1
object Splitter3: TSplitter
Left = 1
Top = 245
Width = 539
Height = 3
Cursor = crVSplit
Align = alBottom
end
object DBMemoD: TDBMemo
Left = 1
Top = 248
Width = 539
Height = 243
Hint = '空调运行情况'
Align = alBottom
DataField = 'Memo'
DataSource = DataSourceD
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
ParentShowHint = False
ReadOnly = True
ScrollBars = ssVertical
ShowHint = True
TabOrder = 0
end
object ScrollBox1: TScrollBox
Left = 1
Top = 1
Width = 539
Height = 244
Align = alClient
TabOrder = 1
object BitBtn6: TBitBtn
Left = 24
Top = 16
Width = 81
Height = 25
Hint = '删除当前记录'
Caption = '删除当前记录'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = BitBtn6Click
end
object BitBtn7: TBitBtn
Left = 24
Top = 64
Width = 81
Height = 25
Caption = '删除所有记录'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = BitBtn7Click
end
object BitBtn8: TBitBtn
Left = 24
Top = 128
Width = 81
Height = 25
Caption = '显示所有记录'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = BitBtn8Click
end
object GroupBox1: TGroupBox
Left = 128
Top = 128
Width = 421
Height = 105
Caption = '按时间段查找数据'
TabOrder = 3
object DateTimePicker1: TDateTimePicker
Left = 64
Top = 24
Width = 113
Height = 28
CalAlignment = dtaLeft
Date = 38303.7066098611
Time = 38303.7066098611
DateFormat = dfShort
DateMode = dmComboBox
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
Kind = dtkDate
ParseInput = False
TabOrder = 0
end
object StaticText2: TStaticText
Left = 8
Top = 24
Width = 52
Height = 24
Caption = '起始：'
TabOrder = 1
end
object DateTimePicker2: TDateTimePicker
Left = 216
Top = 24
Width = 89
Height = 28
CalAlignment = dtaLeft
Date = 38303
Time = 38303
DateFormat = dfShort
DateMode = dmComboBox
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
Kind = dtkTime
ParseInput = False
TabOrder = 2
end
object StaticText3: TStaticText
Left = 8
Top = 64
Width = 52
Height = 24
Caption = '截止：'
TabOrder = 3
end
object DateTimePicker3: TDateTimePicker
Left = 216
Top = 64
Width = 89
Height = 28
CalAlignment = dtaLeft
Date = 38303.711563206
Time = 38303.711563206
DateFormat = dfShort
DateMode = dmComboBox
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
Kind = dtkTime
ParseInput = False
TabOrder = 4
end
object DateTimePicker4: TDateTimePicker
Left = 64
Top = 64
Width = 113
Height = 28
CalAlignment = dtaLeft
Date = 38303.7066098611
Time = 38303.7066098611
DateFormat = dfShort
DateMode = dmComboBox
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
Kind = dtkDate
ParseInput = False
TabOrder = 5
end
object BitBtn11: TBitBtn
Left = 320
Top = 40
Width = 75
Height = 25
Caption = '确定'
TabOrder = 6
OnClick = BitBtn11Click
end
object BitBtn12: TBitBtn
Left = 320
Top = 64
Width = 75
Height = 25
Caption = '复位'
TabOrder = 7
OnClick = BitBtn12Click
end
end
object GroupBox2: TGroupBox
Left = 128
Top = 24
Width = 421
Height = 81
Caption = '按设备地址查找数据'
TabOrder = 4
object Edit1: TEdit
Left = 96
Top = 32
Width = 209
Height = 28
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
MaxLength = 3
TabOrder = 0
end
object BitBtn9: TBitBtn
Left = 320
Top = 24
Width = 75
Height = 25
Caption = '确定'
TabOrder = 1
OnClick = BitBtn9Click
end
object BitBtn10: TBitBtn
Left = 320
Top = 48
Width = 75
Height = 25
Caption = '清除'
TabOrder = 2
OnClick = BitBtn10Click
end
object StaticText1: TStaticText
Left = 8
Top = 32
Width = 84
Height = 24
Caption = '输入地址：'
TabOrder = 3
end
end
object BitBtn34: TBitBtn
Left = 24
Top = 168
Width = 75
Height = 25
Caption = '记录条数'
TabOrder = 5
OnClick = BitBtn34Click
end
object BitBtn36: TBitBtn
Left = 24
Top = 104
Width = 81
Height = 25
Caption = '显示告警记录'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = BitBtn36Click
end
object BitBtn38: TBitBtn
Left = 24
Top = 40
Width = 81
Height = 25
Caption = '删除告警记录'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = BitBtn38Click
end
object BitBtn39: TBitBtn
Left = 24
Top = 200
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 = 8
OnClick = BitBtn39Click
end
end
end
end
object TabSheet6: TTabSheet
Caption = '设备管理'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ImageIndex = 5
ParentFont = False
object Splitter1: TSplitter
Left = 0
Top = 491
Width = 761
Height = 1
Cursor = crVSplit
Align = alBottom
end
object Splitter7: TSplitter
Left = 0
Top = 324
Width = 761
Height = 3
Cursor = crVSplit
Align = alBottom
end
object DBMemoP: TDBMemo
Left = 0
Top = 327
Width = 761
Height = 164
Hint = '备注输入，包含设备的介绍以及属性'
Align = alBottom
DataField = 'Memo'
DataSource = DataSourceP
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
ParentShowHint = False
ReadOnly = True
ScrollBars = ssVertical
ShowHint = True
TabOrder = 0
end
object DBGridP: TDBGrid
Left = 0
Top = 55
Width = 761
Height = 269
Align = alClient
DataSource = DataSourceP
ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'LocNum'
Title.Caption = '所属组/单元编号'
Width = 95
Visible = True
end
item
Expanded = False
FieldName = 'LocName'
Title.Caption = '所属组/单元名称'
Width = 244
Visible = True
end
item
Expanded = False
FieldName = 'Name'
Title.Caption = '设备名称'
Width = 297
Visible = True
end
item
Expanded = False
FieldName = 'Addr'
Title.Caption = '地址'
Width = 114
Visible = True
end>
end
object ScrollBox3: TScrollBox
Left = 0
Top = 0
Width = 761
Height = 55
Align = alTop
TabOrder = 2
object BitBtn1: TBitBtn
Left = 48
Top = 16
Width = 75
Height = 25
Caption = '添加设备'
TabOrder = 0
OnClick = BitBtn1Click
end
object BitBtn2: TBitBtn
Left = 136
Top = 16
Width = 75
Height = 25
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -