?? teacher.dfm
字號:
object F_teacher: TF_teacher
Left = 255
Top = 137
Width = 663
Height = 527
Caption = #25945#24072#36164#26009
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 496
Top = 88
Width = 48
Height = 16
Caption = 'ID'#21495#65306
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 496
Top = 120
Width = 48
Height = 16
Caption = #32534#21495#65306
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 496
Top = 216
Width = 48
Height = 16
Caption = #38498#31995#65306
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 496
Top = 248
Width = 48
Height = 16
Caption = #32844#31216#65306
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 496
Top = 152
Width = 48
Height = 16
Caption = #22995#21517#65306
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 496
Top = 184
Width = 48
Height = 16
Caption = #24615#21035#65306
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 496
Top = 280
Width = 48
Height = 16
Caption = #29983#26085#65306
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 496
Top = 312
Width = 80
Height = 16
Caption = #20219#25945#35838#31243#65306
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object DBGrid1: TDBGrid
Left = 0
Top = 41
Width = 481
Height = 384
Align = alCustom
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'ID'
Visible = True
end
item
Expanded = False
FieldName = 'teacherno'
Width = 75
Visible = True
end
item
Expanded = False
FieldName = 'name'
Width = 137
Visible = True
end
item
Expanded = False
FieldName = 'sex'
Width = 43
Visible = True
end
item
Expanded = False
FieldName = 'birthday'
Visible = True
end
item
Expanded = False
FieldName = 'depart'
Visible = True
end
item
Expanded = False
FieldName = 'degree'
Width = 78
Visible = True
end>
end
object DBEdit1: TDBEdit
Left = 544
Top = 85
Width = 81
Height = 20
Color = clScrollBar
DataField = 'ID'
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 1
end
object DBEdit2: TDBEdit
Left = 544
Top = 117
Width = 81
Height = 20
DataField = 'teacherno'
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
end
object DBEdit3: TDBEdit
Left = 544
Top = 149
Width = 81
Height = 20
DataField = 'name'
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object DBEdit6: TDBEdit
Left = 544
Top = 245
Width = 81
Height = 20
DataField = 'degree'
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
end
object DBEdit7: TDBEdit
Left = 544
Top = 277
Width = 97
Height = 20
DataField = 'birthday'
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
end
object Btnadd: TButton
Left = 24
Top = 432
Width = 75
Height = 25
Caption = #28155#21152
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = BtnaddClick
end
object Btnedt: TButton
Left = 128
Top = 432
Width = 75
Height = 25
Caption = #20462#25913
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = BtnedtClick
end
object Btndlt: TButton
Left = 232
Top = 432
Width = 75
Height = 25
Caption = #21024#38500
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 8
OnClick = BtndltClick
end
object Btnsav: TButton
Left = 336
Top = 432
Width = 75
Height = 25
Caption = #20445#23384
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 9
OnClick = BtnsavClick
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 655
Height = 41
Align = alTop
TabOrder = 10
object Label7: TLabel
Left = 16
Top = 9
Width = 48
Height = 16
Caption = #38498#31995#65306
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object CmbDepart: TComboBox
Left = 64
Top = 8
Width = 145
Height = 21
ItemHeight = 13
TabOrder = 0
Text = #20840#37096
Items.Strings = (
#20840#37096
#20449#24687#31995
#35745#31639#26426#31995
#31649#29702#31995)
end
object Btnqry: TButton
Left = 224
Top = 8
Width = 75
Height = 25
Caption = #26597#35810
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = BtnqryClick
end
end
object DBComboBox1: TDBComboBox
Left = 544
Top = 181
Width = 81
Height = 21
DataField = 'sex'
DataSource = DataSource1
ItemHeight = 13
Items.Strings = (
#30007
#22899)
TabOrder = 11
end
object DBComboBox2: TDBComboBox
Left = 544
Top = 213
Width = 81
Height = 21
DataField = 'depart'
DataSource = DataSource1
ItemHeight = 13
Items.Strings = (
#20449#24687#31995
#35745#31639#26426#31995
#31649#29702#31995)
TabOrder = 12
end
object DBGrid2: TDBGrid
Left = 488
Top = 336
Width = 153
Height = 89
DataSource = DataSource2
TabOrder = 13
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object DataSource1: TDataSource
DataSet = ADOTabTeacher
Left = 536
Top = 48
end
object ADOTabTeacher: TADOTable
Active = True
CacheSize = 5
Connection = mainform.ADOConnection1
CursorType = ctStatic
AfterScroll = ADOTabTeacherAfterScroll
TableName = 'teacher'
Left = 504
Top = 48
object ADOTabTeacherID: TAutoIncField
FieldName = 'ID'
ReadOnly = True
end
object ADOTabTeacherteacherno: TStringField
DisplayLabel = #25945#24072#35777#21495
FieldName = 'teacherno'
FixedChar = True
Size = 4
end
object ADOTabTeachername: TStringField
DisplayLabel = #22995#21517
FieldName = 'name'
Size = 50
end
object ADOTabTeachersex: TStringField
DisplayLabel = #24615#21035
FieldName = 'sex'
FixedChar = True
Size = 2
end
object ADOTabTeacherbirthday: TDateTimeField
DisplayLabel = #29983#26085
FieldName = 'birthday'
end
object ADOTabTeacherdepart: TStringField
DisplayLabel = #38498#31995
FieldName = 'depart'
end
object ADOTabTeacherdegree: TStringField
DisplayLabel = #32844#31216
FieldName = 'degree'
Size = 10
end
object ADOTabTeacherpassword: TStringField
FieldName = 'password'
end
end
object ADOQryCourse: TADOQuery
Connection = mainform.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select name from course')
Left = 568
Top = 48
object ADOQryCoursename: TStringField
DisplayLabel = #35838#31243
FieldName = 'name'
Size = 50
end
end
object DataSource2: TDataSource
DataSet = ADOQryCourse
Left = 600
Top = 48
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -