userlimitform.dfm

中小企业管理系统------ ERP系统原代码

inherited frmUserLimit: TfrmUserLimit
  Left = 96
  Top = 58
  Caption = #29992#25143#26435#38480#35774#32622
  ClientHeight = 453
  ClientWidth = 632
  PixelsPerInch = 96
  TextHeight = 12
  inherited pnlForm: TSeSkinPanel
    Top = 40
    Width = 632
    Height = 413
    Color = clBtnFace
    NormalHeight = {00000000}
    object Splitter1: TSeSkinSplitter
      Left = 153
      Top = 4
      Width = 4
      Height = 405
      Cursor = crHSplit
      Performance = kspNoBuffer
      Transparent = False
      SkinEngine = frmData.SeSkinEngine
      SkinObject = 'Splitter'
    end
    object PageControl: TSeSkinPageControl
      Left = 157
      Top = 4
      Width = 471
      Height = 405
      Performance = kspNoBuffer
      Transparent = True
      OnEnter = PageControlEnter
      Align = alClient
      TabOrder = 0
      TabStop = True
      SkinEngine = frmData.SeSkinEngine
      SkinObject = 'Tabs'
    end
    object treeMain: TdxDBTreeList
      Left = 4
      Top = 4
      Width = 149
      Height = 405
      Bands = <
        item
          Width = 395
        end>
      DefaultLayout = False
      HeaderPanelRowCount = 1
      KeyField = 'ID'
      ParentField = 'TreeParent'
      Align = alLeft
      TabOrder = 1
      DataSource = dsSource
      HeaderColor = 13882042
      Images = frmData.ImageList
      LookAndFeel = lfFlat
      OptionsBehavior = [etoAutoDragDrop, etoAutoDragDropCopy, etoAutoSort, etoDblClick, etoDragExpand, etoDragScroll, etoEditing, etoEnterShowEditor, etoImmediateEditor, etoTabThrough]
      OptionsCustomize = [etoBandMoving, etoBandPanelSizing, etoBandSizing, etoColumnMoving, etoColumnSizing, etoKeepColumnWidth]
      OptionsDB = [etoCancelOnExit, etoCanDelete, etoCanInsert, etoCanNavigation, etoCheckHasChildren, etoConfirmDelete, etoLoadAllRecords]
      OptionsView = [etoAutoWidth, etoBandHeaderWidth, etoRowSelect, etoUseBitmap, etoUseImageIndexForSelected]
      RootValue = '-1'
      TreeLineColor = clGrayText
      OnGetImageIndex = treeMainGetImageIndex
      OnGetSelectedIndex = treeMainGetSelectedIndex
      OnChangeNode = treeMainChangeNode
    end
  end
  inherited SeSkinForm1: TSeSkinForm
    Left = 56
    Top = 40
  end
  inherited dxBarManager1: TdxBarManager
    Bars = <
      item
        Caption = #24037#20855#26639
        DockedDockingStyle = dsTop
        DockedLeft = 0
        DockedTop = 0
        DockingStyle = dsTop
        FloatLeft = 200
        FloatTop = 255
        FloatClientWidth = 23
        FloatClientHeight = 22
        ItemLinks = <
          item
            Item = bbRefresh
            Visible = True
          end
          item
            BeginGroup = True
            Item = bbFind
            Visible = True
          end
          item
            Item = bbFilter
            Visible = True
          end
          item
            BeginGroup = True
            Item = bbSelect
            Visible = True
          end
          item
            Item = bbDel
            Visible = True
          end
          item
            Item = bbAllSelect
            Visible = True
          end
          item
            Item = bbAlldel
            Visible = True
          end
          item
            BeginGroup = True
            Item = bbPassword
            Visible = True
          end
          item
            Item = bbSave
            Visible = True
          end
          item
            Item = bbExit
            Visible = True
          end>
        Name = #24037#20855#26639
        OneOnRow = True
        Row = 0
        UseOwnFont = False
        UseRestSpace = True
        Visible = True
        WholeRow = False
      end>
    Categories.ItemsVisibles = (
      2
      2
      2)
    Categories.Visibles = (
      True
      True
      True)
    DockControlHeights = (
      0
      0
      40
      0)
    inherited bbSelect: TdxBarLargeButton
      OnClick = bbSelectClick
    end
    inherited bbDel: TdxBarLargeButton
      OnClick = bbDelClick
    end
    inherited bbRefresh: TdxBarLargeButton
      OnClick = bbRefreshClick
    end
    inherited bbAllSelect: TdxBarLargeButton
      OnClick = bbAllSelectClick
    end
    inherited bbAlldel: TdxBarLargeButton
      OnClick = bbAlldelClick
    end
    inherited bbSave: TdxBarLargeButton
      OnClick = bbSaveClick
    end
    object bbPassword: TdxBarLargeButton
      Caption = #23494#30721
      Category = 0
      Hint = #23494#30721
      Visible = ivAlways
      ImageIndex = 51
      OnClick = bbPasswordClick
      AutoGrayScale = False
      LargeImageIndex = 51
    end
  end
  object DataSet: TADODataSet
    Connection = frmData.ADOConnet
    CursorType = ctStatic
    CommandText = 'SELECT * FROM Subject'
    Parameters = <>
    Left = 112
    Top = 40
  end
  object dsSource: TDataSource
    DataSet = DataSet
    Left = 84
    Top = 40
  end
  object SeSkinForm2: TSeSkinForm
    Animation.EffectKind = '[ RANDOM ] - Random selection'
    BorderIcons = [kbiClose, kbiSystemMenu, kbiMaximize]
    BorderStyle = kbsStandard
    Caption = #31383#21475#22522#31867
    SystemMenuOptions.Animation.EffectKind = '[ RANDOM ] - Random selection'
    TrayMenuOptions.Animation.EffectKind = '[ RANDOM ] - Random selection'
    Performance = ksfpNoBuffer
    StayOnTop = False
    StretchBackground = False
    WindowState = kwsNormal
    SkinEngine = frmData.SeSkinEngine
    SkinObject = 'ToolWindow'
    Top = 8
  end
end