📄 teacherunit.dfm
字号:
Height = 13
AutoSize = False
Caption = #25945#24072#32534#21495#65306
end
object levtname: TLabel
Left = 14
Top = 61
Width = 60
Height = 13
AutoSize = False
Caption = #25945#24072#21517#31216#65306
end
object lbool: TLabel
Left = 631
Top = 18
Width = 60
Height = 13
AutoSize = False
Caption = #26159#21542#22806#32856#65306
end
object lpost: TLabel
Left = 257
Top = 22
Width = 65
Height = 13
AutoSize = False
Caption = #32844' '#31216#65306
end
object lsex: TLabel
Left = 492
Top = 20
Width = 54
Height = 13
AutoSize = False
Caption = #24615' '#21035#65306
end
object lage: TLabel
Left = 254
Top = 63
Width = 66
Height = 13
AutoSize = False
Caption = #24180' '#40836#65306
end
object ladress: TLabel
Left = 213
Top = 108
Width = 61
Height = 13
AutoSize = False
Caption = #32852#31995#22320#22336#65306
end
object ltel: TLabel
Left = 486
Top = 62
Width = 60
Height = 13
AutoSize = False
Caption = #32852#31995#30005#35805#65306
end
object Label1: TLabel
Left = 504
Top = 108
Width = 60
Height = 13
AutoSize = False
Caption = #22791' '#27880#65306
end
object Label5: TLabel
Left = 15
Top = 106
Width = 54
Height = 13
AutoSize = False
Caption = #25480#35838#37096#38376#65306
end
object edttname: TEdit
Left = 85
Top = 59
Width = 132
Height = 21
TabOrder = 0
Text = 'edttname'
end
object cbxbool: TComboBox
Left = 697
Top = 14
Width = 57
Height = 21
ItemHeight = 13
ItemIndex = 0
TabOrder = 1
Text = #35831#36873#25321
Items.Strings = (
#35831#36873#25321
#26159
#21542)
end
object cbxpost: TComboBox
Left = 329
Top = 18
Width = 121
Height = 21
ItemHeight = 13
TabOrder = 2
end
object edtage: TEdit
Left = 328
Top = 59
Width = 121
Height = 21
TabOrder = 3
Text = 'edtage'
end
object edtadress: TEdit
Left = 288
Top = 105
Width = 193
Height = 21
TabOrder = 4
Text = 'edtadress'
end
object edttel: TEdit
Left = 552
Top = 57
Width = 201
Height = 21
TabOrder = 5
Text = 'edttel'
end
object cbxsex: TComboBox
Left = 552
Top = 16
Width = 65
Height = 21
ItemHeight = 13
TabOrder = 6
end
object Edtmemo: TEdit
Left = 584
Top = 104
Width = 169
Height = 21
TabOrder = 7
Text = 'Edtmemo'
end
object cbxtcscode: TComboBox
Left = 85
Top = 17
Width = 132
Height = 21
ItemHeight = 13
TabOrder = 8
Text = #35831#36873#25321
OnChange = cbxtcscodeChange
end
object cbxtcdepartment: TComboBox
Left = 84
Top = 103
Width = 113
Height = 21
ItemHeight = 13
TabOrder = 9
Text = 'cbxtcdepartment'
end
end
object Panel3: TPanel
Left = 0
Top = 57
Width = 828
Height = 383
Align = alClient
BorderStyle = bsSingle
TabOrder = 3
object DBGrid1: TDBGrid
Left = 1
Top = 1
Width = 822
Height = 377
Align = alClient
DataSource = DataSource1
FixedColor = clBtnHighlight
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnDrawColumnCell = DBGrid1DrawColumnCell
Columns = <
item
Expanded = False
FieldName = 'tno'
Title.Caption = #25945#24072#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'tname'
Title.Caption = #25945#24072#21517#31216
Width = 57
Visible = True
end
item
Expanded = False
FieldName = 'tpost'
Title.Caption = #32844#31216
Width = 68
Visible = True
end
item
Expanded = False
FieldName = 'tsex'
Title.Caption = #24615#21035
Width = 38
Visible = True
end
item
Expanded = False
FieldName = 'tage'
Title.Caption = #24180#40836
Width = 45
Visible = True
end
item
Expanded = False
FieldName = 'tbool'
Title.Caption = #26159#21542#22806#32856
Width = 61
Visible = True
end
item
Expanded = False
FieldName = 'ttel'
Title.Caption = #32852#31995#30005#35805
Visible = True
end
item
Expanded = False
FieldName = 'tadress'
Title.Caption = #32852#31995#22320#22336
Width = 81
Visible = True
end
item
Expanded = False
FieldName = 'tcdepartment'
Title.Caption = #25480#35838#37096#38376
Visible = True
end
item
Expanded = False
FieldName = 'tmemo'
Title.Caption = #22791#27880
Width = 317
Visible = True
end>
end
end
object ADOQuery1: TADOQuery
Connection = DM.ADOConnection1
AfterScroll = ADOQuery1AfterScroll
Parameters = <>
SQL.Strings = (
'select * from TTeacher')
Left = 288
Top = 169
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 224
Top = 209
end
object ADOQuery2: TADOQuery
Connection = DM.ADOConnection1
Parameters = <>
SQL.Strings = (
'select * from tdataparam')
Left = 432
Top = 264
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -