📄 u_qscore.dfm
字号:
object f_qscore: Tf_qscore
Left = 228
Top = 121
Width = 521
Height = 396
Caption = #23398#29983#25104#32489#26597#35810
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 16
Top = 16
Width = 105
Height = 13
AutoSize = False
Caption = #35831#36755#20837#26597#35810#26465#20214
end
object ComboBox1: TComboBox
Left = 16
Top = 40
Width = 121
Height = 21
ItemHeight = 13
TabOrder = 0
Items.Strings = (
#23398#21495
#35838#31243
#31867#22411
#25104#32489)
end
object ComboBox2: TComboBox
Left = 152
Top = 40
Width = 57
Height = 21
ItemHeight = 13
TabOrder = 1
Items.Strings = (
'='
'>'
'<'
'>='
'<='
'<>'
'like')
end
object ComboBox4: TComboBox
Left = 344
Top = 39
Width = 57
Height = 21
ItemHeight = 13
TabOrder = 2
Items.Strings = (
''
'and'
'or')
end
object ComboBox5: TComboBox
Left = 16
Top = 76
Width = 121
Height = 21
ItemHeight = 13
TabOrder = 3
Items.Strings = (
#23398#21495
#35838#31243
#25104#32489
#31867#22411)
end
object BitBtn1: TBitBtn
Left = 45
Top = 312
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 4
OnClick = BitBtn1Click
end
object BitBtn2: TBitBtn
Left = 288
Top = 312
Width = 75
Height = 25
Caption = #36864#20986
TabOrder = 5
OnClick = BitBtn2Click
end
object ComboBox6: TComboBox
Left = 152
Top = 76
Width = 57
Height = 21
ItemHeight = 13
TabOrder = 6
Items.Strings = (
'='
'>'
'<'
'>='
'<='
'<>'
'like')
end
object Edit1: TEdit
Left = 224
Top = 40
Width = 105
Height = 21
TabOrder = 7
end
object Edit2: TEdit
Left = 224
Top = 76
Width = 105
Height = 21
TabOrder = 8
end
object DBGrid1: TDBGrid
Left = 16
Top = 112
Width = 385
Height = 177
DataSource = DataSource1
TabOrder = 9
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'stuid'
Title.Caption = #23398#21495
Visible = True
end
item
Expanded = False
FieldName = 'course'
Title.Caption = #35838#31243
Visible = True
end
item
Expanded = False
FieldName = 'type'
Title.Caption = #31867#22411
Visible = True
end
item
Expanded = False
FieldName = 'score'
Title.Caption = #25104#32489
Visible = True
end>
end
object BitBtn4: TBitBtn
Left = 168
Top = 312
Width = 75
Height = 25
Caption = #25171#21360
TabOrder = 10
OnClick = BitBtn4Click
end
object ADOQuery1: TADOQuery
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=data.mdb;Persist Se' +
'curity Info=False'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from score')
Left = 240
Top = 8
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 184
Top = 8
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -