📄 uclass_base.~dfm
字号:
object frmClass_Base: TfrmClass_Base
Left = 176
Top = 160
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsDialog
Caption = 'frmClass_Base'
ClientHeight = 339
ClientWidth = 536
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Splitter1: TSplitter
Left = 185
Top = 44
Width = 3
Height = 295
Cursor = crHSplit
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 536
Height = 44
AutoSize = True
ButtonHeight = 38
Caption = 'ToolBar1'
EdgeBorders = [ebLeft, ebTop, ebRight, ebBottom]
TabOrder = 0
end
object Panel1: TPanel
Left = 0
Top = 44
Width = 185
Height = 295
Align = alLeft
TabOrder = 1
object Tv: TTreeView
Left = 1
Top = 1
Width = 183
Height = 293
Align = alClient
HideSelection = False
Indent = 19
PopupMenu = PmTree
ReadOnly = True
RowSelect = True
SortType = stData
TabOrder = 0
OnChange = TvChange
OnClick = TvClick
OnKeyUp = TvKeyUp
end
end
object Panel2: TPanel
Left = 188
Top = 44
Width = 348
Height = 295
Align = alClient
TabOrder = 2
object SQLBackup: TStaticText
Left = 272
Top = 8
Width = 58
Height = 16
Caption = 'SQLBackup'
TabOrder = 0
Visible = False
end
end
object ADOQry: TADOQuery
Parameters = <>
SQL.Strings = (
'SELECT nACode AS Code, nATCode AS TCode, nAName AS Name'
'FROM s_ADDrClass'
'ORDER BY nATCode')
Left = 10
Top = 50
end
object PmTree: TPopupMenu
Left = 120
Top = 276
object N1: TMenuItem
Caption = '全部展开'
OnClick = N1Click
end
object N2: TMenuItem
Caption = '全部收缩'
OnClick = N2Click
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -