📄 ser100_01.dfm.svn-base
字号:
inherited Ser100_01Form: TSer100_01Form
Left = 217
Top = 168
Caption = #26381#21153#31867#21035#32500#25252
ClientHeight = 346
PixelsPerInch = 96
TextHeight = 12
inherited dxDBTreeView1: TdxDBTreeView
Height = 266
KeyField = 'S100_001'
ListField = 'S100_002'
ParentField = 'S100_003'
end
inherited Panel2: TPanel
Height = 266
object Label3: TLabel
Left = 16
Top = 88
Width = 48
Height = 12
Caption = #20248#20808#32423#21035
end
object Label1: TLabel
Tag = 1
Left = 16
Top = 32
Width = 48
Height = 12
Caption = #26381#21153#21517#31216
FocusControl = DBEdit1
end
object Label2: TLabel
Left = 16
Top = 144
Width = 48
Height = 12
Caption = #19978#32423#26381#21153
end
object udPriority: TUpDown
Left = 153
Top = 104
Width = 15
Height = 20
Associate = edtPriority
Min = 0
Position = 50
TabOrder = 3
Wrap = False
end
object edtPriority: TEdit
Left = 16
Top = 104
Width = 137
Height = 20
ImeName = ''
TabOrder = 2
Text = '50'
end
object DBEdit1: TDBEdit
Left = 16
Top = 48
Width = 153
Height = 20
DataField = 'S100_002'
DataSource = DataSource1
ImeName = ''
TabOrder = 0
end
object dxTreeViewEdit1: TdxTreeViewEdit
Left = 16
Top = 160
Width = 153
Height = 20
CanSelectParents = True
ParentColor = False
TabOrder = 1
TabStop = True
TreeViewColor = clWindow
TreeViewCursor = crDefault
TreeViewFont.Charset = DEFAULT_CHARSET
TreeViewFont.Color = clWindowText
TreeViewFont.Height = -11
TreeViewFont.Name = 'MS Sans Serif'
TreeViewFont.Style = []
TreeViewIndent = 19
TreeViewReadOnly = True
TreeViewShowButtons = True
TreeViewShowHint = False
TreeViewShowLines = True
TreeViewShowRoot = True
TreeViewSortType = stNone
DividedChar = '.'
TextStyle = tvtsShort
Alignment = taLeftJustify
end
object CheckBox1: TCheckBox
Left = 16
Top = 200
Width = 97
Height = 17
BiDiMode = bdLeftToRight
Caption = #26159#21542#25237#35785
ParentBiDiMode = False
TabOrder = 4
end
end
inherited pmUISet: TPopupMenu
Left = 384
Top = 320
end
inherited ADOQuery1: TADOQuery
CursorType = ctStatic
SQL.Strings = (
'select * from SER100')
object ADOQuery1S100_001: TAutoIncField
FieldName = 'S100_001'
ReadOnly = True
end
object ADOQuery1S100_002: TWideStringField
FieldName = 'S100_002'
Size = 50
end
object ADOQuery1S100_003: TIntegerField
FieldName = 'S100_003'
end
object ADOQuery1S100_004: TBooleanField
FieldName = 'S100_004'
end
object ADOQuery1S100_005: TBooleanField
FieldName = 'S100_005'
end
object ADOQuery1S100_006: TSmallintField
FieldName = 'S100_006'
end
end
object qrySer100: TADOQuery
CacheSize = 1000
Connection = SYSDM.ADOC
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from SER100')
Left = 360
Top = 304
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -