right.dfm

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 1,229 行 · 第 1/5 页

object frmRight: TfrmRight
  Left = 39
  Top = 25
  AutoScroll = False
  Caption = '用户权限管理'
  ClientHeight = 468
  ClientWidth = 717
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter1: TSplitter
    Left = 209
    Top = 0
    Width = 3
    Height = 468
    Cursor = crHSplit
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 209
    Height = 468
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 0
    object Splitter2: TSplitter
      Left = 0
      Top = 193
      Width = 209
      Height = 3
      Cursor = crVSplit
      Align = alTop
    end
    object tvUser: TTreeView
      Left = 0
      Top = 0
      Width = 209
      Height = 193
      Align = alTop
      Color = clWhite
      Ctl3D = False
      HideSelection = False
      Images = ImageList2
      Indent = 19
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 0
      OnChange = tvUserChange
    end
    object tvModule: TTreeView
      Left = 0
      Top = 196
      Width = 209
      Height = 272
      Align = alClient
      Color = clWhite
      Ctl3D = False
      HideSelection = False
      Indent = 19
      ParentCtl3D = False
      ReadOnly = True
      StateImages = ImageList4
      TabOrder = 1
      OnChange = tvModuleChange
    end
  end
  object Panel2: TPanel
    Left = 212
    Top = 0
    Width = 505
    Height = 468
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 1
    object sgRight: TSDGrid
      Left = 0
      Top = 0
      Width = 505
      Height = 372
      Align = alTop
      Anchors = [akLeft, akTop, akRight, akBottom]
      Color = clWhite
      ColCount = 14
      Ctl3D = False
      DefaultRowHeight = 18
      FixedColor = 8564917
      FixedCols = 0
      RowCount = 1
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing]
      ParentCtl3D = False
      TabOrder = 0
      OnDblClick = sgRightDblClick
      Columns = <
        item
          ColumnFont.Charset = DEFAULT_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -11
          ColumnFont.Name = 'MS Sans Serif'
          ColumnFont.Style = []
          TitleString = '功能'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -13
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '选中'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -13
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '个人'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '本组'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '全部'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '新增'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '修改'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '删除'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '审核'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '反审核'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '结清'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '反结清'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'
          ColumnFont.Style = []
          ColHorAlign = haCenter
          RowVerAlign = vaMiddle
          TitleString = '打印'
          ColumnWidth = 0
        end
        item
          ColumnFont.Charset = GB2312_CHARSET
          ColumnFont.Color = clWindowText
          ColumnFont.Height = -12
          ColumnFont.Name = '宋体'