CentrED/Client/UfrmEditAccount.lfm

object frmEditAccount: TfrmEditAccount
  Left = 290
  Height = 335
  Top = 171
  Width = 408
  ActiveControl = PageControl1
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Edit Account'
  ClientHeight = 335
  ClientWidth = 408
  DesignTimePPI = 120
  Font.Height = -18
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  Position = poOwnerFormCenter
  object PageControl1: TPageControl
    Left = 0
    Height = 272
    Top = 0
    Width = 408
    ActivePage = tsGeneral
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object tsGeneral: TTabSheet
      Caption = 'General'
      ClientHeight = 234
      ClientWidth = 398
      object lblPasswordHint: TLabel
        AnchorSideLeft.Control = edPassword
        AnchorSideTop.Control = edPassword
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = edPassword
        AnchorSideRight.Side = asrBottom
        Left = 128
        Height = 52
        Top = 102
        Width = 260
        Anchors = [akTop, akLeft, akRight]
        BorderSpacing.Around = 2
        Caption = 'Leave empty to leave the password unchanged.'
        Color = clDefault
        Enabled = False
        ParentColor = False
        WordWrap = True
      end
      object lblUsername: TLabel
        AnchorSideLeft.Control = tsGeneral
        AnchorSideTop.Control = edUsername
        AnchorSideTop.Side = asrCenter
        Left = 8
        Height = 26
        Top = 14
        Width = 92
        BorderSpacing.Left = 8
        Caption = 'Username:'
        Color = clDefault
        ParentColor = False
      end
      object lblPassword: TLabel
        AnchorSideLeft.Control = lblUsername
        AnchorSideTop.Control = edPassword
        AnchorSideTop.Side = asrCenter
        Left = 8
        Height = 26
        Top = 68
        Width = 87
        Caption = 'Password:'
        Color = clDefault
        ParentColor = False
      end
      object lblAccessLevel: TLabel
        AnchorSideLeft.Control = lblPassword
        AnchorSideTop.Control = cbAccessLevel
        AnchorSideTop.Side = asrCenter
        Left = 8
        Height = 26
        Top = 176
        Width = 102
        Caption = 'Accesslevel:'
        Color = clDefault
        ParentColor = False
      end
      object edUsername: TEdit
        AnchorSideLeft.Control = lblAccessLevel
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = tsGeneral
        AnchorSideRight.Control = tsGeneral
        AnchorSideRight.Side = asrBottom
        Left = 126
        Height = 38
        Top = 8
        Width = 264
        Anchors = [akTop, akLeft, akRight]
        BorderSpacing.Left = 16
        BorderSpacing.Top = 8
        BorderSpacing.Right = 8
        Color = clBtnFace
        ReadOnly = True
        TabOrder = 0
      end
      object edPassword: TEdit
        AnchorSideLeft.Control = edUsername
        AnchorSideTop.Control = edUsername
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = edUsername
        AnchorSideRight.Side = asrBottom
        Left = 126
        Height = 38
        Top = 62
        Width = 264
        Anchors = [akTop, akLeft, akRight]
        BorderSpacing.Top = 16
        EchoMode = emPassword
        PasswordChar = '*'
        TabOrder = 1
      end
      object cbAccessLevel: TComboBox
        AnchorSideLeft.Control = edPassword
        AnchorSideTop.Control = lblPasswordHint
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = edPassword
        AnchorSideRight.Side = asrBottom
        Left = 126
        Height = 38
        Top = 170
        Width = 264
        Anchors = [akTop, akLeft, akRight]
        BorderSpacing.Top = 16
        ItemHeight = 0
        Items.Strings = (
          'None'
          'Viewer'
          'Normal'
          'Administrator'
        )
        Style = csDropDownList
        TabOrder = 2
      end
    end
    object tsRegions: TTabSheet
      Caption = 'Regions'
      ClientHeight = 234
      ClientWidth = 398
      object Label1: TLabel
        Left = 12
        Height = 26
        Top = 12
        Width = 374
        Align = alTop
        BorderSpacing.Left = 12
        BorderSpacing.Top = 12
        BorderSpacing.Right = 12
        BorderSpacing.Bottom = 6
        Caption = 'Allowed Regions:'
        Color = clDefault
        ParentColor = False
      end
      object cbRegions: TCheckListBox
        Left = 12
        Height = 178
        Top = 44
        Width = 374
        Align = alClient
        BorderSpacing.Left = 12
        BorderSpacing.Top = 6
        BorderSpacing.Right = 12
        BorderSpacing.Bottom = 12
        ItemHeight = 0
        TabOrder = 0
        TopIndex = -1
      end
    end
  end
  object Panel1: TPanel
    Left = 12
    Height = 39
    Top = 284
    Width = 384
    Align = alBottom
    BorderSpacing.Around = 12
    BevelOuter = bvNone
    ClientHeight = 39
    ClientWidth = 384
    TabOrder = 1
    object btnCancel: TButton
      Left = 266
      Height = 39
      Top = 0
      Width = 118
      Align = alRight
      BorderSpacing.Left = 6
      BorderSpacing.InnerBorder = 6
      Cancel = True
      Caption = 'Cancel'
      ModalResult = 2
      TabOrder = 0
    end
    object btnOK: TButton
      Left = 142
      Height = 39
      Top = 0
      Width = 118
      Align = alRight
      BorderSpacing.Right = 6
      BorderSpacing.InnerBorder = 6
      Caption = 'OK'
      Default = True
      ModalResult = 1
      TabOrder = 1
    end
  end
end