172 lines
3.8 KiB
Plaintext
172 lines
3.8 KiB
Plaintext
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
|