pfm_rightset.dfm

POS收银系统

object fm_rightset: Tfm_rightset
  Left = 172
  Top = 280
  Width = 716
  Height = 429
  Caption = '系统用户及权限设置'
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = '宋体'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 193
    Top = 0
    Width = 6
    Height = 402
    Cursor = crHSplit
    Color = clAppWorkSpace
    ParentColor = False
  end
  object GroupBox1: TGroupBox
    Left = 199
    Top = 0
    Width = 509
    Height = 402
    Align = alClient
    TabOrder = 0
    object Panel2: TPanel
      Left = 2
      Top = 15
      Width = 505
      Height = 330
      Align = alClient
      BevelInner = bvLowered
      BevelOuter = bvNone
      TabOrder = 1
      object Label1: TLabel
        Left = 12
        Top = 16
        Width = 65
        Height = 13
        Caption = '不可用功能'
      end
      object Label2: TLabel
        Left = 300
        Top = 12
        Width = 52
        Height = 13
        Caption = '可用功能'
      end
      object btnAll12: TButton
        Left = 216
        Top = 128
        Width = 53
        Height = 25
        Caption = '>>'
        TabOrder = 0
        OnClick = btnAll12Click
      end
      object btnAll21: TButton
        Left = 216
        Top = 176
        Width = 53
        Height = 25
        Caption = '<<'
        TabOrder = 1
        OnClick = btnAll21Click
      end
      object TV1: TTreeView
        Left = 8
        Top = 32
        Width = 189
        Height = 289
        HideSelection = False
        Indent = 19
        TabOrder = 2
        OnDblClick = TV1DblClick
      end
      object TV2: TTreeView
        Left = 296
        Top = 28
        Width = 173
        Height = 293
        HideSelection = False
        Indent = 19
        TabOrder = 3
        OnDblClick = TV2DblClick
      end
    end
    object Panel1: TPanel
      Left = 2
      Top = 345
      Width = 505
      Height = 55
      Align = alBottom
      BevelInner = bvLowered
      TabOrder = 0
      object BBtnUser: TBitBtn
        Left = 376
        Top = 16
        Width = 89
        Height = 25
        Caption = '用户帐号管理'
        TabOrder = 0
        OnClick = BBtnUserClick
      end
      object BBtnsave: TBitBtn
        Left = 24
        Top = 16
        Width = 85
        Height = 25
        Caption = '保存权限设置'
        TabOrder = 1
        OnClick = BBtnsaveClick
      end
    end
  end
  object TVUser: TTreeView
    Left = 0
    Top = 0
    Width = 193
    Height = 402
    Align = alLeft
    HideSelection = False
    Indent = 19
    TabOrder = 1
    OnChange = TVUserChange
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 64
    Top = 8
  end
  object Query1: TQuery
    DatabaseName = 'posdb'
    SQL.Strings = (
      '')
    Left = 32
    Top = 8
  end
end