HeidiSQL/source/usermanager.dfm

object UserManagerForm: TUserManagerForm
  Left = 252
  Top = 131
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'User Manager'
  ClientHeight = 364
  ClientWidth = 484
  Color = clBtnFace
  Constraints.MinHeight = 400
  Constraints.MinWidth = 500
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  Padding.Left = 8
  Padding.Top = 8
  Padding.Right = 8
  Padding.Bottom = 40
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  DesignSize = (
    484
    364)
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 185
    Top = 8
    Width = 5
    Height = 316
    ResizeStyle = rsUpdate
  end
  object btnCancel: TButton
    Left = 391
    Top = 332
    Width = 85
    Height = 25
    Anchors = [akRight, akBottom]
    Cancel = True
    Caption = 'Close'
    ModalResult = 2
    TabOrder = 4
  end
  object btnSave: TButton
    Left = 209
    Top = 332
    Width = 85
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = 'Save'
    Default = True
    ImageIndex = 10
    Images = MainForm.ImageListMain
    TabOrder = 2
    OnClick = btnSaveClick
  end
  object pnlLeft: TPanel
    Left = 8
    Top = 8
    Width = 177
    Height = 316
    Align = alLeft
    BevelOuter = bvNone
    Constraints.MinWidth = 20
    TabOrder = 0
    object lblUsers: TLabel
      AlignWithMargins = True
      Left = 3
      Top = 3
      Width = 171
      Height = 13
      Align = alTop
      Caption = '&Select user account:'
      FocusControl = listUsers
    end
    object listUsers: TVirtualStringTree
      Left = 0
      Top = 41
      Width = 177
      Height = 275
      Align = alClient
      Header.AutoSizeIndex = 0
      Header.DefaultHeight = 17
      Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowSortGlyphs]
      Header.ParentFont = True
      Images = MainForm.ImageListMain
      IncrementalSearch = isAll
      TabOrder = 0
      TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages, toUseExplorerTheme, toHideTreeLinesIfThemed]
      TreeOptions.SelectionOptions = [toFullRowSelect]
      OnBeforePaint = listUsersBeforePaint
      OnFocusChanged = listUsersFocusChanged
      OnFocusChanging = listUsersFocusChanging
      OnGetText = listUsersGetText
      OnGetImageIndex = listUsersGetImageIndex
      OnGetNodeDataSize = listUsersGetNodeDataSize
      OnInitNode = listUsersInitNode
      Columns = <
        item
          Position = 0
          Width = 173
        end>
    end
    object ToolBar1: TToolBar
      Left = 0
      Top = 19
      Width = 177
      Height = 22
      AutoSize = True
      ButtonWidth = 58
      Caption = 'ToolBar1'
      Images = MainForm.ImageListMain
      List = True
      ShowCaptions = True
      TabOrder = 1
      Wrapable = False
      object btnAddUser: TToolButton
        Left = 0
        Top = 0
        Caption = 'Add'
        ImageIndex = 45
        OnClick = btnAddUserClick
      end
      object btnCloneUser: TToolButton
        Left = 58
        Top = 0
        Caption = 'Clone'
        ImageIndex = 3
        OnClick = btnAddUserClick
      end
      object btnDeleteUser: TToolButton
        Left = 116
        Top = 0
        Caption = 'Delete'
        ImageIndex = 46
        OnClick = btnDeleteUserClick
      end
    end
  end
  object pnlRight: TPanel
    Left = 190
    Top = 8
    Width = 286
    Height = 316
    Align = alClient
    BevelOuter = bvNone
    Constraints.MinWidth = 20
    TabOrder = 1
    object tlbObjects: TToolBar
      Left = 0
      Top = 145
      Width = 286
      Height = 22
      AutoSize = True
      ButtonWidth = 79
      Caption = 'tlbObjects'
      Images = MainForm.ImageListMain
      List = True
      ParentShowHint = False
      ShowCaptions = True
      ShowHint = True
      TabOrder = 1
      Wrapable = False
      object Label1: TLabel
        Left = 0
        Top = 0
        Width = 89
        Height = 22
        Alignment = taCenter
        AutoSize = False
        Caption = 'Allow access to:'
        Transparent = False
        Layout = tlCenter
      end
      object btnAddObject: TToolButton
        Left = 89
        Top = 0
        Hint = 'Add object ...'
        Caption = 'Add object'
        ImageIndex = 45
        OnClick = btnAddObjectClick
      end
    end
    object treePrivs: TVirtualStringTree
      Left = 0
      Top = 167
      Width = 286
      Height = 149
      Align = alClient
      Header.AutoSizeIndex = 0
      Header.DefaultHeight = 17
      Header.MainColumn = -1
      Header.ParentFont = True
      Images = MainForm.ImageListMain
      IncrementalSearch = isAll
      TabOrder = 2
      TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning, toEditOnClick]
      TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowRoot, toShowTreeLines, toThemeAware, toUseBlendedImages, toUseExplorerTheme, toHideTreeLinesIfThemed]
      OnChecked = treePrivsChecked
      OnExpanded = treePrivsExpanded
      OnGetText = treePrivsGetText
      OnPaintText = treePrivsPaintText
      OnGetImageIndex = treePrivsGetImageIndex
      OnInitChildren = treePrivsInitChildren
      OnInitNode = treePrivsInitNode
      Columns = <>
    end
    object grpCredentials: TGroupBox
      Left = 0
      Top = 0
      Width = 286
      Height = 145
      Align = alTop
      Caption = 'Credentials'
      TabOrder = 0
      DesignSize = (
        286
        145)
      object lblFromHost: TLabel
        Left = 6
        Top = 47
        Width = 52
        Height = 13
        Caption = 'From &host:'
        FocusControl = editFromHost
      end
      object lblPassword: TLabel
        Left = 6
        Top = 74
        Width = 50
        Height = 13
        Caption = '&Password:'
        FocusControl = editPassword
      end
      object lblUsername: TLabel
        Left = 6
        Top = 20
        Width = 55
        Height = 13
        Caption = 'User &name:'
      end
      object lblRepeatPassword: TLabel
        Left = 6
        Top = 101
        Width = 88
        Height = 13
        Caption = 'Repeat password:'
        FocusControl = editRepeatPassword
      end
      object lblWarning: TLabel
        Left = 6
        Top = 126
        Width = 167
        Height = 13
        Caption = 'This user has an empty password! '
        Color = clBtnText
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        Visible = False
      end
      object editFromHost: TEdit
        Left = 109
        Top = 44
        Width = 169
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 1
        OnChange = Modification
      end
      object editUsername: TEdit
        Left = 109
        Top = 17
        Width = 169
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 0
        OnChange = Modification
      end
      object editPassword: TButtonedEdit
        Left = 109
        Top = 71
        Width = 169
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        Images = MainForm.ImageListMain
        PasswordChar = '*'
        RightButton.Hint = 'Generate random password and copy to clipboard'
        RightButton.ImageIndex = 0
        RightButton.Visible = True
        TabOrder = 2
        OnChange = Modification
        OnRightButtonClick = editPasswordRightButtonClick
      end
      object editRepeatPassword: TEdit
        Left = 109
        Top = 98
        Width = 169
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        PasswordChar = '*'
        TabOrder = 3
        OnChange = Modification
      end
    end
  end
  object btnDiscard: TButton
    Left = 300
    Top = 332
    Width = 85
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = 'Discard'
    ImageIndex = 40
    Images = MainForm.ImageListMain
    TabOrder = 3
    OnClick = btnDiscardClick
  end
end