?? dwsdfhzfrm.dfm
字號:
object dwsdfhz: Tdwsdfhz
Left = 234
Top = 227
BorderIcons = []
BorderStyle = bsDialog
Caption = #21333#20301#27700#30005#36153#27719#24635
ClientHeight = 329
ClientWidth = 686
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
ShowHint = True
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 0
Top = 0
Width = 686
Height = 265
Align = alTop
BevelInner = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label19: TLabel
Left = 70
Top = 11
Width = 132
Height = 12
Caption = #24180#21508#26376#20221#28040#32791#24773#20917#21015#34920#65306
Transparent = True
end
object DBChart1: TDBChart
Left = 224
Top = 5
Width = 461
Height = 255
Hint = #28040#32791#24773#20917#22270#31034
BackWall.Brush.Color = clWhite
BackWall.Brush.Style = bsClear
Foot.AdjustFrame = False
Foot.Alignment = taRightJustify
Foot.Font.Charset = GB2312_CHARSET
Foot.Font.Color = clNavy
Foot.Font.Height = -12
Foot.Font.Name = #23435#20307
Foot.Font.Style = []
Foot.Text.Strings = (
'')
Foot.Visible = False
LeftWall.Brush.Color = clWhite
LeftWall.Brush.Style = bsClear
MarginBottom = 1
MarginLeft = 0
MarginRight = 2
MarginTop = 2
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clNavy
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = []
Title.Text.Strings = (
#21508#26376#20221#28040#32791#24773#20917#22270#31034)
LeftAxis.LabelsFont.Charset = GB2312_CHARSET
LeftAxis.LabelsFont.Color = clBlack
LeftAxis.LabelsFont.Height = -12
LeftAxis.LabelsFont.Name = #23435#20307
LeftAxis.LabelsFont.Style = []
LeftAxis.MinorTickCount = 2
Legend.Alignment = laBottom
Legend.ColorWidth = 15
Legend.DividingLines.Visible = True
Legend.Font.Charset = GB2312_CHARSET
Legend.Font.Color = clBlack
Legend.Font.Height = -12
Legend.Font.Name = #23435#20307
Legend.Font.Style = []
Legend.ShadowSize = 1
Legend.TextStyle = ltsPlain
View3D = False
View3DOptions.ZoomText = False
Align = alCustom
BevelOuter = bvNone
BevelWidth = 0
Color = clSkyBlue
TabOrder = 0
object Series1: TLineSeries
Marks.ArrowLength = 20
Marks.Style = smsValue
Marks.Visible = False
DataSource = yfgldata.dwsdfhz
SeriesColor = 8454143
Title = #29992#27700#37327
Dark3D = False
Pointer.HorizSize = 5
Pointer.InflateMargins = True
Pointer.Style = psCircle
Pointer.VertSize = 5
Pointer.Visible = True
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
XValues.ValueSource = #26376#20221
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
YValues.ValueSource = #29992#27700#37327
end
object Series2: TLineSeries
Marks.ArrowLength = 20
Marks.Visible = False
DataSource = yfgldata.dwsdfhz
SeriesColor = clTeal
Title = #29992#30005#37327
Pointer.InflateMargins = True
Pointer.Style = psRectangle
Pointer.Visible = True
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
XValues.ValueSource = #26376#20221
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
YValues.ValueSource = #29992#30005#37327
end
object Series3: TLineSeries
Marks.ArrowLength = 20
Marks.Style = smsValue
Marks.Visible = False
DataSource = yfgldata.dwsdfhz
SeriesColor = clRed
Title = #27700#30005#36153#33410#32422
Dark3D = False
Pointer.InflateMargins = True
Pointer.Style = psDiamond
Pointer.Visible = True
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
XValues.ValueSource = #26376#20221
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
YValues.ValueSource = #27700#30005#36153#33410#32422
end
end
object DBGridEh1: TDBGridEh
Left = 8
Top = 32
Width = 209
Height = 225
Hint = #21508#26376#20221#28040#32791#24773#20917#21015#34920
AutoFitColWidths = True
Color = clMoneyGreen
DataSource = yfgldata.Ddwsdfhz
FixedColor = clSkyBlue
Flat = True
FooterColor = clWindow
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = #23435#20307
FooterFont.Style = []
ImeMode = imClose
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
RowHeight = 16
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
TitleHeight = 13
VertScrollBar.VisibleMode = sbNeverShowEh
Columns = <
item
EditButtons = <>
FieldName = #26376#20221
Footers = <>
Width = 28
end
item
EditButtons = <>
FieldName = #29992#27700#37327
Footers = <>
Width = 42
end
item
EditButtons = <>
FieldName = #29992#30005#37327
Footers = <>
Width = 40
end
item
EditButtons = <>
FieldName = #27700#30005#36153#33410#32422
Footers = <>
Width = 80
end>
end
object DBNumberEditEh1: TDBNumberEditEh
Left = 8
Top = 6
Width = 57
Height = 20
Hint = #35831#36755#20837#24180#24230
Color = clMoneyGreen
EditButton.Style = ebsUpDownEh
EditButton.Visible = True
EditButtons = <>
ImeMode = imClose
MaxValue = 9999.000000000000000000
MinValue = 1949.000000000000000000
TabOrder = 2
Value = 2004.000000000000000000
Visible = True
OnChange = DBNumberEditEh1Change
end
end
object Panel2: TPanel
Left = 0
Top = 265
Width = 686
Height = 32
Align = alTop
BevelInner = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label3: TLabel
Left = 15
Top = 10
Width = 72
Height = 12
Caption = #29992#27700#37327#24635#35745#65306
Transparent = True
end
object Label4: TLabel
Left = 159
Top = 10
Width = 12
Height = 12
Caption = #26041
Transparent = True
end
object Label5: TLabel
Left = 183
Top = 10
Width = 72
Height = 12
Caption = #29992#30005#37327#24635#35745#65306
Transparent = True
end
object Label6: TLabel
Left = 327
Top = 10
Width = 12
Height = 12
Caption = #20803
Transparent = True
end
object Label7: TLabel
Left = 351
Top = 10
Width = 96
Height = 12
Caption = #27700#30005#36153#33410#32422#24635#35745#65306
Transparent = True
end
object Label8: TLabel
Left = 551
Top = 10
Width = 12
Height = 12
Caption = #20803
Transparent = True
end
object Edit1: TEdit
Left = 87
Top = 6
Width = 65
Height = 20
Hint = #29992#27700#37327#24635#35745
TabStop = False
BevelOuter = bvNone
BiDiMode = bdLeftToRight
Color = clSkyBlue
ParentBiDiMode = False
ReadOnly = True
TabOrder = 0
end
object Edit2: TEdit
Left = 255
Top = 6
Width = 65
Height = 20
Hint = #29992#30005#37327#24635#35745
TabStop = False
Color = clSkyBlue
ReadOnly = True
TabOrder = 1
end
object Edit3: TEdit
Left = 455
Top = 6
Width = 90
Height = 20
Hint = #27700#30005#36153#33410#32422#24635#35745
TabStop = False
Color = clSkyBlue
ReadOnly = True
TabOrder = 2
end
end
object Panel3: TPanel
Left = 0
Top = 297
Width = 686
Height = 32
Align = alClient
BevelInner = bvLowered
Color = clSkyBlue
TabOrder = 2
object SpeedButton1: TSpeedButton
Left = 623
Top = 5
Width = 57
Height = 22
Cursor = crHandPoint
Hint = #36864#20986#26412#30028#38754
Caption = #36864#20986
Flat = True
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
0000}
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 566
Top = 5
Width = 57
Height = 22
Cursor = crHandPoint
Hint = #25171#21360#24180#24230#27719#24635#34920
Caption = #25171#21360
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
888F8800000000000888808888888880808800000000000008080888888BBB88
0008088888877788080800000000000008800888888888808080800000000008
0800880FFFFFFFF080808880F00000F000088880FFFFFFFF088888880F00000F
088888880FFFFFFFF08888888000000000888888888888888888}
OnClick = SpeedButton2Click
end
end
end