📄 nj.~dfm
字号:
object frXi: TfrXi
Left = 273
Top = 136
Width = 293
Height = 384
Caption = #28155#21152#31995#20449#24687
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 8
Top = 16
Width = 265
Height = 281
Caption = ' *'#22522#30784#20449#24687'* '
Color = clBtnFace
ParentColor = False
TabOrder = 0
object Label2: TLabel
Left = 16
Top = 25
Width = 24
Height = 13
Caption = #31995#65306
end
object Label1: TLabel
Left = 16
Top = 182
Width = 36
Height = 13
Caption = #32534#21495#65306
end
object Label4: TLabel
Left = 136
Top = 182
Width = 36
Height = 13
Caption = #21517#31216#65306
end
object DBGrid1: TDBGrid
Left = 16
Top = 44
Width = 233
Height = 129
DataSource = DataSource1
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnEnter = DBGrid1Enter
end
object DBEdit2: TDBEdit
Left = 140
Top = 200
Width = 109
Height = 21
DataField = 'Name'
DataSource = DataSource1
TabOrder = 1
OnEnter = DBEdit1Enter
end
object DBNavigator1: TDBNavigator
Left = 8
Top = 238
Width = 240
Height = 28
Hints.Strings = (
#39318#35760#24405
#19978#19968#35760#24405
#19979#19968#35760#24405
#26411#35760#24405
#25554#20837#35760#24405
#21024#38500#35760#24405
#32534#36753#35760#24405
#20445#23384
#21462#28040
#21047#26032)
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
object DBEdit1: TDBEdit
Left = 16
Top = 200
Width = 73
Height = 21
DataField = 'ID'
DataSource = DataSource1
TabOrder = 3
OnEnter = DBEdit1Enter
end
end
object Button1: TButton
Left = 200
Top = 312
Width = 75
Height = 25
Caption = #36864#20986
TabOrder = 1
OnClick = Button1Click
end
object Xi: TADOTable
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.\'#25945#23460#31649#29702'.mdb;Persist ' +
'Security Info=False;User ID=Admin;Password=""'
CursorType = ctStatic
IndexName = 'ID'
TableName = #31995
Left = 29
Top = 64
object XiID: TWideStringField
DisplayLabel = #32534#21495
FieldName = 'ID'
Size = 2
end
object XiName: TWideStringField
DisplayLabel = #21517#31216
DisplayWidth = 8
FieldName = 'Name'
end
end
object DataSource1: TDataSource
DataSet = Xi
Left = 61
Top = 64
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -