📄 bjgqkunit.dfm
字号:
object bjgqk: Tbjgqk
Left = 421
Top = 280
Width = 592
Height = 375
Caption = #19981#21450#26684#24773#20917
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 264
Top = 176
Width = 32
Height = 13
Caption = 'Label1'
end
object Label2: TLabel
Left = 272
Top = 184
Width = 32
Height = 13
Caption = 'Label2'
end
object Button1: TButton
Left = 384
Top = 312
Width = 75
Height = 25
Caption = #20851#38381
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 248
Top = 312
Width = 75
Height = 25
Caption = #23548#20986#22270#34920
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 112
Top = 312
Width = 75
Height = 25
Caption = #25171#21360#22270#34920
TabOrder = 2
end
object DBChart1: TDBChart
Left = 0
Top = 0
Width = 584
Height = 297
BackWall.Brush.Color = clWhite
BackWall.Brush.Style = bsClear
Title.Text.Strings = (
' ')
Align = alTop
TabOrder = 3
object Label3: TLabel
Left = 176
Top = 8
Width = 209
Height = 17
AutoSize = False
end
object Series1: TBarSeries
Marks.ArrowLength = 20
Marks.Visible = True
DataSource = Table1
SeriesColor = clRed
XLabelsSource = 'bjh0'
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
YValues.ValueSource = 'rs00'
end
end
object Table1: TTable
DatabaseName = 'sinfo'
TableName = 'dbo.bjgtemp'
Top = 280
end
object DataSource1: TDataSource
DataSet = Table1
Left = 32
Top = 280
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -