?? unit23.~dfm
字號:
object cjtj: Tcjtj
Left = 235
Top = 99
Width = 580
Height = 416
Caption = #25104#32489#32479#35745
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Scaled = False
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 16
Top = 304
Width = 60
Height = 13
Caption = #29677#32423#26174#31034#65306
end
object Label2: TLabel
Left = 200
Top = 304
Width = 60
Height = 13
Caption = #35838#31243#26174#31034#65306
end
object Label3: TLabel
Left = 392
Top = 296
Width = 36
Height = 13
Caption = #23398#26399#65306
end
object QRChart2: TQRChart
Left = 2
Top = 0
Width = 567
Height = 249
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
658.8125
5.29166666666667
0
1500.1875)
object QRDBChart2: TQRDBChart
Left = -1
Top = -1
Width = 1
Height = 1
BackWall.Brush.Color = clWhite
BackWall.Brush.Style = bsClear
Title.Text.Strings = (
'TQRChart')
object Series1: TFastLineSeries
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clRed
LinePen.Color = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1
YValues.Order = loNone
end
object Series2: TBarSeries
Marks.ArrowLength = 20
Marks.Visible = True
SeriesColor = clGreen
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
end
end
end
object Button1: TButton
Left = 104
Top = 344
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 1
OnClick = Button1Click
end
object DBLookupComboBox1: TDBLookupComboBox
Left = 80
Top = 296
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
KeyField = #29677#32423#21495
ListField = #25152#22312#24180#32423
ListSource = dsname
TabOrder = 2
end
object DBLookupComboBox2: TDBLookupComboBox
Left = 264
Top = 296
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
KeyField = 'courseID'
ListField = 'courseName'
ListSource = dsscore
TabOrder = 3
end
object Button2: TButton
Left = 304
Top = 344
Width = 73
Height = 25
Caption = #21462#28040
TabOrder = 4
OnClick = Button2Click
end
object ComboBox1: TComboBox
Left = 432
Top = 296
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
ItemHeight = 13
TabOrder = 5
Items.Strings = (
#31532#19968#23398#26399
#31532#20108#23398#26399
#31532#19977#23398#26399
#31532#22235#23398#26399
#31532#20116#23398#26399
#31532#20845#23398#26399
#31532#19971#23398#26399
#31532#20843#23398#26399)
end
object queryname: TADOQuery
Connection = Form1.ADOConnection1
Parameters = <>
Left = 96
Top = 296
end
object dsname: TDataSource
DataSet = queryname
Left = 136
Top = 296
end
object queryscore: TADOQuery
Connection = Form1.ADOConnection1
Parameters = <>
Left = 288
Top = 288
end
object dsscore: TDataSource
DataSet = queryscore
Left = 320
Top = 288
end
object ADOQuery1: TADOQuery
Connection = Form1.ADOConnection1
Parameters = <>
Left = 280
Top = 192
end
end
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -