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