📄 jibenxinxichaxun.dfm
字号:
TabOrder = 0
end
object DBComboBoxSex: TDBComboBox
Left = 136
Top = 8
Width = 57
Height = 21
DataField = 'Sex'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
#30007
#22899)
ParentFont = False
TabOrder = 1
end
object DBComboBoxEdu: TDBComboBox
Left = 136
Top = 104
Width = 89
Height = 21
DataField = 'Edu'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
#23567#23398
#21021#20013
#20013#19987
#39640#20013
#22823#19987
#26412#31185
#30740#31350#29983
#21338#22763)
ParentFont = False
TabOrder = 2
end
object DBEditNative: TDBEdit
Left = 136
Top = 40
Width = 65
Height = 21
DataField = 'Native'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
object DBEditBirthday: TDBEdit
Left = 136
Top = 72
Width = 81
Height = 21
DataField = 'Birthday'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
end
object DBEditSpeciality: TDBEdit
Left = 136
Top = 136
Width = 97
Height = 21
DataField = 'Speciality'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
end
object DBEditBeginDate: TDBEdit
Left = 136
Top = 168
Width = 97
Height = 21
DataField = 'BeginDate'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
end
object DBEditStartDate: TDBEdit
Left = 136
Top = 200
Width = 97
Height = 21
DataField = 'StartDate'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
end
object DBEditEnter: TDBEdit
Left = 136
Top = 232
Width = 97
Height = 21
DataField = 'EnterDate'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
end
object DBEditClanDate: TDBEdit
Left = 360
Top = 72
Width = 121
Height = 21
DataField = 'ClanDate'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 9
end
object DBMemoRemark: TDBMemo
Left = 304
Top = 168
Width = 185
Height = 89
DataField = 'Remark'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 10
end
object DBNavigator1: TDBNavigator
Left = 144
Top = 280
Width = 240
Height = 25
DataSource = DataSource1
TabOrder = 11
end
object DBEditIntoDate: TDBEdit
Left = 360
Top = 104
Width = 121
Height = 21
DataField = 'IntoDate'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 12
end
object BitBtn1: TBitBtn
Left = 8
Top = 280
Width = 113
Height = 25
Caption = #21592#24037#20449#24687#26597#35810
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #38582#20070
Font.Style = []
ParentFont = False
TabOrder = 13
OnClick = BitBtn1Click
end
object BitBtn2: TBitBtn
Left = 416
Top = 280
Width = 75
Height = 25
Caption = #20851#38381#31383#21475
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #38582#20070
Font.Style = []
ParentFont = False
TabOrder = 14
OnClick = BitBtn2Click
end
object DBComboBoxNo: TDBComboBox
Left = 360
Top = 136
Width = 121
Height = 21
DataField = 'No'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 15
end
object DBComboBoxPosition: TDBComboBox
Left = 360
Top = 8
Width = 121
Height = 21
DataField = 'Position'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 16
end
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 32
Top = 8
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=perso' +
'n.mdb;Mode=Share Deny None;Extended Properties="";Persist Securi' +
'ty Info=False;Jet OLEDB:System database="";Jet OLEDB:Registry Pa' +
'th="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet' +
' OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops' +
'=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database P' +
'assword="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encr' +
'ypt Database=False;Jet OLEDB:Don'#39't Copy Locale on Compact=False;' +
'Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=Fal' +
'se'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 80
Top = 8
end
object ADOTable1: TADOTable
Active = True
Connection = ADOConnection1
CursorType = ctStatic
TableName = 'person'
Left = 128
Top = 8
object ADOTable1ID: TWideStringField
DisplayLabel = #21592#24037#32534#21495
DisplayWidth = 10
FieldName = 'ID'
Size = 50
end
object ADOTable1Name: TWideStringField
DisplayLabel = #21592#24037#22995#21517
DisplayWidth = 11
FieldName = 'Name'
Size = 50
end
object ADOTable1Sex: TWideStringField
DisplayLabel = #24615#21035
DisplayWidth = 5
FieldName = 'Sex'
Size = 50
end
object ADOTable1Birthday: TDateTimeField
DisplayLabel = #20986#29983#26085#26399
DisplayWidth = 12
FieldName = 'Birthday'
end
object ADOTable1Department: TWideStringField
DisplayLabel = #25152#22312#37096#38376
DisplayWidth = 10
FieldName = 'Department'
Size = 50
end
object ADOTable1Native: TWideStringField
DisplayLabel = #31821#36143
DisplayWidth = 6
FieldName = 'Native'
Size = 50
end
object ADOTable1Edu: TWideStringField
DisplayLabel = #23398#21382
DisplayWidth = 6
FieldName = 'Edu'
Size = 50
end
object ADOTable1Speciality: TWideStringField
DisplayLabel = #19987#19994
DisplayWidth = 6
FieldName = 'Speciality'
Size = 50
end
object ADOTable1StartDate: TDateTimeField
DisplayLabel = #21442#21152#24037#20316#26102#38388
DisplayWidth = 15
FieldName = 'StartDate'
end
object ADOTable1EnterDate: TDateTimeField
DisplayLabel = #36827#20837#20844#21496#26102#38388
DisplayWidth = 15
FieldName = 'EnterDate'
end
object ADOTable1Former: TWideStringField
DisplayLabel = #21407#24037#20316#21333#20301
DisplayWidth = 13
FieldName = 'Former'
Size = 50
end
object ADOTable1BeginDate: TDateTimeField
DisplayLabel = #36215#34218#26102#38388
DisplayWidth = 10
FieldName = 'BeginDate'
end
object ADOTable1IntoDate: TDateTimeField
DisplayLabel = #35843#20837#37096#38376#26102#38388
DisplayWidth = 15
FieldName = 'IntoDate'
end
object ADOTable1Position: TWideStringField
DisplayLabel = #32844#31216
DisplayWidth = 6
FieldName = 'Position'
Size = 50
end
object ADOTable1ClanDate: TDateTimeField
DisplayLabel = #20837#20826#26102#38388
DisplayWidth = 10
FieldName = 'ClanDate'
end
object ADOTable1No: TWideStringField
DisplayLabel = #26723#21495
DisplayWidth = 5
FieldName = 'No'
Size = 50
end
object ADOTable1Remark: TWideStringField
DisplayLabel = #22791#27880
DisplayWidth = 120
FieldName = 'Remark'
Size = 100
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -