📄 unit11.dfm
字号:
object Form11: TForm11
Left = 265
Top = 126
Width = 870
Height = 480
Caption = #22870#24809#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
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 857
Height = 425
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 = #22870#24809#32534#21495
Visible = True
end
item
Expanded = False
FieldName = #21592#24037#21495
Visible = True
end
item
Expanded = False
FieldName = #22995#21517
Visible = True
end
item
Expanded = False
FieldName = #22870#24809#31867#22411
Visible = True
end
item
Expanded = False
FieldName = #22870#24809#21517#31216
Visible = True
end
item
Expanded = False
FieldName = #22870#24809#32423#21035
Visible = True
end
item
Expanded = False
FieldName = #39041#24067#26085#26399
Visible = True
end
item
Expanded = False
FieldName = #22870#24809#24615#36136
Visible = True
end
item
Expanded = False
FieldName = #22870#24809#21407#22240
Visible = True
end
item
Expanded = False
FieldName = #26159#21542#21462#28040
Visible = True
end>
end
object DBEdit1: TDBEdit
Left = 168
Top = 320
Width = 121
Height = 21
DataField = #21592#24037#21495
DataSource = DataSource1
TabOrder = 1
Visible = False
end
object DBEdit2: TDBEdit
Left = 368
Top = 328
Width = 121
Height = 21
DataField = #32489#25928#25104#32489
DataSource = DataSource2
TabOrder = 2
Visible = False
end
object DBEdit3: TDBEdit
Left = 344
Top = 216
Width = 121
Height = 21
DataField = #22870#24809#31867#22411
DataSource = DataSource1
TabOrder = 3
Visible = False
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 = 16
Top = 64
end
object ADOTable1: TADOTable
Active = True
Connection = ADOConnection1
CursorType = ctStatic
IndexFieldNames = #21592#24037#21495
TableName = #22870#24809
Left = 80
Top = 104
object ADOTable1DSDesigner: TIntegerField
FieldName = #22870#24809#32534#21495
end
object ADOTable1DSDesigner2: TStringField
FieldName = #21592#24037#21495
FixedChar = True
Size = 5
end
object ADOTable1DSDesigner3: TStringField
FieldName = #22870#24809#31867#22411
FixedChar = True
Size = 50
end
object ADOTable1DSDesigner4: TStringField
FieldName = #22870#24809#21517#31216
FixedChar = True
Size = 100
end
object ADOTable1DSDesigner5: TStringField
FieldName = #22870#24809#32423#21035
FixedChar = True
end
object ADOTable1DSDesigner6: TStringField
FieldName = #39041#24067#26085#26399
FixedChar = True
Size = 10
end
object ADOTable1DSDesigner7: TStringField
FieldName = #22870#24809#24615#36136
FixedChar = True
end
object ADOTable1DSDesigner8: TStringField
FieldName = #22870#24809#21407#22240
FixedChar = True
Size = 200
end
object ADOTable1DSDesigner9: TStringField
FieldName = #26159#21542#21462#28040
FixedChar = True
Size = 2
end
object ADOTable1Field: TStringField
FieldKind = fkLookup
FieldName = #22995#21517
LookupDataSet = ADOTable3
LookupKeyFields = #21592#24037#21495
LookupResultField = #22995#21517
KeyFields = #21592#24037#21495
Lookup = True
end
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 152
Top = 136
end
object MainMenu1: TMainMenu
Left = 32
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 N7: TMenuItem
Caption = #36864#20986
OnClick = N7Click
end
end
object ADOTable3: TADOTable
Active = True
Connection = ADOConnection1
CursorType = ctStatic
TableName = #21592#24037#34920
Left = 64
Top = 208
object StringField1: TStringField
FieldName = #21592#24037#21495
FixedChar = True
Size = 5
end
object StringField2: TStringField
FieldName = #22995#21517
FixedChar = True
end
object StringField3: TStringField
FieldName = #37096#38376#21495
FixedChar = True
Size = 2
end
object StringField4: TStringField
FieldName = #24615#21035
FixedChar = True
Size = 2
end
object StringField5: TStringField
FieldName = #22269#31821
FixedChar = True
end
object StringField6: TStringField
FieldName = #20986#29983#26085#26399
FixedChar = True
Size = 10
end
object StringField7: TStringField
FieldName = #20986#29983#22320
FixedChar = True
Size = 50
end
object StringField8: TStringField
FieldName = #31821#36143
FixedChar = True
Size = 50
end
object ADOTable2DSDesigner9: TStringField
FieldName = #27665#26063
FixedChar = True
end
object ADOTable2DSDesigner10: TStringField
FieldName = #36523#20221#25110#25252#29031#21495
FixedChar = True
Size = 18
end
object ADOTable2DSDesigner11: TStringField
FieldName = #25919#27835#38754#35980
FixedChar = True
end
object ADOTable2DSDesigner12: TStringField
FieldName = #23130#23035#29366#20917
FixedChar = True
Size = 4
end
object ADOTable2DSDesigner13: TStringField
FieldName = #23478#24237#20303#22336
FixedChar = True
Size = 100
end
object ADOTable2DSDesigner14: TStringField
FieldName = #23478#24237#30005#35805
FixedChar = True
end
object ADOTable2DSDesigner15: TStringField
FieldName = #31227#21160#30005#35805
FixedChar = True
Size = 11
end
object ADOTable2DSDesigner16: TStringField
FieldName = #21150#20844#30005#35805
FixedChar = True
end
object ADOTable2DSDesigner17: TStringField
FieldName = #26368#39640#23398#21382
FixedChar = True
end
object ADOTable2DSDesigner18: TStringField
FieldName = #27605#19994#23398#26657
FixedChar = True
Size = 100
end
object ADOTable2DSDesigner19: TStringField
FieldName = #24037#20316#29366#24577
FixedChar = True
end
object ADOTable2DSDesigner20: TStringField
FieldName = #32844#20301
FixedChar = True
Size = 10
end
object ADOTable2DSDesigner21: TStringField
FieldName = #29992#24037#24418#24335
FixedChar = True
end
object ADOTable2DSDesigner22: TStringField
FieldName = #29992#24037#26399#38480
FixedChar = True
Size = 10
end
object ADOTable2DSDesigner23: TStringField
FieldName = #21152#20837#26102#38388
FixedChar = True
Size = 10
end
object ADOTable2DSDesigner24: TStringField
FieldName = #36716#27491#26102#38388
FixedChar = True
Size = 10
end
object ADOTable2DSDesigner25: TStringField
FieldName = #26032#36827#20154#21592#26631#24535
FixedChar = True
Size = 2
end
end
object ADOTable2: TADOTable
Connection = ADOConnection1
CursorType = ctStatic
TableName = #32489#25928
Left = 96
Top = 192
object ADOTable2DSDesigner: TStringField
FieldName = #21592#24037#21495
FixedChar = True
Size = 5
end
object ADOTable2DSDesigner2: TStringField
FieldName = #24179#26102#34920#29616
FixedChar = True
Size = 10
end
object ADOTable2DSDesigner3: TIntegerField
FieldName = #32489#25928#25104#32489
end
object ADOTable2DSDesigner4: TIntegerField
FieldName = #36831#21040
end
object ADOTable2DSDesigner5: TIntegerField
FieldName = #26089#36864
end
object ADOTable2DSDesigner6: TIntegerField
FieldName = #30149#20551
end
object ADOTable2DSDesigner7: TIntegerField
FieldName = #20107#20551
end
object ADOTable2DSDesigner8: TIntegerField
FieldName = #26103#24037
end
end
object DataSource3: TDataSource
DataSet = ADOTable1
Left = 104
Top = 224
end
object DataSource2: TDataSource
AutoEdit = False
DataSet = ADOTable2
Left = 168
Top = 208
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -