CentrED/Client/UfrmEditAccount.lfm

178 lines
3.8 KiB
Plaintext
Raw Normal View History

object frmEditAccount: TfrmEditAccount
Left = 290
Height = 268
Top = 171
Width = 326
ActiveControl = PageControl1
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Edit Account'
ClientHeight = 268
ClientWidth = 326
DesignTimePPI = 120
Font.Height = -14
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
Position = poOwnerFormCenter
LCLVersion = '2.3.0.0'
object PageControl1: TPageControl
Left = 0
Height = 173
Top = 0
Width = 261
ActivePage = tsGeneral
Align = alClient
TabIndex = 0
TabOrder = 0
object tsGeneral: TTabSheet
Caption = 'General'
ClientHeight = 135
ClientWidth = 251
object lblPasswordHint: TLabel
Left = 108
Height = 35
Top = 80
Width = 200
AutoSize = False
Caption = 'Leave empty to leave the password unchanged.'
Color = clDefault
Enabled = False
ParentColor = False
WordWrap = True
end
object lblUsername: TLabel
Left = 8
Height = 14
Top = 15
Width = 58
Caption = 'Username:'
Color = clDefault
ParentColor = False
end
object lblPassword: TLabel
Left = 8
Height = 14
Top = 55
Width = 54
Caption = 'Password:'
Color = clDefault
ParentColor = False
end
object lblAccessLevel: TLabel
Left = 8
Height = 14
Top = 135
Width = 63
Caption = 'Accesslevel:'
Color = clDefault
ParentColor = False
end
object edUsername: TEdit
Left = 108
Height = 23
Top = 10
Width = 200
Color = clBtnFace
ReadOnly = True
TabOrder = 0
end
object edPassword: TEdit
Left = 108
Height = 23
Top = 50
Width = 200
EchoMode = emPassword
PasswordChar = '*'
TabOrder = 1
end
object cbAccessLevel: TComboBox
Left = 108
Height = 25
Top = 130
Width = 200
ItemHeight = 0
Items.Strings = (
'None'
'Viewer'
'Normal'
'Administrator'
)
Style = csDropDownList
TabOrder = 2
end
end
object tsRegions: TTabSheet
Caption = 'Regions'
ClientHeight = 135
ClientWidth = 251
object Label1: TLabel
Left = 8
Height = 14
Top = 8
Width = 243
Align = alTop
BorderSpacing.Left = 10
BorderSpacing.Top = 10
BorderSpacing.Right = 10
BorderSpacing.Bottom = 5
Caption = 'Allowed Regions:'
Color = clDefault
ParentColor = False
end
object cbRegions: TCheckListBox
Left = 8
Height = 114
Top = 26
Width = 243
Align = alClient
BorderSpacing.Left = 10
BorderSpacing.Top = 5
BorderSpacing.Right = 10
BorderSpacing.Bottom = 10
ItemHeight = 20
TabOrder = 0
TopIndex = -1
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 = 'Cancel'
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