CentrED/Client/UfrmEditAccount.lfm

172 lines
3.8 KiB
Plaintext
Raw Normal View History

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