📄 unit4.dfm
字号:
object Form4: TForm4
Left = 219
Top = 200
Width = 702
Height = 412
Caption = 'Form4'
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 Label1: TLabel
Left = 432
Top = 8
Width = 100
Height = 19
Caption = #19994#21153#21592#20449#24687
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object DBGrid1: TDBGrid
Left = 8
Top = 32
Width = 673
Height = 345
Color = clScrollBar
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 = #32534#21495
Width = 48
Visible = True
end
item
Expanded = False
FieldName = #22995#21517
Width = 51
Visible = True
end
item
Expanded = False
FieldName = #24180#40836
Width = 47
Visible = True
end
item
Expanded = False
FieldName = #37096#38376
Width = 58
Visible = True
end
item
Expanded = False
FieldName = #32844#32423
Width = 52
Visible = True
end
item
Expanded = False
FieldName = #23130#23035#29366#20917
Width = 57
Visible = True
end
item
Expanded = False
FieldName = #25991#21270#31243#24230
Width = 55
Visible = True
end
item
Expanded = False
FieldName = #24037#20316#24180#25968
Width = 46
Visible = True
end
item
Expanded = False
FieldName = #32852#31995#30005#35805
Width = 44
Visible = True
end
item
Expanded = False
FieldName = #20010#20154#31616#21382
Visible = True
end
item
Expanded = False
FieldName = #23478#24237#20303#22336
Visible = True
end
item
Expanded = False
FieldName = #36523#20221#35777#21495#30721
Visible = True
end>
end
object DBNavigator1: TDBNavigator
Left = 16
Top = 0
Width = 320
Height = 25
DataSource = DataSource1
TabOrder = 1
end
object ADOQuery1: TADOQuery
Active = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=wl.mdb;Mode=Read|Wr' +
'ite|Share Deny None;Persist Security Info=False'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'SELECT *'
'FROM ywy')
Left = 104
Top = 336
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 64
Top = 336
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -