object frmEditAccount: TfrmEditAccount Left = 1146 Height = 268 Top = 205 Width = 326 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Редактирование аккаунта' ClientHeight = 268 ClientWidth = 326 DesignTimePPI = 120 Font.Height = -14 OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow Position = poOwnerFormCenter LCLVersion = '2.2.2.0' object PageControl1: TPageControl Left = 0 Height = 173 Top = 0 Width = 261 ActivePage = tsGeneral Align = alClient TabIndex = 0 TabOrder = 0 object tsGeneral: TTabSheet Caption = 'Общие' ClientHeight = 135 ClientWidth = 251 object lblPasswordHint: TLabel Left = 108 Height = 35 Top = 80 Width = 200 AutoSize = False Caption = 'Не заполнять поле, если не хотите изменить пароль.' Enabled = False ParentColor = False WordWrap = True end object lblUsername: TLabel Left = 8 Height = 14 Top = 15 Width = 46 Caption = 'Аккаунт:' ParentColor = False end object lblPassword: TLabel Left = 8 Height = 14 Top = 55 Width = 44 Caption = 'Пароль:' ParentColor = False end object lblAccessLevel: TLabel Left = 8 Height = 14 Top = 135 Width = 37 Caption = 'Права:' ParentColor = False end object edUsername: TEdit Left = 108 Height = 21 Top = 10 Width = 200 Color = clBtnFace ReadOnly = True TabOrder = 0 end object edPassword: TEdit Left = 108 Height = 21 Top = 50 Width = 200 EchoMode = emPassword PasswordChar = '*' TabOrder = 1 end object cbAccessLevel: TComboBox Left = 108 Height = 21 Top = 130 Width = 200 ItemHeight = 13 Items.Strings = ( 'None' 'Viewer' 'Normal' 'Developer' 'Administrator' ) Style = csDropDownList TabOrder = 2 end end object tsRegions: TTabSheet Caption = 'Регионы' ClientHeight = 135 ClientWidth = 251 object Label1: TLabel Left = 8 Height = 14 Top = 8 Width = 237 Align = alTop BorderSpacing.Left = 10 BorderSpacing.Top = 10 BorderSpacing.Right = 10 BorderSpacing.Bottom = 5 Caption = 'Разрешенные регионы:' ParentColor = False end object cbRegions: TCheckListBox Left = 8 Height = 113 Top = 26 Width = 237 Align = alClient BorderSpacing.Left = 10 BorderSpacing.Top = 5 BorderSpacing.Right = 10 BorderSpacing.Bottom = 10 ItemHeight = 20 TabOrder = 0 end end end object Panel1: TPanel Left = 8 Height = 31 Top = 175 Width = 245 Align = alBottom BorderSpacing.Around = 10 BevelOuter = bvNone ClientHeight = 31 ClientWidth = 245 TabOrder = 1 object btnCancel: TButton Left = 151 Height = 25 Top = 0 Width = 94 Align = alRight BorderSpacing.Left = 5 BorderSpacing.InnerBorder = 5 Cancel = True Caption = 'Отмена' ModalResult = 2 TabOrder = 0 end object btnOK: TButton Left = 72 Height = 25 Top = 0 Width = 94 Align = alRight BorderSpacing.Right = 5 BorderSpacing.InnerBorder = 5 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 1 end end end