📄 rgtfunctionmaintainfrmmain.~dfm
字号:
object RgtFunctionMaintainMain: TRgtFunctionMaintainMain
Left = 68
Top = 30
Width = 665
Height = 460
Caption = '系统功能设置'
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poScreenCenter
Visible = True
WindowState = wsMaximized
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 14
object Panel1: TPanel
Left = 0
Top = 0
Width = 223
Height = 433
Align = alLeft
BevelInner = bvLowered
TabOrder = 0
object Label9: TLabel
Left = 5
Top = 11
Width = 70
Height = 14
Caption = '功能序号从'
end
object Label3: TLabel
Left = 135
Top = 11
Width = 14
Height = 14
Caption = '到'
end
object Label1: TLabel
Left = 9
Top = 34
Width = 56
Height = 14
Caption = '功能名称'
end
object Label8: TLabel
Left = 11
Top = 144
Width = 56
Height = 14
Caption = '控制类型'
end
object Label20: TLabel
Left = 12
Top = 164
Width = 28
Height = 14
Caption = '备注'
end
object FlatButton1: TFlatButton
Left = 64
Top = 456
Width = 70
Height = 23
Caption = '查询[&B]'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333FF3FF3333333333CC30003333333333773777333333333C33
3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
33003377333337F33377333333333C333300333F333337F33377339333333C33
3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
330077F377F337F33377993399333C33330077FF773337F33377399993333C33
33333777733337F333FF333333333C33300033333333373FF7773333333333CC
3000333333333377377733333333333333333333333333333333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 6
OnClick = FlatButton1Click
end
object EdtFuncSerialIdQueryFrom: TEdit
Left = 77
Top = 7
Width = 55
Height = 22
TabOrder = 0
OnKeyPress = EdtFuncSerialIdQueryFromKeyPress
end
object EdtFuncSerialIdQueryTo: TEdit
Left = 150
Top = 7
Width = 66
Height = 22
TabOrder = 1
OnKeyPress = EdtFuncSerialIdQueryToKeyPress
end
object EdtFuncNameQuery: TEdit
Left = 77
Top = 33
Width = 139
Height = 22
TabOrder = 2
end
object GroupBox2: TGroupBox
Left = 7
Top = 57
Width = 211
Height = 77
TabOrder = 3
object Label21: TLabel
Left = 25
Top = 18
Width = 56
Height = 14
Caption = '窗体标题'
end
object Label22: TLabel
Left = 23
Top = 51
Width = 56
Height = 14
Caption = '控件含义'
end
object EdtFormCaptionQuery: TEdit
Left = 83
Top = 14
Width = 121
Height = 22
Color = clBtnFace
ReadOnly = True
TabOrder = 1
end
object EdtControlCaptionQuery: TEdit
Left = 83
Top = 48
Width = 121
Height = 22
Color = clBtnFace
ReadOnly = True
TabOrder = 2
end
object SbSysFormCtrlListQuery: TBitBtn
Left = 3
Top = 15
Width = 20
Height = 20
Caption = '>>'
TabOrder = 0
OnClick = SbSysFormCtrlListQueryClick
end
end
object CmbControlTypeQuery: TComboBox
Left = 78
Top = 140
Width = 139
Height = 22
Style = csDropDownList
ItemHeight = 14
TabOrder = 4
Items.Strings = (
''
'看不见'
'不可编辑')
end
object EdtExtraQuery: TEdit
Left = 11
Top = 182
Width = 204
Height = 22
TabOrder = 5
end
end
object Panel2: TPanel
Left = 223
Top = 0
Width = 434
Height = 433
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object Splitter2: TSplitter
Left = 0
Top = 112
Width = 434
Height = 3
Cursor = crVSplit
Align = alTop
AutoSnap = False
end
object DbgPrivFunction: TDBGrid
Left = 0
Top = 0
Width = 434
Height = 112
Align = alTop
DataSource = DataSource1
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'FUNCSERIALID'
Title.Alignment = taCenter
Title.Caption = '序列号'
Visible = True
end
item
Expanded = False
FieldName = 'FUNCNAME'
Title.Alignment = taCenter
Title.Caption = '功能名称'
Width = 124
Visible = True
end
item
Expanded = False
FieldName = 'FUNCID'
Title.Alignment = taCenter
Title.Caption = '窗体.控件'
Width = 151
Visible = True
end
item
Expanded = False
FieldName = 'CONTROLTYPE'
Title.Alignment = taCenter
Title.Caption = '控制类型'
Width = 79
Visible = True
end
item
Expanded = False
FieldName = 'EXTRA'
Title.Alignment = taCenter
Title.Caption = '备注'
Width = 129
Visible = True
end>
end
object Panel3: TPanel
Left = 0
Top = 115
Width = 434
Height = 282
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object Label12: TLabel
Left = 6
Top = 14
Width = 56
Height = 14
Caption = '功能序号'
end
object Label15: TLabel
Left = 5
Top = 44
Width = 56
Height = 14
Caption = '功能名称'
end
object Label11: TLabel
Left = 213
Top = 14
Width = 56
Height = 14
Caption = '控制类型'
end
object Label19: TLabel
Left = 21
Top = 126
Width = 28
Height = 14
Caption = '备注'
end
object EdtFuncSerialIdEditing: TEdit
Left = 65
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -