📄 unit5.dfm
字号:
Left = 810
Top = 38
Width = 121
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object ComboBox1: TComboBox
Left = 168
Top = 96
Width = 145
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 21
ParentFont = False
TabOrder = 4
Items.Strings = (
#27491#24335#22312#23703
#22312#23703#23454#20064
#22312#23703#35797#29992
#33073#20135#23398#20064
#30149#20241
#20241#38271#20551
#24453#23703#22521#35757
#31163#20241
#36864#20241
#20511#35843
#20854#23427)
end
object ComboBox2: TComboBox
Left = 464
Top = 96
Width = 145
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 21
ParentFont = False
TabOrder = 5
Items.Strings = (
#32844#24037
#32856#29992#21592#24037
#20020#26102#24037
#20854#23427)
end
object ComboBox3: TComboBox
Left = 736
Top = 96
Width = 145
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 21
ParentFont = False
TabOrder = 6
Items.Strings = (
#37096#38376#36127#36131#20154
#20027#31649
#32844#21592)
end
end
object MainMenu1: TMainMenu
Left = 152
Top = 136
object N1: TMenuItem
Caption = #28155#21152
OnClick = N1Click
end
object N2: TMenuItem
Caption = #30830#23450
OnClick = N2Click
end
object N3: TMenuItem
Caption = #21462#28040
OnClick = N3Click
end
object N4: TMenuItem
Caption = #21024#38500
OnClick = N4Click
end
object N5: TMenuItem
Caption = #20462#25913
OnClick = N5Click
end
object N6: TMenuItem
Caption = #26597#35810
OnClick = N6Click
end
object N8: TMenuItem
Caption = #21462#28040#26597#35810
OnClick = N8Click
end
object N7: TMenuItem
Caption = #36864#20986
OnClick = N7Click
end
end
object ADOTable1: TADOTable
Active = True
Connection = ADOConnection1
CursorType = ctStatic
TableName = #21592#24037#34920
Left = 200
Top = 104
object ADOTable1DSDesigner: TStringField
FieldName = #21592#24037#21495
FixedChar = True
Size = 5
end
object ADOTable1DSDesigner2: TStringField
FieldName = #22995#21517
FixedChar = True
end
object ADOTable1DSDesigner3: TStringField
FieldName = #37096#38376#21495
FixedChar = True
Size = 2
end
object ADOTable1StringField: TStringField
FieldKind = fkLookup
FieldName = #37096#38376#21517#31216
LookupDataSet = ADOTable2
LookupKeyFields = #37096#38376#21495
LookupResultField = #37096#38376#21517#31216
KeyFields = #37096#38376#21495
Lookup = True
end
object ADOTable1DSDesigner4: TStringField
FieldName = #24615#21035
FixedChar = True
Size = 2
end
object ADOTable1DSDesigner5: TStringField
FieldName = #22269#31821
FixedChar = True
end
object ADOTable1DSDesigner6: TStringField
FieldName = #20986#29983#26085#26399
FixedChar = True
Size = 10
end
object ADOTable1DSDesigner7: TStringField
FieldName = #20986#29983#22320
FixedChar = True
Size = 50
end
object ADOTable1DSDesigner8: TStringField
FieldName = #31821#36143
FixedChar = True
Size = 50
end
object ADOTable1DSDesigner9: TStringField
FieldName = #27665#26063
FixedChar = True
end
object ADOTable1DSDesigner10: TStringField
FieldName = #36523#20221#25110#25252#29031#21495
FixedChar = True
Size = 18
end
object ADOTable1DSDesigner11: TStringField
FieldName = #25919#27835#38754#35980
FixedChar = True
end
object ADOTable1DSDesigner12: TStringField
FieldName = #23130#23035#29366#20917
FixedChar = True
Size = 4
end
object ADOTable1DSDesigner13: TStringField
FieldName = #23478#24237#20303#22336
FixedChar = True
Size = 100
end
object ADOTable1DSDesigner14: TStringField
FieldName = #23478#24237#30005#35805
FixedChar = True
end
object ADOTable1DSDesigner15: TStringField
FieldName = #31227#21160#30005#35805
FixedChar = True
Size = 11
end
object ADOTable1DSDesigner16: TStringField
FieldName = #21150#20844#30005#35805
FixedChar = True
end
object ADOTable1DSDesigner17: TStringField
FieldName = #26368#39640#23398#21382
FixedChar = True
end
object ADOTable1DSDesigner18: TStringField
FieldName = #27605#19994#23398#26657
FixedChar = True
Size = 100
end
object ADOTable1DSDesigner19: TStringField
FieldName = #24037#20316#29366#24577
FixedChar = True
end
object ADOTable1DSDesigner20: TStringField
FieldName = #32844#20301
FixedChar = True
Size = 10
end
object ADOTable1DSDesigner21: TStringField
FieldName = #29992#24037#24418#24335
FixedChar = True
end
object ADOTable1DSDesigner22: TStringField
FieldName = #29992#24037#26399#38480
FixedChar = True
Size = 10
end
object ADOTable1DSDesigner23: TStringField
FieldName = #21152#20837#26102#38388
FixedChar = True
Size = 10
end
object ADOTable1DSDesigner24: TStringField
FieldName = #36716#27491#26102#38388
FixedChar = True
Size = 10
end
object ADOTable1DSDesigner26: TStringField
FieldName = #26032#36827#20154#21592#26631#24535
FixedChar = True
Size = 2
end
end
object ADOTable2: TADOTable
Active = True
Connection = ADOConnection1
CursorType = ctStatic
IndexFieldNames = #37096#38376#21495
MasterFields = #37096#38376#21495
MasterSource = DataSource1
TableName = #21333#20301
Left = 216
Top = 192
object ADOTable2DSDesigner: TStringField
FieldName = #37096#38376#21495
FixedChar = True
Size = 2
end
object ADOTable2DSDesigner2: TStringField
FieldName = #37096#38376#21517#31216
FixedChar = True
end
object ADOTable2DSDesigner3: TStringField
FieldName = #37096#38376#36127#36131#20154
FixedChar = True
Size = 5
end
object ADOTable2DSDesigner4: TStringField
FieldName = #37096#38376#30005#35805
FixedChar = True
end
object ADOTable2DSDesigner5: TStringField
FieldName = #37096#38376#20171#32461
FixedChar = True
Size = 100
end
object ADOTable2DSDesigner6: TIntegerField
FieldName = #24212#26377#20027#31649#20154#25968
end
object ADOTable2DSDesigner7: TIntegerField
FieldName = #29616#26377#20027#31649#20154#25968
end
object ADOTable2DSDesigner8: TIntegerField
FieldName = #24212#26377#32844#21592#25968
end
object ADOTable2DSDesigner9: TIntegerField
FieldName = #29616#26377#32844#21592#25968
end
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=it'
LoginPrompt = False
Provider = 'SQLOLEDB.1'
Left = 240
Top = 120
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 272
Top = 136
end
object DataSource2: TDataSource
DataSet = ADOTable1
Left = 288
Top = 208
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -