object frmEditAccount: TfrmEditAccount Left = 1146 Height = 214 Top = 205 Width = 261 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Редактирование аккаунта' ClientHeight = 214 ClientWidth = 261 Font.Height = -11 OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow Position = poOwnerFormCenter LCLVersion = '0.9.30.2' object PageControl1: TPageControl Left = 0 Height = 173 Top = 0 Width = 261 ActivePage = tsGeneral Align = alClient TabIndex = 0 TabOrder = 0 object tsGeneral: TTabSheet Caption = 'Общие' ClientHeight = 147 ClientWidth = 253 object lblPasswordHint: TLabel Left = 86 Height = 28 Top = 64 Width = 160 AutoSize = False Caption = 'Не заполнять поле, если не хотите изменить пароль.' Enabled = False ParentColor = False WordWrap = True end object lblUsername: TLabel Left = 6 Height = 14 Top = 12 Width = 46 Caption = 'Аккаунт:' ParentColor = False end object lblPassword: TLabel Left = 6 Height = 14 Top = 44 Width = 44 Caption = 'Пароль:' ParentColor = False end object lblAccessLevel: TLabel Left = 6 Height = 14 Top = 108 Width = 37 Caption = 'Права:' ParentColor = False end object edUsername: TEdit Left = 86 Height = 21 Top = 8 Width = 160 Color = clBtnFace ReadOnly = True TabOrder = 0 end object edPassword: TEdit Left = 86 Height = 21 Top = 40 Width = 160 EchoMode = emPassword PasswordChar = '*' TabOrder = 1 end object cbAccessLevel: TComboBox Left = 86 Height = 21 Top = 104 Width = 160 ItemHeight = 13 Items.Strings = ( 'None' 'Viewer' 'Normal' 'Developer' 'Administrator' ) Style = csDropDownList TabOrder = 2 end end object tsRegions: TTabSheet Caption = 'Регионы' ClientHeight = 147 ClientWidth = 253 object Label1: TLabel Left = 8 Height = 14 Top = 8 Width = 237 Align = alTop BorderSpacing.Left = 8 BorderSpacing.Top = 8 BorderSpacing.Right = 8 BorderSpacing.Bottom = 4 Caption = 'Разрешенные регионы:' ParentColor = False end object cbRegions: TCheckListBox Left = 8 Height = 113 Top = 26 Width = 237 Align = alClient BorderSpacing.Left = 8 BorderSpacing.Top = 4 BorderSpacing.Right = 8 BorderSpacing.Bottom = 8 ItemHeight = 0 TabOrder = 0 end end end object Panel1: TPanel Left = 8 Height = 25 Top = 181 Width = 245 Align = alBottom BorderSpacing.Around = 8 BevelOuter = bvNone ClientHeight = 25 ClientWidth = 245 TabOrder = 1 object btnCancel: TButton Left = 170 Height = 25 Top = 0 Width = 75 Align = alRight BorderSpacing.Left = 4 BorderSpacing.InnerBorder = 4 Cancel = True Caption = 'Отмена' ModalResult = 2 TabOrder = 0 end object btnOK: TButton Left = 91 Height = 25 Top = 0 Width = 75 Align = alRight BorderSpacing.Right = 4 BorderSpacing.InnerBorder = 4 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 1 end end end