📄 oldstu.dfm
字号:
UIStyle = Protein
TabOrder = 3
Transparent = False
ModalResult = 0
FocusedRectMargin = 2
Layout = blGlyphLeft
Spacing = 4
MouseContinuouslyDownInterval = 100
OnClick = btnrefreshClick
ResHandle = 0
end
object btnjiao: TsuiButton
Left = 511
Top = 28
Width = 80
Height = 27
Caption = #24050#20132#36153#23398#29983
AutoSize = False
UIStyle = Protein
TabOrder = 4
Transparent = False
ModalResult = 0
FocusedRectMargin = 2
Layout = blGlyphLeft
Spacing = 4
MouseContinuouslyDownInterval = 100
OnClick = btnjiaoClick
ResHandle = 0
end
object btnwei: TsuiButton
Left = 608
Top = 28
Width = 80
Height = 27
Caption = #26410#20132#36153#23398#29983
AutoSize = False
UIStyle = Protein
TabOrder = 5
Transparent = False
ModalResult = 0
FocusedRectMargin = 2
Layout = blGlyphLeft
Spacing = 4
MouseContinuouslyDownInterval = 100
OnClick = btnweiClick
ResHandle = 0
end
end
object dgstu: TDBGridEh
Left = 0
Top = 153
Width = 715
Height = 301
Align = alClient
Ctl3D = False
DataSource = dsstu
FooterColor = clWindow
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -11
FooterFont.Name = 'MS Sans Serif'
FooterFont.Style = []
FooterRowCount = 1
FrozenCols = 3
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
OptionsEh = [dghHighlightFocus, dghClearSelection, dghDialogFind]
ParentCtl3D = False
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
EditButtons = <>
FieldName = 'id'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #27969#27700#21495
end
item
EditButtons = <>
FieldName = 'stuid'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #23398#21495
Width = 80
end
item
EditButtons = <>
FieldName = 'stuname'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #22995#21517
Width = 80
end
item
EditButtons = <>
FieldName = 'dep'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #31995
Width = 80
end
item
EditButtons = <>
FieldName = 'major'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #19987#19994
Width = 80
end
item
EditButtons = <>
FieldName = 'grade'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #24180#32423
Width = 80
end
item
EditButtons = <>
FieldName = 'class'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #29677#32423
Width = 80
end
item
EditButtons = <>
FieldName = 'schooldate'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #20837#23398#26085#26399
Width = 100
end
item
EditButtons = <>
FieldName = 'status'
Footers = <>
Visible = False
end>
end
object suiPanel1: TsuiPanel
Left = 0
Top = 84
Width = 715
Height = 69
UIStyle = Protein
BorderColor = clBlack
Caption = #23398#29983#36164#26009
ShowButton = True
CaptionFontColor = clWhite
Align = alTop
TabOrder = 3
Color = clWhite
object Label1: TLabel
Left = 14
Top = 39
Width = 30
Height = 13
AutoSize = False
Caption = #23398#21495
end
object Label2: TLabel
Left = 117
Top = 39
Width = 29
Height = 13
AutoSize = False
Caption = #22995#21517
end
object Label3: TLabel
Left = 227
Top = 39
Width = 21
Height = 13
AutoSize = False
Caption = #31995
end
object Label4: TLabel
Left = 332
Top = 39
Width = 29
Height = 13
AutoSize = False
Caption = #19987#19994
end
object Label5: TLabel
Left = 454
Top = 39
Width = 28
Height = 13
AutoSize = False
Caption = #24180#32423
end
object Label6: TLabel
Left = 577
Top = 39
Width = 29
Height = 13
AutoSize = False
Caption = #29677#32423
end
object edtid: TsuiEdit
Left = 42
Top = 36
Width = 70
Height = 19
UIStyle = Protein
BorderColor = clBlack
ReadOnly = True
TabOrder = 0
end
object edtname: TsuiEdit
Left = 148
Top = 36
Width = 75
Height = 19
UIStyle = Protein
BorderColor = clBlack
ReadOnly = True
TabOrder = 1
end
object edtdep: TsuiEdit
Left = 247
Top = 36
Width = 82
Height = 19
UIStyle = Protein
BorderColor = clBlack
ReadOnly = True
TabOrder = 2
end
object edtmajor: TsuiEdit
Left = 367
Top = 36
Width = 82
Height = 19
UIStyle = Protein
BorderColor = clBlack
ReadOnly = True
TabOrder = 3
end
object edtgrade: TsuiEdit
Left = 489
Top = 36
Width = 85
Height = 19
UIStyle = Protein
BorderColor = clBlack
ReadOnly = True
TabOrder = 4
end
object edtclass: TsuiEdit
Left = 611
Top = 36
Width = 88
Height = 19
UIStyle = Protein
BorderColor = clBlack
ReadOnly = True
TabOrder = 5
end
end
end
object adqstu: TADOQuery
Connection = frmmain.adc
Parameters = <>
Left = 272
Top = 208
end
object dsstu: TDataSource
DataSet = adqstu
OnDataChange = dsstuDataChange
Left = 328
Top = 208
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -