umgruserf.dfm

一套功能非常丰富的图书管理系统

object MgrUserF: TMgrUserF
  Left = 0
  Top = 0
  Width = 548
  Height = 410
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  ParentFont = False
  TabOrder = 0
  object Button1: TButton
    Left = 453
    Top = 386
    Width = 67
    Height = 22
    Caption = '关闭'
    TabOrder = 0
    OnClick = Button1Click
  end
  object Panel1: TPanel
    Left = 3
    Top = 31
    Width = 541
    Height = 351
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object GroupBox1: TGroupBox
      Left = 6
      Top = 4
      Width = 259
      Height = 341
      Caption = '用户列表'
      TabOrder = 0
      object ListView1: TListView
        Left = 6
        Top = 15
        Width = 247
        Height = 293
        Columns = <
          item
            Caption = '用户名'
            Width = 100
          end
          item
            Caption = '用户权限'
            Width = 80
          end>
        GridLines = True
        MultiSelect = True
        ReadOnly = True
        RowSelect = True
        TabOrder = 0
        ViewStyle = vsReport
        OnChange = ListView1Change
        OnClick = ListView1Click
      end
      object Button2: TButton
        Left = 185
        Top = 314
        Width = 67
        Height = 22
        Caption = '删除'
        TabOrder = 1
        OnClick = Button2Click
      end
    end
    object GroupBox2: TGroupBox
      Left = 272
      Top = 4
      Width = 262
      Height = 341
      Caption = '编辑用户'
      TabOrder = 1
      object GroupBox3: TGroupBox
        Left = 11
        Top = 15
        Width = 241
        Height = 58
        Caption = '操作'
        TabOrder = 0
        object RadioButton1: TRadioButton
          Left = 12
          Top = 21
          Width = 52
          Height = 17
          Caption = '添加'
          Checked = True
          TabOrder = 0
          TabStop = True
          OnClick = RadioButton1Click
        end
        object RadioButton2: TRadioButton
          Left = 102
          Top = 21
          Width = 49
          Height = 17
          Caption = '修改'
          TabOrder = 1
          OnClick = RadioButton2Click
        end
      end
      object GroupBox4: TGroupBox
        Left = 12
        Top = 93
        Width = 238
        Height = 166
        Caption = '选项'
        TabOrder = 1
        object Edit1: TEdit
          Left = 93
          Top = 36
          Width = 121
          Height = 20
          TabOrder = 0
        end
        object Edit2: TEdit
          Left = 93
          Top = 74
          Width = 121
          Height = 20
          PasswordChar = '*'
          TabOrder = 1
        end
        object StaticText1: TStaticText
          Left = 19
          Top = 39
          Width = 40
          Height = 16
          Caption = '用户名'
          TabOrder = 2
        end
        object StaticText2: TStaticText
          Left = 19
          Top = 77
          Width = 28
          Height = 16
          Caption = '口令'
          TabOrder = 3
        end
        object ComboBox1: TComboBox
          Left = 93
          Top = 111
          Width = 121
          Height = 20
          Style = csDropDownList
          ItemHeight = 12
          TabOrder = 4
          Items.Strings = (
            '超级用户'
            '一般管理员'
            '操作员')
        end
        object StaticText3: TStaticText
          Left = 19
          Top = 114
          Width = 28
          Height = 16
          Caption = '权限'
          TabOrder = 5
        end
      end
      object Button3: TButton
        Left = 177
        Top = 314
        Width = 67
        Height = 22
        Caption = '确定'
        TabOrder = 2
        OnClick = Button3Click
      end
    end
  end
  object Panel2: TPanel
    Left = 4
    Top = 3
    Width = 540
    Height = 25
    Alignment = taLeftJustify
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    object StaticText4: TStaticText
      Left = 14
      Top = 7
      Width = 76
      Height = 16
      Caption = '特殊用户管理'
      TabOrder = 0
    end
  end
end