📄 ucalc.~dfm
字号:
inherited FCalc: TFCalc
Left = 121
Top = 78
Width = 867
Height = 643
Caption = #25104#32489#32479#35745#20998#26512
FormStyle = fsMDIChild
OldCreateOrder = True
Position = poDefault
Visible = True
WindowState = wsMaximized
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object StatusBar: TStatusBar
Left = 0
Top = 590
Width = 859
Height = 19
Panels = <>
SimplePanel = True
end
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 859
Height = 590
ActivePage = TabSheet2
Align = alClient
TabOrder = 1
object TabSheet2: TTabSheet
Caption = #21508#32423#21508#31185#30446#25104#32489#22270#24418#20998#26512
ImageIndex = 1
object Splitter2: TSplitter
Left = 0
Top = 156
Width = 851
Height = 3
Cursor = crVSplit
Align = alTop
end
object Panel3: TPanel
Left = 0
Top = 0
Width = 851
Height = 156
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object Shape2: TShape
Left = 0
Top = 0
Width = 851
Height = 156
Align = alClient
end
object RadioGrou1: TRadioGroup
Left = 17
Top = 17
Width = 201
Height = 49
Caption = #32423#21035
Columns = 3
ItemIndex = 0
Items.Strings = (
#19971
#20843
#20061)
TabOrder = 0
OnClick = RadioGrou1Click
end
object RadioGroup2: TRadioGroup
Left = 240
Top = 16
Width = 593
Height = 49
Caption = #32771#35797#31185#30446
TabOrder = 1
OnClick = RadioGroup2Click
end
object GroupBox1: TGroupBox
Left = 17
Top = 72
Width = 201
Height = 49
Caption = #20998#25968#27573
TabOrder = 2
object Label3: TLabel
Left = 62
Top = 20
Width = 12
Height = 12
Caption = #33267
end
object Edit2: TEdit
Left = 16
Top = 16
Width = 33
Height = 20
TabOrder = 0
Text = '90'
OnKeyPress = NumKeyPress
end
object Edit3: TEdit
Left = 88
Top = 16
Width = 33
Height = 20
TabOrder = 1
Text = '100'
OnKeyPress = NumKeyPress
end
end
object Button3: TButton
Left = 240
Top = 85
Width = 75
Height = 25
Caption = #22270#24418#25171#21360
TabOrder = 3
OnClick = Button3Click
end
end
object Panel4: TPanel
Left = 0
Top = 159
Width = 851
Height = 404
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object Panel5: TPanel
Left = 0
Top = 0
Width = 851
Height = 404
Align = alClient
TabOrder = 0
object Shape3: TShape
Left = 1
Top = 1
Width = 849
Height = 402
Align = alClient
end
object DBChart1: TDBChart
Left = 1
Top = 1
Width = 849
Height = 402
BackWall.Brush.Color = clWhite
BackWall.Brush.Style = bsClear
Gradient.EndColor = clOlive
Gradient.Visible = True
Title.AdjustFrame = False
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -19
Title.Font.Name = '@'#23435#20307
Title.Font.Style = [fsBold]
Title.Text.Strings = (
'TDBChart')
Legend.ColorWidth = 5
Legend.DividingLines.Visible = True
Legend.Font.Charset = ANSI_CHARSET
Legend.Font.Color = clBlack
Legend.Font.Height = -11
Legend.Font.Name = #23435#20307
Legend.Font.Style = []
Legend.HorizMargin = 1
Legend.TopPos = 12
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object Series1: TBarSeries
ColorEachPoint = True
Marks.ArrowLength = 20
Marks.Style = smsValue
Marks.Visible = True
DataSource = ADOQuery_fx1
SeriesColor = clRed
VertAxis = aRightAxis
XLabelsSource = 'bj'
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 = 'yw'
end
end
end
end
end
object TabSheet1: TTabSheet
Caption = #25945#23398#25928#26524#32479#35745
object Splitter1: TSplitter
Left = 177
Top = 0
Height = 563
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 177
Height = 563
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object Shape1: TShape
Left = 0
Top = 0
Width = 177
Height = 563
Align = alClient
end
object Label1: TLabel
Left = 16
Top = 48
Width = 56
Height = 14
Caption = #32479#35745#31185#30446
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 16
Top = 176
Width = 56
Height = 14
Caption = #26102#38388#26631#39064
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object ComboBox: TComboBox
Left = 24
Top = 72
Width = 121
Height = 20
ItemHeight = 12
TabOrder = 0
Text = 'ComboBox'
OnChange = ComboBoxChange
Items.Strings = (
#35821#25991
#25968#23398
#33521#35821
#29289#29702
#21270#23398
#25919#27835
#21382#21490
#22320#29702
#29983#29289)
end
object RadioGroup: TRadioGroup
Left = 24
Top = 104
Width = 129
Height = 57
Caption = #20998' '#21046
Columns = 2
ItemIndex = 0
Items.Strings = (
'150'#20998
'120'#20998
'100'#20998)
TabOrder = 1
OnClick = RadioGroupClick
end
object Button1: TButton
Left = 72
Top = 224
Width = 82
Height = 25
Caption = #32479' '#35745
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 72
Top = 256
Width = 82
Height = 25
Caption = #34920#26684#25171#21360#39044#35272
TabOrder = 3
OnClick = Button2Click
end
object Edit1: TEdit
Left = 16
Top = 200
Width = 153
Height = 20
TabOrder = 4
Text = '2004~2005'#24180#24230#31532#20108#23398#26399
end
object Button4: TButton
Left = 72
Top = 288
Width = 82
Height = 25
Caption = #22270#24418#25171#21360
TabOrder = 5
OnClick = Button4Click
end
object BitBtn2: TBitBtn
Left = 70
Top = 352
Width = 85
Height = 25
Caption = #32553' '#23567
TabOrder = 6
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33033333333333333F7F3333333333333000333333333333F777333333333333
000333333333333F777333333333333000333333333333F77733333333333300
033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
333333773337777333333078F8F87033333337F3333337F33333778F8F8F8773
333337333333373F333307F8F8F8F70333337F33FFFFF37F3333078999998703
33337F377777337F333307F8F8F8F703333373F3333333733333778F8F8F8773
333337F3333337F333333078F8F870333333373FF333F7333333330777770333
333333773FF77333333333370007333333333333777333333333}
NumGlyphs = 2
end
object BitBtn1: TBitBtn
Left = 73
Top = 320
Width = 81
Height = 25
Caption = #25918' '#22823
TabOrder = 7
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33033333333333333F7F3333333333333000333333333333F777333333333333
000333333333333F777333333333333000333333333333F77733333333333300
033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
33333377333777733333307F8F8F7033333337F333F337F3333377F8F9F8F773
3333373337F3373F3333078F898F870333337F33F7FFF37F333307F99999F703
33337F377777337F3333078F898F8703333373F337F33373333377F8F9F8F773
333337F3373337F33333307F8F8F70333333373FF333F7333333330777770333
333333773FF77333333333370007333333333333777333333333}
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 70
Top = 385
Width = 85
Height = 25
Caption = #36824' '#21407
TabOrder = 8
OnClick = BitBtn3Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33033333333333333F7F3333333333333000333333333333F777333333333333
000333333333333F777333333333333000333333333333F77733333333333300
033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
333333773337777333333078F8F87033333337F3333337F33333778F8F8F8773
333337333333373F333307F8F8F8F70333337F33FFFFF37F3333078999998703
33337F377777337F333307F8F8F8F703333373F3333333733333778F8F8F8773
333337F3333337F333333078F8F870333333373FF333F7333333330777770333
333333773FF77333333333370007333333333333777333333333}
NumGlyphs = 2
end
end
object Panel2: TPanel
Left = 180
Top = 0
Width = 671
Height = 563
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object Splitter3: TSplitter
Left = 0
Top = 257
Width = 671
Height = 3
Cursor = crVSplit
Align = alTop
end
object Panel6: TPanel
Left = 0
Top = 0
Width = 671
Height = 257
Align = alTop
TabOrder = 0
object DBGridEh: TDBGridEh
Left = 1
Top = 1
Width = 669
Height = 255
Align = alClient
DataSource = DataSource
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -