📄 cha2.dfm
字号:
object Form8: TForm8
Left = 197
Top = 125
BorderStyle = bsDialog
Caption = #23398#29983#36873#35838#20449#24687#26597#35810
ClientHeight = 348
ClientWidth = 536
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 148
Top = 8
Width = 48
Height = 13
Caption = #23398#31821#21495#65306
end
object Label2: TLabel
Left = 332
Top = 8
Width = 36
Height = 13
Caption = #22995#21517#65306
end
object DBText1: TDBText
Left = 380
Top = 8
Width = 97
Height = 17
DataField = #22995#21517
DataSource = DataSource2
end
object PageControl1: TPageControl
Left = 44
Top = 36
Width = 457
Height = 285
ActivePage = TabSheet2
TabOrder = 0
object TabSheet1: TTabSheet
Caption = #24517#20462#35838
object Label3: TLabel
Left = 84
Top = 28
Width = 36
Height = 13
Caption = #39640#25968#65306
end
object Label4: TLabel
Left = 84
Top = 72
Width = 36
Height = 13
Caption = #33521#35821#65306
end
object Label5: TLabel
Left = 84
Top = 116
Width = 36
Height = 13
Caption = #25919#27835#65306
end
object DBEdit1: TDBEdit
Left = 192
Top = 24
Width = 101
Height = 21
DataField = #25104#32489'1'
DataSource = DataSource2
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 192
Top = 68
Width = 101
Height = 21
DataField = #25104#32489'2'
DataSource = DataSource2
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 192
Top = 116
Width = 101
Height = 21
DataField = #25104#32489'3'
DataSource = DataSource2
TabOrder = 2
end
end
object TabSheet2: TTabSheet
Caption = #36873#20462#35838
ImageIndex = 1
object Label6: TLabel
Left = 117
Top = 20
Width = 48
Height = 13
Caption = #35838#31243#21517#65306
end
object Label7: TLabel
Left = 125
Top = 96
Width = 36
Height = 13
Caption = #25104#32489#65306
end
object DBEdit4: TDBEdit
Left = 200
Top = 92
Width = 101
Height = 21
DataField = #25104#32489
DataSource = DataSource3
TabOrder = 0
end
object Button3: TButton
Left = 336
Top = 192
Width = 75
Height = 25
Caption = #26597#25214
TabOrder = 1
OnClick = Button3Click
end
object ComboBox1: TComboBox
Left = 200
Top = 16
Width = 105
Height = 21
ItemHeight = 13
TabOrder = 2
Text = 'ComboBox1'
Items.Strings = (
#32654#26415
#38899#20048
#27494#26415
#20070#27861
#33310#36424
#20307#32946
#25668#24433)
end
end
end
object DBLookupComboBox1: TDBLookupComboBox
Left = 204
Top = 4
Width = 101
Height = 21
KeyField = #23398#31821#21495
ListField = #23398#31821#21495
ListSource = DataSource1
TabOrder = 1
OnClick = DBLookupComboBox1Click
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#23398#29983'.mdb;Persist Secu' +
'rity Info=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 12
Top = 4
end
object ADOTable1: TADOTable
Connection = ADOConnection1
CursorType = ctStatic
TableName = #23398#31821
Left = 12
Top = 40
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 12
Top = 72
end
object ADOTable2: TADOTable
Connection = ADOConnection1
CursorType = ctStatic
IndexFieldNames = #23398#31821#21495
MasterFields = #23398#31821#21495
MasterSource = DataSource1
TableName = #23398#31821
Left = 12
Top = 116
end
object DataSource2: TDataSource
DataSet = ADOTable2
Left = 12
Top = 160
end
object DataSource3: TDataSource
DataSet = ADOTable3
Left = 12
Top = 252
end
object ADOTable3: TADOTable
Connection = ADOConnection1
CursorType = ctStatic
IndexFieldNames = #23398#31821#21495
MasterFields = #23398#31821#21495
MasterSource = DataSource1
TableName = #36873#35838
Left = 12
Top = 208
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -