CentrED/Client/UfrmEditAccount.lfm

172 lines
3.8 KiB
Plaintext
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

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