📄 unit2.dfm
字号:
object Form_dagl: TForm_dagl
Left = 381
Top = 210
Width = 633
Height = 441
Caption = #26723#26696#31649#29702
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = False
OnCreate = FormCreat
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 625
Height = 401
ActivePage = TabSheet1
TabOrder = 0
object TabSheet1: TTabSheet
Caption = #23398#29983#20449#24687#26597#35810
object Label40: TLabel
Left = 43
Top = 42
Width = 84
Height = 13
Caption = #9733#36873#25321#23383#27573#21517#65306
end
object Label51: TLabel
Left = 266
Top = 43
Width = 96
Height = 13
Caption = #9733#36755#20837#26597#35810#20869#23481#65306
end
object SelectedField: TComboBox
Left = 161
Top = 39
Width = 102
Height = 21
ItemHeight = 13
TabOrder = 0
Items.Strings = (
#23398#29983'ID'
'')
end
object DBGrid1: TDBGrid
Left = 24
Top = 80
Width = 561
Height = 281
DataSource = DataSource1
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #23398#29983'ID'
Visible = True
end
item
Expanded = False
FieldName = #22995#21517
Visible = True
end
item
Expanded = False
FieldName = #24180#40836
Width = 49
Visible = True
end
item
Expanded = False
FieldName = #24615#21035
Width = 38
Visible = True
end
item
Expanded = False
FieldName = #20986#29983#26085#26399
Visible = True
end
item
Expanded = False
FieldName = #31821#36143
Visible = True
end
item
Expanded = False
FieldName = #27665#26063
Visible = True
end
item
Expanded = False
FieldName = #29677#32423
Visible = True
end
item
Expanded = False
FieldName = #29238#20146
Visible = True
end
item
Expanded = False
FieldName = #27597#20146
Visible = True
end
item
Expanded = False
FieldName = #32852#31995#26041#24335
Visible = True
end
item
Expanded = False
FieldName = #20837#26657#26102#38388
Visible = True
end>
end
object Button2: TButton
Left = 520
Top = 40
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 2
OnClick = Button2Click
end
object selectcontent: TDBEdit
Left = 384
Top = 40
Width = 121
Height = 21
DataField = #23398#29983'ID'
DataSource = DataSource1
TabOrder = 3
end
end
object TabSheet2: TTabSheet
Caption = #23398#29983#20449#24687#24405#20837
ImageIndex = 1
object Panel11: TPanel
Left = 0
Top = 0
Width = 617
Height = 373
Align = alClient
BevelOuter = bvNone
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
object Label28: TLabel
Left = 68
Top = 140
Width = 39
Height = 13
Caption = #24180#40836#65306
end
object Label29: TLabel
Left = 36
Top = 192
Width = 86
Height = 13
Caption = #24615#21035'('#30007'/'#22899')'#65306
end
object Label31: TLabel
Left = 52
Top = 96
Width = 65
Height = 13
Caption = #23398#29983#22995#21517#65306
end
object Label34: TLabel
Left = 60
Top = 44
Width = 47
Height = 13
Caption = #23398#29983'ID:'
end
object Label38: TLabel
Left = 340
Top = 88
Width = 39
Height = 13
Caption = #29677#32423#65306
end
object Label39: TLabel
Left = 60
Top = 292
Width = 39
Height = 13
Caption = #31821#36143#65306
end
object Label2: TLabel
Left = 324
Top = 240
Width = 65
Height = 13
Caption = #32852#31995#26041#24335#65306
end
object Label6: TLabel
Left = 340
Top = 140
Width = 39
Height = 13
Caption = #29238#20146#65306
end
object Label7: TLabel
Left = 340
Top = 188
Width = 39
Height = 13
Caption = #27597#20146#65306
end
object Label8: TLabel
Left = 328
Top = 288
Width = 65
Height = 13
Caption = #20837#26657#26102#38388#65306
end
object Label9: TLabel
Left = 336
Top = 40
Width = 39
Height = 13
Caption = #27665#26063#65306
end
object Label1: TLabel
Left = 68
Top = 244
Width = 39
Height = 13
Caption = #29983#26085#65306
end
object sex: TEdit
Left = 156
Top = 190
Width = 100
Height = 21
TabOrder = 0
end
object classno: TEdit
Left = 412
Top = 86
Width = 100
Height = 21
TabOrder = 1
end
object Button1: TButton
Left = 152
Top = 336
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 2
OnClick = OnOk
end
object birthplace: TEdit
Left = 156
Top = 286
Width = 100
Height = 21
TabOrder = 3
end
object xsname: TEdit
Left = 156
Top = 90
Width = 100
Height = 21
TabOrder = 4
end
object father: TEdit
Left = 412
Top = 134
Width = 100
Height = 21
TabOrder = 5
end
object mother: TEdit
Left = 412
Top = 182
Width = 100
Height = 21
TabOrder = 6
end
object mingzu: TEdit
Left = 412
Top = 38
Width = 100
Height = 21
TabOrder = 7
end
object phone: TEdit
Left = 412
Top = 230
Width = 100
Height = 21
TabOrder = 8
end
object Button3: TButton
Left = 352
Top = 336
Width = 75
Height = 25
Caption = #21462#28040
TabOrder = 9
OnClick = Button3Click
end
object age: TDBEdit
Left = 152
Top = 136
Width = 100
Height = 21
DataField = #24180#40836
DataSource = DataSource1
TabOrder = 10
end
object birthday: TDateTimePicker
Left = 160
Top = 240
Width = 100
Height = 21
Date = 39409.504403368050000000
Time = 39409.504403368050000000
TabOrder = 11
end
object intime: TDateTimePicker
Left = 416
Top = 280
Width = 100
Height = 21
Date = 39409.504403368050000000
Time = 39409.504403368050000000
TabOrder = 12
end
object xsno: TDBEdit
Left = 152
Top = 40
Width = 100
Height = 21
DataField = #23398#29983'ID'
DataSource = DataSource1
TabOrder = 13
end
end
end
end
object MainMenu1: TMainMenu
Left = 8
Top = 328
end
object ADOQuery1: TADOQuery
Active = True
Connection = Form_xjgl.ADOConnection1
CursorType = ctStatic
Parameters = <>
Prepared = True
SQL.Strings = (
'SELECT * FROM STUDENT_DN')
Left = 304
Top = 32
object ADOQuery1ID: TIntegerField
FieldName = #23398#29983'ID'
end
object ADOQuery1DSDesigner: TWideStringField
FieldName = #22995#21517
Size = 10
end
object ADOQuery1DSDesigner2: TIntegerField
FieldName = #24180#40836
end
object ADOQuery1DSDesigner3: TWideStringField
FieldName = #24615#21035
Size = 2
end
object ADOQuery1DSDesigner4: TDateTimeField
FieldName = #20986#29983#26085#26399
end
object ADOQuery1DSDesigner5: TWideStringField
FieldName = #31821#36143
Size = 16
end
object ADOQuery1DSDesigner6: TWideStringField
FieldName = #27665#26063
Size = 10
end
object ADOQuery1DSDesigner7: TWideStringField
FieldName = #29677#32423
Size = 10
end
object ADOQuery1DSDesigner8: TStringField
FieldName = #29238#20146
FixedChar = True
Size = 10
end
object ADOQuery1DSDesigner9: TStringField
FieldName = #27597#20146
FixedChar = True
Size = 10
end
object ADOQuery1DSDesigner10: TWideStringField
FieldName = #32852#31995#26041#24335
Size = 15
end
object ADOQuery1DSDesigner11: TDateTimeField
FieldName = #20837#26657#26102#38388
end
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 8
Top = 32
end
object ADOQuery2: TADOQuery
Connection = Form_xjgl.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'')
Left = 256
Top = 32
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -