📄 scoreseek.~dfm
字号:
object ScoreSeekForm: TScoreSeekForm
Left = 293
Top = 137
Width = 562
Height = 426
Caption = #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
Position = poScreenCenter
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 16
Top = 8
Width = 521
Height = 41
Caption = #26597#35810#31867#21035
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 0
object RadioButton1: TRadioButton
Left = 40
Top = 16
Width = 89
Height = 17
Caption = #25353#23398#21495#26597#35810
TabOrder = 0
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 160
Top = 16
Width = 89
Height = 17
Caption = #25353#22995#21517#26597#35810
TabOrder = 1
OnClick = RadioButton2Click
end
object RadioButton3: TRadioButton
Left = 280
Top = 16
Width = 89
Height = 17
Caption = #25353#19987#19994#26597#35810
TabOrder = 2
OnClick = RadioButton3Click
end
object RadioButton4: TRadioButton
Left = 392
Top = 16
Width = 97
Height = 17
Caption = #25353#35838#31243#26597#35810
TabOrder = 3
OnClick = RadioButton4Click
end
end
object GroupBox2: TGroupBox
Left = 16
Top = 56
Width = 441
Height = 49
Caption = #26597#35810#26465#20214
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 1
object Label1: TLabel
Left = 72
Top = 24
Width = 42
Height = 14
Caption = 'Label1'
end
object Edit1: TEdit
Left = 232
Top = 16
Width = 121
Height = 22
TabOrder = 0
Text = 'Edit1'
end
object ComboBox1: TComboBox
Left = 232
Top = 16
Width = 145
Height = 22
ItemHeight = 14
TabOrder = 1
Text = 'ComboBox1'
end
end
object BitBtn1: TBitBtn
Left = 464
Top = 80
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 2
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333FF3FF3333333333CC30003333333333773777333333333C33
3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
33003377333337F33377333333333C333300333F333337F33377339333333C33
3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
330077F377F337F33377993399333C33330077FF773337F33377399993333C33
33333777733337F333FF333333333C33300033333333373FF7773333333333CC
3000333333333377377733333333333333333333333333333333}
NumGlyphs = 2
end
object DBGrid1: TDBGrid
Left = 16
Top = 112
Width = 521
Height = 185
TabOrder = 3
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object BitBtn2: TBitBtn
Left = 240
Top = 360
Width = 75
Height = 25
Caption = #36864#20986
TabOrder = 4
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333377777777777F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F3333333F7F333301111111B10333337F333333737F33330111111111
0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
0333337F377777337F333301111111110333337F333333337F33330111111111
0333337FFFFFFFFF7F3333000000000003333377777777777333}
NumGlyphs = 2
end
object GroupBox3: TGroupBox
Left = 16
Top = 304
Width = 521
Height = 49
Caption = #23398#20998#24773#20917
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 5
object Label2: TLabel
Left = 24
Top = 24
Width = 28
Height = 14
Caption = #24517#20462
end
object Label3: TLabel
Left = 112
Top = 24
Width = 28
Height = 14
Caption = #36873#20462
end
object Label4: TLabel
Left = 200
Top = 24
Width = 28
Height = 14
Caption = #20854#23427
end
object Label5: TLabel
Left = 288
Top = 24
Width = 42
Height = 14
Caption = #24635#23398#20998
end
object Label6: TLabel
Left = 400
Top = 24
Width = 56
Height = 14
Caption = #25152#38656#23398#20998
end
object Edit2: TEdit
Left = 56
Top = 16
Width = 41
Height = 22
TabStop = False
ReadOnly = True
TabOrder = 0
end
object Edit3: TEdit
Left = 144
Top = 16
Width = 41
Height = 22
TabStop = False
ReadOnly = True
TabOrder = 1
end
object Edit4: TEdit
Left = 232
Top = 16
Width = 41
Height = 22
TabStop = False
ReadOnly = True
TabOrder = 2
end
object Edit5: TEdit
Left = 336
Top = 16
Width = 41
Height = 22
TabStop = False
ReadOnly = True
TabOrder = 3
end
object Edit6: TEdit
Left = 464
Top = 16
Width = 41
Height = 22
TabStop = False
ReadOnly = True
TabOrder = 4
end
end
object Database1: TDatabase
AliasName = 'student'
LoginPrompt = False
SessionName = 'Default'
OnLogin = Database1Login
Left = 488
Top = 56
end
object Query1: TQuery
DatabaseName = 'student'
SQL.Strings = (
'select * from result')
Left = 304
Top = 176
object Query1number: TStringField
FieldName = 'number'
Origin = 'STUDENT.result.number'
Size = 8
end
object Query1name: TStringField
FieldName = 'name'
Origin = 'STUDENT.result.name'
Size = 8
end
object Query1speciality: TStringField
FieldName = 'speciality'
Origin = 'STUDENT.result.speciality'
end
object Query1coursename: TStringField
FieldName = 'coursename'
Origin = 'STUDENT.result.coursename'
end
object Query1coursetype: TStringField
FieldName = 'coursetype'
Origin = 'STUDENT.result.coursetype'
Size = 4
end
object Query1grade: TStringField
FieldName = 'grade'
Origin = 'STUDENT.result.grade'
Size = 4
end
object Query1value: TFloatField
FieldName = 'value'
Origin = 'STUDENT.result.value'
end
object Query1note: TStringField
FieldName = 'note'
Origin = 'STUDENT.result.note'
end
object Query1opera: TStringField
FieldName = 'opera'
Origin = 'STUDENT.result.opera'
Size = 8
end
object Query1stamp: TDateTimeField
FieldName = 'stamp'
Origin = 'STUDENT.result.stamp'
end
end
object DataSource1: TDataSource
Left = 160
Top = 208
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -