usubsystem.dfm

用户权限管理系统

      Font.Style = []
      ParentFont = False
      TabOrder = 1
      object SpeedButton5: TSpeedButton
        Left = 155
        Top = 106
        Width = 44
        Height = 21
        Caption = #24212#29992
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = False
        OnClick = SpeedButton5Click
      end
      object cxCheckBox1: TcxCheckBox
        Left = 32
        Top = 19
        Width = 81
        Height = 21
        Caption = #26032#24314#29992#25143
        ParentFont = False
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlack
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        TabOrder = 0
      end
      object cxCheckBox2: TcxCheckBox
        Left = 32
        Top = 37
        Width = 81
        Height = 21
        Caption = #21024#38500#29992#25143
        ParentFont = False
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlack
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        TabOrder = 1
      end
      object cxCheckBox3: TcxCheckBox
        Left = 32
        Top = 55
        Width = 81
        Height = 21
        Caption = #29992#25143#25480#26435
        ParentFont = False
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlack
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        TabOrder = 2
      end
      object cxCheckBox4: TcxCheckBox
        Left = 32
        Top = 73
        Width = 81
        Height = 21
        Caption = #25442#21475#20196#21345
        ParentFont = False
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlack
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        TabOrder = 3
      end
      object cxCheckBox5: TcxCheckBox
        Left = 32
        Top = 91
        Width = 89
        Height = 21
        Caption = #25171#21360#21475#20196#21345
        ParentFont = False
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlack
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        TabOrder = 4
      end
      object cxCheckBox6: TcxCheckBox
        Left = 32
        Top = 110
        Width = 89
        Height = 21
        Caption = #29992#25143#26085#24535
        ParentFont = False
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlack
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        TabOrder = 5
      end
    end
    object RzGroupBox3: TRzGroupBox
      Left = 10
      Top = 171
      Width = 257
      Height = 264
      Caption = '  '
      TabOrder = 2
      object DBGridEh1: TDBGridEh
        Left = 9
        Top = 20
        Width = 239
        Height = 233
        DataSource = ds_Sub
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnEnter = DBGridEh1Enter
        Columns = <
          item
            EditButtons = <>
            FieldName = 'V01'
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #32534#30721
            Width = 43
          end
          item
            EditButtons = <>
            FieldName = 'V02'
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #21517#31216
            Width = 126
          end
          item
            EditButtons = <>
            FieldName = 'V03'
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #29256#26412#21495
            Width = 49
          end>
      end
    end
    object RzGroupBox4: TRzGroupBox
      Left = 276
      Top = 171
      Width = 211
      Height = 264
      Caption = '  '
      TabOrder = 3
      object DBGridEh2: TDBGridEh
        Left = 9
        Top = 20
        Width = 193
        Height = 233
        DataSource = ds_SubMod
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnEnter = DBGridEh2Enter
        Columns = <
          item
            EditButtons = <>
            FieldName = 'V21'
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #32534#30721
            Width = 44
          end
          item
            EditButtons = <>
            FieldName = 'V03'
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #21517#31216
            Width = 124
          end>
      end
    end
    object cxRadioButton1: TcxRadioButton
      Left = 20
      Top = 168
      Width = 59
      Height = 17
      Caption = #23376#31995#32479
      Checked = True
      TabOrder = 4
      TabStop = True
    end
    object cxRadioButton2: TcxRadioButton
      Left = 286
      Top = 168
      Width = 84
      Height = 17
      Caption = #23376#31995#32479#27169#22359
      TabOrder = 5
    end
    object RzButton4: TRzButton
      Left = 11
      Top = 445
      Width = 102
      Height = 23
      Caption = #23376#31995#32479#29992#25143'(&U)...'
      TabOrder = 6
      OnClick = RzButton4Click
    end
    object RzButton5: TRzButton
      Left = 254
      Top = 445
      Height = 23
      Caption = #26032#24314
      TabOrder = 7
      OnClick = RzButton5Click
    end
    object RzButton6: TRzButton
      Left = 334
      Top = 445
      Height = 23
      Caption = #23646#24615
      TabOrder = 8
      OnClick = RzButton6Click
    end
    object RzButton7: TRzButton
      Left = 414
      Top = 445
      Height = 23
      Caption = #21024#38500
      TabOrder = 9
      OnClick = RzButton7Click
    end
  end
  object cds_Sub: TClientDataSet
    Aggregates = <>
    Params = <>
    AfterScroll = cds_SubAfterScroll
    Left = 104
    Top = 248
  end
  object ds_Sub: TDataSource
    DataSet = cds_Sub
    Left = 144
    Top = 248
  end
  object cds_SubMod: TClientDataSet
    Aggregates = <>
    Params = <>
    OnCalcFields = cds_SubModCalcFields
    Left = 320
    Top = 248
    object cds_SubModV21: TStringField
      FieldKind = fkCalculated
      FieldName = 'V21'
      Size = 10
      Calculated = True
    end
    object cds_SubModV01: TStringField
      FieldName = 'V01'
      Size = 10
    end
    object cds_SubModV02: TStringField
      FieldName = 'V02'
      Size = 10
    end
    object cds_SubModV03: TStringField
      FieldName = 'V03'
      Size = 80
    end
    object cds_SubModV04: TMemoField
      FieldName = 'V04'
      BlobType = ftMemo
    end
  end
  object ds_SubMod: TDataSource
    DataSet = cds_SubMod
    Left = 360
    Top = 248
  end
  object cds_SubRight: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 210
    Top = 84
  end
end