You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

242 lines
5.7 KiB
Plaintext

11 months ago
object frm_sys_module: Tfrm_sys_module
Left = 255
Top = 179
Width = 696
Height = 480
Align = alClient
Caption = #26435#38480#27169#22359
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Splitter1: TSplitter
Left = 426
Top = 41
Width = 4
Height = 412
Cursor = crHSplit
end
object Splitter2: TSplitter
Left = 145
Top = 41
Width = 8
Height = 412
Cursor = crHSplit
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 688
Height = 41
Align = alTop
BevelOuter = bvNone
Caption = #26435#38480#27169#22359#35774#32622
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
object BitBtn1: TBitBtn
Left = 504
Top = 8
Width = 75
Height = 25
Caption = #20851#38381
TabOrder = 0
OnClick = BitBtn1Click
end
end
object dxDBGrid1: TdxDBGrid
Left = 430
Top = 41
Width = 258
Height = 412
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = #26435#38480#20195#30721
ShowGroupPanel = True
SummaryGroups = <>
SummarySeparator = ', '
Align = alClient
TabOrder = 1
DataSource = dsr_sys_code
Filter.Criteria = {00000000}
OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks]
object dxDBGrid1Column1: TdxDBGridMaskColumn
BandIndex = 0
RowIndex = 0
FieldName = #26435#38480#20195#30721
end
object dxDBGrid1Column2: TdxDBGridMaskColumn
BandIndex = 0
RowIndex = 0
FieldName = #19968#32423#27169#22359
end
object dxDBGrid1Column3: TdxDBGridMaskColumn
BandIndex = 0
RowIndex = 0
FieldName = #20108#32423#27169#22359
end
object dxDBGrid1Column4: TdxDBGridMaskColumn
BandIndex = 0
RowIndex = 0
FieldName = #26435#38480#21517#31216
end
object dxDBGrid1fmoduleid: TdxDBGridMaskColumn
BandIndex = 0
RowIndex = 0
FieldName = 'fmoduleid'
end
object dxDBGrid1Column6: TdxDBGridLookupColumn
BandIndex = 0
RowIndex = 0
FieldName = #25152#23646#27169#22359
end
end
object dxDBGrid2: TdxDBGrid
Left = 153
Top = 41
Width = 273
Height = 412
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = 'fmoduleid'
ShowGroupPanel = True
SummaryGroups = <>
SummarySeparator = ', '
Align = alLeft
TabOrder = 2
DataSource = dsrmodule
Filter.Criteria = {00000000}
OptionsDB = [edgoCanAppend, edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoUseBookmarks]
object dxDBGrid2fmoduleid: TdxDBGridMaskColumn
Width = 40
BandIndex = 0
RowIndex = 0
FieldName = 'fmoduleid'
end
object dxDBGrid2PID: TdxDBGridMaskColumn
Width = 34
BandIndex = 0
RowIndex = 0
FieldName = 'PID'
end
object dxDBGrid2Column3: TdxDBGridMaskColumn
Width = 59
BandIndex = 0
RowIndex = 0
FieldName = #27169#22359#21517#31216
end
object dxDBGrid2Column4: TdxDBGridCheckColumn
Width = 31
BandIndex = 0
RowIndex = 0
FieldName = #26159#21542#21551#29992
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object dxDBGrid2Column5: TdxDBGridMaskColumn
Width = 35
BandIndex = 0
RowIndex = 0
FieldName = #26435#38480#20195#30721
end
object dxDBGrid2Column6: TdxDBGridMaskColumn
Width = 31
BandIndex = 0
RowIndex = 0
FieldName = #22791#27880
end
object dxDBGrid2actionName: TdxDBGridMaskColumn
Width = 26
BandIndex = 0
RowIndex = 0
FieldName = 'actionName'
end
object dxDBGrid2Column8: TdxDBGridMaskColumn
Width = 36
BandIndex = 0
RowIndex = 0
FieldName = #26159#21542#26126#32454
end
object dxDBGrid2Column9: TdxDBGridCheckColumn
Sorted = csUp
Width = 48
BandIndex = 0
RowIndex = 0
FieldName = #26159#21542#20844#29992
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object dxDBGrid2Column10: TdxDBGridColumn
BandIndex = 0
RowIndex = 0
FieldName = 'forderid'
end
end
object dxDBTreeView1: TdxDBTreeView
Left = 0
Top = 41
Width = 145
Height = 412
ShowNodeHint = True
DataSource = dsrmodule
DisplayField = #27169#22359#21517#31216
KeyField = 'fmoduleid'
ListField = #27169#22359#21517#31216
ParentField = 'PID'
RootValue = Null
SeparatedSt = ' - '
RaiseOnError = True
Indent = 19
Align = alLeft
ParentColor = False
Options = [trDBCanDelete, trDBConfirmDelete, trCanDBNavigate, trSmartRecordCopy, trCheckHasChildren]
SelectedIndex = -1
TabOrder = 3
end
object qry_sys_code: TADOQuery
Connection = frm_main.db
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from t_sys_code')
Left = 368
Top = 240
end
object dsr_sys_code: TDataSource
DataSet = qry_sys_code
Left = 520
Top = 248
end
object qrymodule: TADOQuery
Connection = frm_main.db
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from t_sys_module')
Left = 120
Top = 192
end
object dsrmodule: TDataSource
DataSet = qrymodule
Left = 120
Top = 120
end
end