📄 unit3.dfm
字号:
Top = 40
Width = 113
Height = 21
DataField = #21333#20803
DataSource = DataSource4
TabOrder = 6
end
object DBEdit13: TDBEdit
Left = 64
Top = 72
Width = 121
Height = 21
DataField = #21333#20803
DataSource = DataSource4
TabOrder = 7
end
object DBEdit14: TDBEdit
Left = 248
Top = 80
Width = 145
Height = 21
DataField = #22791#27880
DataSource = DataSource4
TabOrder = 8
end
object Button11: TButton
Left = 248
Top = 352
Width = 75
Height = 25
Action = DataSetPost4
Caption = #20445#23384
TabOrder = 9
end
object Button12: TButton
Left = 424
Top = 352
Width = 75
Height = 25
Action = DataSetDelete4
Caption = #21024#38500
TabOrder = 10
end
object Button10: TButton
Left = 96
Top = 352
Width = 75
Height = 25
Action = DataSetInsert4
Caption = #28155#21152
TabOrder = 11
end
end
object TabSheet5: TTabSheet
Caption = #27004#25151#31649#29702
ImageIndex = 4
object Label16: TLabel
Left = 8
Top = 24
Width = 36
Height = 13
Caption = #38376#29260#21495
end
object Label17: TLabel
Left = 160
Top = 24
Width = 24
Height = 13
Caption = #27004#23431
end
object Label18: TLabel
Left = 336
Top = 24
Width = 24
Height = 13
Caption = #21333#20803
end
object Label19: TLabel
Left = 8
Top = 56
Width = 24
Height = 13
Caption = #27004#23618
end
object Label20: TLabel
Left = 160
Top = 56
Width = 24
Height = 13
Caption = #25143#22411
end
object Label21: TLabel
Left = 336
Top = 56
Width = 24
Height = 13
Caption = #38754#31215
end
object Label22: TLabel
Left = 8
Top = 88
Width = 24
Height = 13
Caption = #29366#24577
end
object Button13: TButton
Left = 232
Top = 352
Width = 75
Height = 25
Action = DataSetPost5
Caption = #20445#23384
TabOrder = 0
end
object Button14: TButton
Left = 392
Top = 352
Width = 75
Height = 25
Action = DataSetDelete5
Caption = #21024#38500
TabOrder = 1
end
object Button15: TButton
Left = 72
Top = 352
Width = 75
Height = 25
Action = DataSetInsert5
Caption = #28155#21152
TabOrder = 2
end
object DBGrid5: TDBGrid
Left = 0
Top = 112
Width = 601
Height = 177
DataSource = DataSource5
TabOrder = 3
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'ID'
Visible = True
end
item
Expanded = False
FieldName = #38376#29260#21495
Width = 53
Visible = True
end
item
Expanded = False
FieldName = #27004#23431
Width = 42
Visible = True
end
item
Expanded = False
FieldName = #21333#20803
Width = 39
Visible = True
end
item
Expanded = False
FieldName = #27004#23618
Width = 38
Visible = True
end
item
Expanded = False
FieldName = #25143#22411
Width = 67
Visible = True
end
item
Expanded = False
FieldName = #38754#31215
Width = 63
Visible = True
end
item
Expanded = False
FieldName = #29366#24577
Width = 209
Visible = True
end>
end
object DBEdit15: TDBEdit
Left = 56
Top = 16
Width = 81
Height = 21
DataField = #38376#29260#21495
DataSource = DataSource5
TabOrder = 4
end
object DBEdit16: TDBEdit
Left = 200
Top = 16
Width = 89
Height = 21
DataField = #27004#23431
DataSource = DataSource5
TabOrder = 5
end
object DBEdit17: TDBEdit
Left = 376
Top = 16
Width = 97
Height = 21
DataField = #21333#20803
DataSource = DataSource5
TabOrder = 6
end
object DBEdit18: TDBEdit
Left = 56
Top = 48
Width = 81
Height = 21
DataField = #27004#23618
DataSource = DataSource5
TabOrder = 7
end
object DBEdit19: TDBEdit
Left = 200
Top = 48
Width = 89
Height = 21
DataField = #25143#22411
DataSource = DataSource5
TabOrder = 8
end
object DBEdit20: TDBEdit
Left = 376
Top = 48
Width = 97
Height = 21
DataField = #38754#31215
DataSource = DataSource5
TabOrder = 9
end
object DBEdit21: TDBEdit
Left = 56
Top = 80
Width = 121
Height = 21
DataField = #29366#24577
DataSource = DataSource5
TabOrder = 10
end
end
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 564
Top = 32
end
object ADOQuery1: TADOQuery
Active = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Software\002\002' +
'.mdb;Persist Security Info=False'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#25143#22411)
Left = 516
Top = 32
end
object ActionList1: TActionList
Left = 548
Top = 72
object Action1: TAction
Caption = 'Action1'
end
object DataSetInsert1: TDataSetInsert
Category = 'Dataset'
Caption = 'DataSetInsert1'
end
object DataSetDelete1: TDataSetDelete
Category = 'Dataset'
Caption = 'DataSetDelete1'
end
object DataSetEdit1: TDataSetEdit
Category = 'Dataset'
Caption = 'DataSetEdit1'
end
object DataSetPost1: TDataSetPost
Category = 'Dataset'
Caption = 'DataSetPost1'
end
object DataSetCancel1: TDataSetCancel
Category = 'Dataset'
Caption = 'DataSetCancel1'
end
end
object ADOQuery2: TADOQuery
Active = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Software\002\002' +
'.mdb;Persist Security Info=False'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#32467#26500)
Left = 4
Top = 320
end
object DataSource2: TDataSource
DataSet = ADOQuery2
Left = 36
Top = 320
end
object ActionList2: TActionList
Left = 68
Top = 320
object Action2: TAction
Caption = 'Action2'
end
object Action3: TAction
Caption = 'Action3'
end
object DataSetInsert2: TDataSetInsert
Category = 'Dataset'
Caption = 'DataSetInsert2'
end
object DataSetDelete2: TDataSetDelete
Category = 'Dataset'
Caption = 'DataSetDelete2'
end
object DataSetEdit2: TDataSetEdit
Category = 'Dataset'
Caption = 'DataSetEdit2'
end
object DataSetPost2: TDataSetPost
Category = 'Dataset'
Caption = 'DataSetPost2'
end
object DataSetCancel2: TDataSetCancel
Category = 'Dataset'
Caption = 'DataSetCancel2'
end
end
object DataSource3: TDataSource
DataSet = ADOQuery3
Left = 36
Top = 352
end
object ActionList3: TActionList
Left = 68
Top = 352
object Action4: TAction
Caption = 'Action4'
end
object DataSetInsert3: TDataSetInsert
Category = 'Dataset'
Caption = 'DataSetInsert3'
end
object DataSetDelete3: TDataSetDelete
Category = 'Dataset'
Caption = 'DataSetDelete3'
end
object DataSetEdit3: TDataSetEdit
Category = 'Dataset'
Caption = 'DataSetEdit3'
end
object DataSetPost3: TDataSetPost
Category = 'Dataset'
Caption = 'DataSetPost3'
end
object DataSetCancel3: TDataSetCancel
Category = 'Dataset'
Caption = 'DataSetCancel3'
end
end
object ADOQuery3: TADOQuery
Active = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Software\002\002' +
'.mdb;Persist Security Info=False'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#25903#20184#26041#24335)
Left = 4
Top = 352
end
object ADOQuery4: TADOQuery
Active = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Software\002\002' +
'.mdb;Persist Security Info=False'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#27004#23431#31649#29702)
Left = 172
Top = 320
end
object DataSource4: TDataSource
DataSet = ADOQuery4
Left = 212
Top = 320
end
object ActionList4: TActionList
Left = 252
Top = 320
object Action5: TAction
Caption = 'Action5'
end
object DataSetInsert4: TDataSetInsert
Category = 'Dataset'
Caption = 'DataSetInsert4'
end
object DataSetDelete4: TDataSetDelete
Category = 'Dataset'
Caption = 'DataSetDelete4'
end
object DataSetEdit4: TDataSetEdit
Category = 'Dataset'
Caption = 'DataSetEdit4'
end
object DataSetPost4: TDataSetPost
Category = 'Dataset'
Caption = 'DataSetPost4'
end
object DataSetCancel4: TDataSetCancel
Category = 'Dataset'
Caption = 'DataSetCancel4'
end
end
object ADOQuery5: TADOQuery
Active = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Software\002\002' +
'.mdb;Persist Security Info=False'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#27004#25151#31649#29702)
Left = 372
Top = 320
end
object DataSource5: TDataSource
DataSet = ADOQuery5
Left = 420
Top = 320
end
object ActionList5: TActionList
Left = 468
Top = 320
object Action6: TAction
Caption = 'Action6'
end
object DataSetInsert5: TDataSetInsert
Category = 'Dataset'
Caption = 'DataSetInsert5'
end
object DataSetDelete5: TDataSetDelete
Category = 'Dataset'
Caption = 'DataSetDelete5'
end
object DataSetEdit5: TDataSetEdit
Category = 'Dataset'
Caption = 'DataSetEdit5'
end
object DataSetPost5: TDataSetPost
Category = 'Dataset'
Caption = 'DataSetPost5'
end
object DataSetCancel5: TDataSetCancel
Category = 'Dataset'
Caption = 'DataSetCancel5'
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -