📄 unit11.~dfm
字号:
object Form11: TForm11
Left = 161
Top = 118
Width = 866
Height = 356
Caption = #20462#25913#33322#29677#20449#24687
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 337
Height = 324
Align = alLeft
Caption = #20462#25913#33322#29677#20449#24687
TabOrder = 0
object Label1: TLabel
Left = 68
Top = 40
Width = 36
Height = 13
Caption = #33322#27425#65306
end
object Label2: TLabel
Left = 44
Top = 74
Width = 60
Height = 13
Caption = #36215#39134#26102#38388#65306
end
object Label3: TLabel
Left = 44
Top = 108
Width = 60
Height = 13
Caption = #21040#36798#26102#38388#65306
end
object Label4: TLabel
Left = 56
Top = 143
Width = 48
Height = 13
Caption = #20986#21457#22320#65306
end
object Label5: TLabel
Left = 56
Top = 177
Width = 48
Height = 13
Caption = #21040#36798#22320#65306
end
object Label6: TLabel
Left = 68
Top = 211
Width = 36
Height = 13
Caption = #20215#26684#65306
end
object DBText1: TDBText
Left = 104
Top = 38
Width = 193
Height = 17
DataField = #33322#27425
DataSource = DataSource1
end
object Label7: TLabel
Left = 44
Top = 246
Width = 60
Height = 13
Caption = #38480#20056#20154#25968#65306
end
object Button2: TButton
Left = 248
Top = 280
Width = 65
Height = 25
Caption = #21462#28040
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 104
Top = 104
Width = 193
Height = 21
DataField = #21040#36798#26102#38388
DataSource = DataSource1
TabOrder = 1
end
object DBEdit4: TDBEdit
Left = 104
Top = 173
Width = 193
Height = 21
DataField = #21040#36798#22320
DataSource = DataSource1
TabOrder = 2
end
object Button4: TButton
Left = 24
Top = 280
Width = 65
Height = 25
Action = DataSetPrior1
Caption = #19978#19968#26465
TabOrder = 3
end
object Button5: TButton
Left = 136
Top = 280
Width = 65
Height = 25
Action = DataSetNext1
Caption = #19979#19968#26465
TabOrder = 4
end
object DBEdit1: TDBEdit
Left = 104
Top = 70
Width = 193
Height = 21
DataField = #36215#39134#26102#38388
DataSource = DataSource1
TabOrder = 5
end
object DBEdit5: TDBEdit
Left = 104
Top = 207
Width = 193
Height = 21
DataField = #20215#26684
DataSource = DataSource1
TabOrder = 6
end
object DBEdit6: TDBEdit
Left = 104
Top = 242
Width = 193
Height = 21
DataField = #38480#20056#20154#25968
DataSource = DataSource1
TabOrder = 7
end
object DBEdit3: TDBEdit
Left = 104
Top = 139
Width = 193
Height = 21
DataField = #20986#21457#22320
DataSource = DataSource1
TabOrder = 8
end
end
object DBGrid1: TDBGrid
Left = 337
Top = 0
Width = 520
Height = 324
Align = alLeft
DataSource = DataSource1
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #33322#27425
Width = 60
Visible = True
end
item
Expanded = False
FieldName = #36215#39134#26102#38388
Width = 120
Visible = True
end
item
Expanded = False
FieldName = #21040#36798#26102#38388
Width = 60
Visible = True
end
item
Expanded = False
FieldName = #20986#21457#22320
Width = 50
Visible = True
end
item
Expanded = False
FieldName = #21040#36798#22320
Width = 80
Visible = True
end
item
Expanded = False
FieldName = #20215#26684
Width = 50
Visible = True
end
item
Expanded = False
FieldName = #38480#20056#20154#25968
Width = 60
Visible = True
end>
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=lygl.mdb;Persist Se' +
'curity Info=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 488
Top = 160
end
object ADOQuery1: TADOQuery
Active = True
Connection = ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#33322#29677#20449#24687#34920)
Left = 416
Top = 168
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 440
Top = 112
end
object ActionList1: TActionList
Left = 568
Top = 208
object DataSetPrior1: TDataSetPrior
Category = 'Dataset'
Caption = 'DataSetPrior1'
end
object DataSetNext1: TDataSetNext
Category = 'Dataset'
Caption = 'DataSetNext1'
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -