📄 xujiguanli.~dfm
字号:
object xuejiguanliForm: TxuejiguanliForm
Left = 225
Top = 123
AutoScroll = False
Caption = #23398#31821#31649#29702
ClientHeight = 407
ClientWidth = 514
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poScreenCenter
Visible = True
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 514
Height = 407
ActivePage = TabSheet2
Align = alClient
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabIndex = 1
TabOrder = 0
object TabSheet1: TTabSheet
Caption = #23398#31821#21464#26356#36164#26009#27983#35272
OnShow = TabSheet1Show
object Panel1: TPanel
Left = 0
Top = 0
Width = 506
Height = 376
Align = alClient
BevelInner = bvLowered
BevelOuter = bvLowered
TabOrder = 0
object Splitter1: TSplitter
Left = 2
Top = 372
Width = 502
Height = 2
Cursor = crVSplit
Align = alTop
MinSize = 10
end
object GroupBox1: TGroupBox
Left = 2
Top = 2
Width = 502
Height = 54
Align = alTop
TabOrder = 0
object Label1: TLabel
Left = 80
Top = 23
Width = 80
Height = 16
Caption = #36755#20837#23398#21495#65306
end
object Edit1: TEdit
Left = 166
Top = 19
Width = 121
Height = 24
TabOrder = 0
OnChange = Edit1Change
end
object Button1: TButton
Left = 312
Top = 19
Width = 69
Height = 25
Caption = #26597#25214
TabOrder = 1
OnClick = Button1Click
end
object Button2: TButton
Left = 392
Top = 19
Width = 75
Height = 25
Caption = #21024#38500
TabOrder = 2
OnClick = Button2Click
end
end
object DBNavigator1: TDBNavigator
Left = 2
Top = 56
Width = 502
Height = 25
DataSource = DataSource1
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
Align = alTop
TabOrder = 1
end
object DBGrid1: TDBGrid
Left = 2
Top = 81
Width = 502
Height = 291
Align = alTop
DataSource = DataSource1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clBlue
TitleFont.Height = -16
TitleFont.Name = #23435#20307
TitleFont.Style = [fsBold]
Columns = <
item
Expanded = False
FieldName = 'Xuehao'
Visible = True
end
item
Expanded = False
FieldName = 'Xingming'
Visible = True
end
item
Expanded = False
FieldName = 'Xingbie'
Visible = True
end
item
Expanded = False
FieldName = 'Banji'
Width = 109
Visible = True
end
item
Expanded = False
FieldName = 'Xuejibiangeng'
Visible = True
end
item
Color = clSkyBlue
Expanded = False
FieldName = 'Beizhu'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
Visible = True
end
item
Expanded = False
FieldName = 'Xuejibiangengshijian'
Visible = True
end>
end
end
end
object TabSheet2: TTabSheet
Caption = #23398#31821#21464#26356
ImageIndex = 1
object Label9: TLabel
Left = 392
Top = 260
Width = 98
Height = 17
Caption = #21464#26356#26085#26399#20026#31995#32479
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -14
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 392
Top = 284
Width = 98
Height = 17
Caption = #40664#35748#26085#26399#65292#24744#21487
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -14
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 392
Top = 308
Width = 102
Height = 17
Caption = #20197#30452#25509#36755#20837#26085#26399'.'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -14
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 392
Top = 236
Width = 51
Height = 16
Caption = #27880#24847#65306
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 392
Top = 331
Width = 77
Height = 14
Caption = #22914'1982-12-1'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Panel2: TPanel
Left = 72
Top = 16
Width = 305
Height = 353
TabOrder = 0
object Label2: TLabel
Left = 55
Top = 24
Width = 48
Height = 16
Caption = #23398#21495#65306
end
object Label3: TLabel
Left = 55
Top = 62
Width = 48
Height = 16
Caption = #22995#21517#65306
end
object Label4: TLabel
Left = 55
Top = 100
Width = 48
Height = 16
Caption = #24615#21035#65306
end
object Label5: TLabel
Left = 23
Top = 176
Width = 80
Height = 16
Caption = #23398#31821#21464#26356#65306
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 23
Top = 214
Width = 80
Height = 16
Caption = #21464#26356#26085#26399#65306
end
object Label7: TLabel
Left = 53
Top = 245
Width = 48
Height = 16
Caption = #22791#27880#65306
end
object Label8: TLabel
Left = 55
Top = 139
Width = 48
Height = 16
Caption = #29677#32423#65306
end
object Edit2: TEdit
Left = 112
Top = 19
Width = 121
Height = 24
TabOrder = 0
OnChange = Edit2Change
end
object Edit3: TEdit
Left = 112
Top = 56
Width = 121
Height = 24
TabOrder = 1
end
object ComboBox1: TComboBox
Left = 112
Top = 173
Width = 122
Height = 24
ItemHeight = 16
TabOrder = 2
Items.Strings = (
#30041#32423
#20241#23398
#33258#21160#36864#23398
#21202#20196#36864#23398
#26356#25442#19987#19994)
end
object Edit6: TEdit
Left = 112
Top = 213
Width = 121
Height = 24
TabOrder = 3
end
object Memo1: TMemo
Left = 50
Top = 268
Width = 213
Height = 74
TabOrder = 4
end
object Edit4: TEdit
Left = 112
Top = 96
Width = 121
Height = 24
TabOrder = 5
end
object Edit5: TEdit
Left = 112
Top = 136
Width = 121
Height = 24
TabOrder = 6
end
end
object BitBtn1: TBitBtn
Left = 400
Top = 104
Width = 75
Height = 36
Caption = #28155#21152
TabOrder = 1
OnClick = BitBtn1Click
Kind = bkOK
end
object BitBtn2: TBitBtn
Left = 400
Top = 176
Width = 75
Height = 36
Caption = #36820#22238
TabOrder = 2
OnClick = BitBtn2Click
Kind = bkClose
end
end
end
object DataSource1: TDataSource
DataSet = Table1
Left = 16
Top = 24
end
object Table1: TTable
DatabaseName = 'stumanager'
Exclusive = True
TableName = 'xuejibiangeng.DB'
Left = 48
Top = 24
object Table1Xuehao: TStringField
DisplayLabel = #23398#21495
FieldName = 'Xuehao'
Size = 8
end
object Table1Xingming: TStringField
DisplayLabel = #22995#21517
FieldName = 'Xingming'
Size = 8
end
object Table1Xingbie: TStringField
Alignment = taCenter
DisplayLabel = #24615#21035
FieldName = 'Xingbie'
Size = 2
end
object Table1Banji: TStringField
DisplayLabel = #29677#32423
FieldName = 'Banji'
Size = 30
end
object Table1Xuejibiangeng: TStringField
DisplayLabel = #23398#31821#21464#26356
FieldName = 'Xuejibiangeng'
Size = 10
end
object Table1Beizhu: TStringField
DisplayLabel = #22791#27880
DisplayWidth = 80
FieldName = 'Beizhu'
Size = 100
end
object Table1Xuejibiangengshijian: TStringField
DisplayLabel = #21464#26356#26102#38388
FieldName = 'Xuejibiangengshijian'
Size = 10
end
end
object Query1: TQuery
DatabaseName = 'stumanager'
SQL.Strings = (
'select * from students;')
Left = 408
Top = 48
object Query1Xuehao: TStringField
FieldName = 'Xuehao'
Origin = 'STUMANAGER."students.DB".Xuehao'
Size = 8
end
object Query1Xingming: TStringField
FieldName = 'Xingming'
Origin = 'STUMANAGER."students.DB".Xingming'
Size = 8
end
object Query1Xingbie: TStringField
FieldName = 'Xingbie'
Origin = 'STUMANAGER."students.DB".Xingbie'
Size = 2
end
object Query1Banji: TStringField
FieldName = 'Banji'
Origin = 'STUMANAGER."students.DB".Banji'
end
end
object xuejibiangengQuery: TQuery
DatabaseName = 'stumanager'
SQL.Strings = (
'select * from xuejibiangeng;')
Left = 432
Top = 80
object xuejibiangengQueryXuehao: TStringField
FieldName = 'Xuehao'
Origin = 'STUMANAGER."xuejibiangeng.DB".Xuehao'
Size = 8
end
object xuejibiangengQueryXingming: TStringField
FieldName = 'Xingming'
Origin = 'STUMANAGER."xuejibiangeng.DB".Xingming'
Size = 8
end
object xuejibiangengQueryXingbie: TStringField
FieldName = 'Xingbie'
Origin = 'STUMANAGER."xuejibiangeng.DB".Xingbie'
Size = 2
end
object xuejibiangengQueryBanji: TStringField
FieldName = 'Banji'
Origin = 'STUMANAGER."xuejibiangeng.DB".Banji'
Size = 30
end
object xuejibiangengQueryXuejibiangeng: TStringField
FieldName = 'Xuejibiangeng'
Origin = 'STUMANAGER."xuejibiangeng.DB".Xuejibiangeng'
Size = 10
end
object xuejibiangengQueryBeizhu: TStringField
FieldName = 'Beizhu'
Origin = 'STUMANAGER."xuejibiangeng.DB".Beizhu'
Size = 100
end
object xuejibiangengQueryXuejibiangengshijian: TStringField
FieldName = 'Xuejibiangengshijian'
Origin = 'STUMANAGER."xuejibiangeng.DB".Xuejibiangengshijian'
Size = 10
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -