📄 waterctrl.~dfm
字号:
object FormWaterControl: TFormWaterControl
Left = 213
Top = 49
Width = 478
Height = 457
BorderIcons = [biSystemMenu, biMinimize]
Caption = #27700#31665#27700#20301#33258#21160#25511#21046#31995#32479
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object Panel_TOP: TPanel
Left = 0
Top = 30
Width = 470
Height = 203
Align = alTop
BevelOuter = bvLowered
TabOrder = 0
object Panel_B: TPanel
Left = 241
Top = 1
Width = 228
Height = 201
Align = alClient
BevelOuter = bvLowered
TabOrder = 0
object Gp_B: TGroupBox
Left = 1
Top = 1
Width = 226
Height = 199
Align = alClient
Caption = #27700#31665'B'#21160#24577
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 0
object Label4: TLabel
Left = 20
Top = 80
Width = 72
Height = 12
Caption = #26399#26395#27700#20301'(mm)'
end
object Label5: TLabel
Left = 20
Top = 117
Width = 72
Height = 12
Caption = #23454#38469#27700#20301'(mm)'
end
object Label6: TLabel
Left = 20
Top = 154
Width = 72
Height = 12
Caption = #27969#37327'(ml/min)'
end
object Shape2: TShape
Left = 108
Top = 31
Width = 93
Height = 154
Brush.Color = clMoneyGreen
Pen.Color = clBtnFace
end
object Shape_B: TShape
Left = 108
Top = 185
Width = 93
Height = 2
Brush.Color = clFuchsia
Pen.Color = clBtnFace
end
object CK_B_Measure: TCheckBox
Left = 20
Top = 37
Width = 85
Height = 13
Caption = #28082#20301#20256#24863#22120
Checked = True
Enabled = False
State = cbChecked
TabOrder = 0
end
object CK_B_Flux: TCheckBox
Left = 20
Top = 55
Width = 85
Height = 13
Caption = #27969#37327#20256#24863#22120
Enabled = False
TabOrder = 1
end
object Edit_B_Position: TEdit
Left = 20
Top = 129
Width = 63
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 2
Text = '0'
end
object Edit_B_Flux: TEdit
Left = 20
Top = 166
Width = 63
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 3
Text = '5'
end
object SEdit_B_HP: TSpinEdit
Left = 20
Top = 92
Width = 63
Height = 21
Enabled = False
MaxValue = 160
MinValue = 90
TabOrder = 4
Value = 120
end
end
end
object Panel_A: TPanel
Left = 1
Top = 1
Width = 240
Height = 201
Align = alLeft
BevelOuter = bvLowered
TabOrder = 1
object Gp_A: TGroupBox
Left = 1
Top = 1
Width = 238
Height = 199
Align = alClient
Caption = #27700#31665'A'#21160#24577
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 0
object Label1: TLabel
Left = 20
Top = 80
Width = 72
Height = 12
Caption = #26399#26395#27700#20301'(mm)'
Color = clSkyBlue
ParentColor = False
Transparent = False
end
object Shape1: TShape
Left = 116
Top = 31
Width = 93
Height = 154
Brush.Color = clMoneyGreen
Pen.Color = clBtnFace
end
object Shape_A: TShape
Left = 116
Top = 185
Width = 93
Height = 2
Brush.Color = clFuchsia
Pen.Color = clBtnFace
end
object Label3: TLabel
Left = 20
Top = 154
Width = 72
Height = 12
Caption = #27969#37327'(ml/min)'
Color = clSkyBlue
ParentColor = False
end
object Label2: TLabel
Left = 20
Top = 117
Width = 72
Height = 12
Caption = #23454#38469#27700#20301'(mm)'
Color = clSkyBlue
ParentColor = False
end
object SEdit_A_HP: TSpinEdit
Left = 20
Top = 92
Width = 63
Height = 21
Enabled = False
MaxValue = 160
MinValue = 90
TabOrder = 0
Value = 120
end
object CK_A_Flux: TCheckBox
Left = 20
Top = 55
Width = 85
Height = 13
Caption = #27969#37327#20256#24863#22120
Enabled = False
TabOrder = 1
end
object CK_A_Measure: TCheckBox
Left = 20
Top = 37
Width = 85
Height = 13
Caption = #28082#20301#20256#24863#22120
Checked = True
Enabled = False
State = cbChecked
TabOrder = 2
end
object Edit_A_Flux: TEdit
Left = 20
Top = 166
Width = 63
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 3
Text = '5'
end
object Edit_A_Position: TEdit
Left = 20
Top = 129
Width = 63
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 4
Text = '0'
end
end
end
end
object StatusBar1: TStatusBar
Left = 0
Top = 389
Width = 470
Height = 19
Panels = <
item
Width = 150
end
item
Width = 50
end>
end
object Panel_Chart: TPanel
Left = 0
Top = 233
Width = 470
Height = 156
Align = alClient
BevelOuter = bvLowered
TabOrder = 2
object Chart1: TChart
Left = 1
Top = 1
Width = 468
Height = 154
AllowZoom = False
BackWall.Brush.Color = clWhite
BackWall.Brush.Style = bsClear
Gradient.EndColor = 16761986
Gradient.Visible = True
PrintProportional = False
Title.Text.Strings = (
#20248#21033)
Title.Visible = False
BottomAxis.Automatic = False
BottomAxis.AutomaticMaximum = False
BottomAxis.AutomaticMinimum = False
BottomAxis.Maximum = 90.000000000000000000
BottomAxis.Title.Caption = #26102#38388'(s)'
LeftAxis.Automatic = False
LeftAxis.AutomaticMaximum = False
LeftAxis.AutomaticMinimum = False
LeftAxis.AxisValuesFormat = '#,##0.##'
LeftAxis.ExactDateTime = False
LeftAxis.Increment = 0.100000000000000000
LeftAxis.Maximum = 14.500000000000000000
LeftAxis.RoundFirstLabel = False
LeftAxis.Ticks.Width = 2
LeftAxis.Title.Caption = #27700#20301#39640#24230
Legend.Font.Charset = ANSI_CHARSET
Legend.Font.Color = clBlack
Legend.Font.Height = -11
Legend.Font.Name = #23435#20307
Legend.Font.Style = []
Legend.TextStyle = ltsPlain
View3D = False
Align = alClient
TabOrder = 0
object Series1: TFastLineSeries
Marks.ArrowLength = 8
Marks.Style = smsValue
Marks.Visible = False
SeriesColor = clRed
Title = #27700#31665'A'#27700#20301
ValueFormat = '#,##0.##'
LinePen.Color = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
end
object Series2: TFastLineSeries
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clGreen
Title = #27700#31665'B'#27700#20301
ValueFormat = '#,##0.##'
LinePen.Color = clGreen
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -