www.pudn.com > 701.rar > Unit4.dfm
object xueshengguanli: Txueshengguanli
Left = 163
Top = 78
Width = 696
Height = 475
BorderIcons = [biMinimize, biMaximize]
Caption = #23398#29983#31649#29702
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 PageControl1: TPageControl
Left = 0
Top = 0
Width = 688
Height = 441
ActivePage = TabSheet2
Align = alClient
TabOrder = 0
object TabSheet1: TTabSheet
Caption = #21152#20837#23398#29983
OnShow = TabSheet1Show
object Panel5: TPanel
Left = 0
Top = 0
Width = 417
Height = 369
Caption = 'Panel1'
TabOrder = 0
object DBGrid3: TDBGrid
Left = 1
Top = 1
Width = 415
Height = 312
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
end
object Panel6: TPanel
Left = 416
Top = 0
Width = 265
Height = 369
Caption = 'Panel2'
TabOrder = 1
object Label15: TLabel
Left = 16
Top = 24
Width = 49
Height = 13
AutoSize = False
Caption = #23398#29983'ID'
end
object Label16: TLabel
Left = 16
Top = 56
Width = 65
Height = 13
AutoSize = False
Caption = #23398#29983#22995#21517
end
object Label17: TLabel
Left = 16
Top = 96
Width = 65
Height = 13
AutoSize = False
Caption = #23398#29983#23398#21495
end
object Label18: TLabel
Left = 16
Top = 136
Width = 65
Height = 13
AutoSize = False
Caption = #25152#22312#38498#31995
end
object Label19: TLabel
Left = 16
Top = 176
Width = 65
Height = 13
AutoSize = False
Caption = #25152#22312#29677#32423
end
object Label20: TLabel
Left = 16
Top = 216
Width = 65
Height = 13
AutoSize = False
Caption = #23398#29983#24180#40836
end
object Label21: TLabel
Left = 16
Top = 256
Width = 65
Height = 13
AutoSize = False
Caption = #23398#29983#24615#21035
end
object DBEdit15: TDBEdit
Left = 96
Top = 16
Width = 121
Height = 21
DataField = 'studentid'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 0
end
object DBEdit16: TDBEdit
Left = 96
Top = 48
Width = 121
Height = 21
DataField = 'studentname'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 1
end
object DBEdit17: TDBEdit
Left = 96
Top = 88
Width = 121
Height = 21
DataField = 'studentnum'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 2
end
object DBEdit18: TDBEdit
Left = 96
Top = 128
Width = 121
Height = 21
DataField = 'studentcollage'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 3
end
object DBEdit19: TDBEdit
Left = 96
Top = 168
Width = 121
Height = 21
DataField = 'studentclass'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 4
end
object DBEdit20: TDBEdit
Left = 96
Top = 208
Width = 121
Height = 21
DataField = 'studentage'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 5
end
object DBEdit21: TDBEdit
Left = 96
Top = 248
Width = 121
Height = 21
DataField = 'studentsex'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 6
end
object BitBtn1: TBitBtn
Left = 16
Top = 312
Width = 75
Height = 25
TabOrder = 7
OnClick = BitBtn1Click
Kind = bkOK
end
object BitBtn2: TBitBtn
Left = 152
Top = 312
Width = 75
Height = 25
TabOrder = 8
OnClick = BitBtn2Click
Kind = bkCancel
end
end
object BitBtn9: TBitBtn
Left = 240
Top = 378
Width = 185
Height = 35
Caption = #36820' '#22238
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -24
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = BitBtn9Click
end
end
object TabSheet2: TTabSheet
Caption = #21024#38500#23398#29983
ImageIndex = 1
object Panel3: TPanel
Left = 0
Top = 0
Width = 417
Height = 369
Caption = 'Panel1'
TabOrder = 0
object DBGrid2: TDBGrid
Left = 1
Top = 1
Width = 416
Height = 216
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object Panel7: TPanel
Left = 0
Top = 216
Width = 417
Height = 153
TabOrder = 1
object RadioButton3: TRadioButton
Left = 16
Top = 24
Width = 73
Height = 17
Caption = #23398#29983'ID'
TabOrder = 0
end
object Edit8: TEdit
Left = 160
Top = 24
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 1
end
object Button2: TButton
Left = 120
Top = 120
Width = 75
Height = 25
Caption = #26597#25214
TabOrder = 2
OnClick = Button2Click
end
object RadioButton4: TRadioButton
Left = 16
Top = 80
Width = 113
Height = 17
Caption = #23398#29983#22995#21517
TabOrder = 3
end
object Edit9: TEdit
Left = 160
Top = 80
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 4
end
end
end
object Panel4: TPanel
Left = 416
Top = 0
Width = 265
Height = 369
Caption = 'Panel2'
TabOrder = 1
object Label8: TLabel
Left = 16
Top = 24
Width = 57
Height = 13
AutoSize = False
Caption = #23398#29983'ID'
end
object Label9: TLabel
Left = 16
Top = 56
Width = 65
Height = 13
AutoSize = False
Caption = #23398#29983#22995#21517
end
object Label10: TLabel
Left = 16
Top = 96
Width = 65
Height = 13
AutoSize = False
Caption = #23398#29983#23398#21495
end
object Label11: TLabel
Left = 16
Top = 136
Width = 73
Height = 13
AutoSize = False
Caption = #25152#22312#38498#31995
end
object Label12: TLabel
Left = 16
Top = 176
Width = 65
Height = 13
AutoSize = False
Caption = #25152#22312#29677#32423
end
object Label13: TLabel
Left = 16
Top = 216
Width = 65
Height = 13
AutoSize = False
Caption = #23398#29983#24180#40836
end
object Label14: TLabel
Left = 16
Top = 256
Width = 57
Height = 13
AutoSize = False
Caption = #23398#29983#24615#21035
end
object DBEdit8: TDBEdit
Left = 96
Top = 16
Width = 121
Height = 21
DataField = 'studentid'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 0
end
object DBEdit9: TDBEdit
Left = 96
Top = 48
Width = 121
Height = 21
DataField = 'studentname'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 1
end
object DBEdit10: TDBEdit
Left = 96
Top = 88
Width = 121
Height = 21
DataField = 'studentnum'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 2
end
object DBEdit11: TDBEdit
Left = 96
Top = 128
Width = 121
Height = 21
DataField = 'studentcollage'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 3
end
object DBEdit12: TDBEdit
Left = 96
Top = 168
Width = 121
Height = 21
DataField = 'studentclass'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 4
end
object DBEdit13: TDBEdit
Left = 96
Top = 208
Width = 121
Height = 21
DataField = 'studentage'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 5
end
object DBEdit14: TDBEdit
Left = 96
Top = 248
Width = 121
Height = 21
DataField = 'studentsex'
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 6
end
object BitBtn3: TBitBtn
Left = 16
Top = 312
Width = 75
Height = 25
TabOrder = 7
OnClick = BitBtn3Click
Kind = bkOK
end
object BitBtn4: TBitBtn
Left = 152
Top = 312
Width = 75
Height = 25
TabOrder = 8
OnClick = BitBtn4Click
Kind = bkCancel
end
end
object BitBtn7: TBitBtn
Left = 240
Top = 378
Width = 185
Height = 35
Caption = #36820' '#22238
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -24
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = BitBtn7Click
end
end
object TabSheet3: TTabSheet
Caption = #20449#24687#20462#25913
ImageIndex = 2
OnShow = TabSheet3Show
object Panel1: TPanel
Left = 0
Top = 0
Width = 417
Height = 369
Caption = 'Panel1'
TabOrder = 0
object DBGrid1: TDBGrid
Left = 1
Top = 1
Width = 416
Height = 216
DataSource = DataSource1
ImeName = 'itABC 5.22 '
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
Columns = <
item
Expanded = False
FieldName = 'studentid'
Width = 58
Visible = True
end
item
Expanded = False
FieldName = 'studentname'
Width = 51
Visible = True
end
item
Expanded = False
FieldName = 'studentnum'
Width = 56
Visible = True
end
item
Expanded = False
FieldName = 'studentcollage'
Width = 56
Visible = True
end
item
Expanded = False
FieldName = 'studentclass'
Width = 57
Visible = True
end
item
Expanded = False
FieldName = 'studentage'
Width = 56
Visible = True
end
item
Expanded = False
FieldName = 'studentsex'
Width = 40
Visible = True
end>
end
object Panel8: TPanel
Left = 0
Top = 216
Width = 417
Height = 153
TabOrder = 1
object RadioButton1: TRadioButton
Left = 16
Top = 24
Width = 73
Height = 17
Caption = #23398#29983'ID'
TabOrder = 0
end
object Edit13: TEdit
Left = 160
Top = 24
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 1
end
object Button1: TButton
Left = 152
Top = 120
Width = 75
Height = 25
Caption = #26597#25214
TabOrder = 2
OnClick = Button1Click
end
object RadioButton2: TRadioButton
Left = 16
Top = 80
Width = 113
Height = 17
Caption = #23398#29983#22995#21517
TabOrder = 3
end
object Edit14: TEdit
Left = 160
Top = 80
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 4
end
end
end
object Panel2: TPanel
Left = 416
Top = 0
Width = 265
Height = 369
Caption = 'Panel2'
TabOrder = 1
object Label1: TLabel
Left = 16
Top = 24
Width = 49
Height = 13
AutoSize = False
Caption = #23398#29983'ID'
end
object Label2: TLabel
Left = 16
Top = 56
Width = 57
Height = 13
AutoSize = False
Caption = #23398#29983#22995#21517
end
object Label3: TLabel
Left = 16
Top = 96
Width = 57
Height = 13
AutoSize = False
Caption = #23398#29983#23398#21495
end
object Label4: TLabel
Left = 16
Top = 136
Width = 65
Height = 13
AutoSize = False
Caption = #25152#22312#38498#31995
end
object Label5: TLabel
Left = 16
Top = 176
Width = 65
Height = 13
AutoSize = False
Caption = #25152#22312#29677#32423
end
object Label6: TLabel
Left = 16
Top = 216
Width = 65
Height = 13
AutoSize = False
Caption = #23398#29983#24180#40836
end
object Label7: TLabel
Left = 16
Top = 256
Width = 57
Height = 13
AutoSize = False
Caption = #23398#29983#24615#21035
end
object Edit1: TEdit
Left = 88
Top = 16
Width = 121
Height = 21
ImeName = 'itABC 5.22 '
TabOrder = 0
end
object Edit2: TEdit
Left = 88
Top = 56
Width = 121
Height = 21
ImeName = 'itABC 5.22 '
TabOrder = 1
end
object Edit3: TEdit
Left = 88
Top = 96
Width = 121
Height = 21
ImeName = 'itABC 5.22 '
TabOrder = 2
end
object Edit4: TEdit
Left = 88
Top = 136
Width = 121
Height = 21
ImeName = 'itABC 5.22 '
TabOrder = 3
end
object Edit5: TEdit
Left = 88
Top = 176
Width = 121
Height = 21
ImeName = 'itABC 5.22 '
TabOrder = 4
end
object Edit6: TEdit
Left = 88
Top = 208
Width = 121
Height = 21
ImeName = 'itABC 5.22 '
TabOrder = 5
end
object Edit7: TEdit
Left = 88
Top = 256
Width = 121
Height = 21
ImeName = 'itABC 5.22 '
TabOrder = 6
end
object BitBtn5: TBitBtn
Left = 16
Top = 312
Width = 75
Height = 25
TabOrder = 7
OnClick = BitBtn5Click
Kind = bkOK
end
object BitBtn6: TBitBtn
Left = 152
Top = 312
Width = 75
Height = 25
TabOrder = 8
OnClick = BitBtn6Click
Kind = bkCancel
end
end
object BitBtn8: TBitBtn
Left = 240
Top = 378
Width = 185
Height = 35
Caption = #36820' '#22238
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -24
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = BitBtn8Click
end
end
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 60
Top = 72
end
object ADOTable1: TADOTable
Active = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=tushuguan.mdb;Persi' +
'st Security Info=False'
CursorType = ctStatic
TableName = 'students'
Left = 148
Top = 72
object ADOTable1studentid: TWideStringField
DisplayLabel = #23398#29983'ID'
DisplayWidth = 12
FieldName = 'studentid'
Size = 50
end
object ADOTable1studentname: TWideStringField
DisplayLabel = #23398#29983#22995#21517
DisplayWidth = 12
FieldName = 'studentname'
end
object ADOTable1studentnum: TWideStringField
DisplayLabel = #23398#29983#32534#21495
DisplayWidth = 14
FieldName = 'studentnum'
Size = 50
end
object ADOTable1studentcollage: TWideStringField
DisplayLabel = #25152#22312#23398#38498
DisplayWidth = 12
FieldName = 'studentcollage'
Size = 50
end
object ADOTable1studentclass: TWideStringField
DisplayLabel = #25152#22312#29677#32423
DisplayWidth = 13
FieldName = 'studentclass'
Size = 50
end
object ADOTable1studentage: TWideStringField
DisplayLabel = #23398#29983#24180#40836
DisplayWidth = 14
FieldName = 'studentage'
Size = 50
end
object ADOTable1studentsex: TWideStringField
DisplayLabel = #24615#21035
DisplayWidth = 5
FieldName = 'studentsex'
Size = 50
end
end
end