david
86525eb783
git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/tags/1.8.0@17 c93665c3-c93d-084d-9b98-7d5f4a9c3376
83 lines
2.5 KiB
Plaintext
83 lines
2.5 KiB
Plaintext
inherited frViewClienteTiendaWeb: TfrViewClienteTiendaWeb
|
|
Width = 582
|
|
Height = 125
|
|
ExplicitWidth = 582
|
|
ExplicitHeight = 125
|
|
object dxLayoutControlTiendaWeb: TdxLayoutControl
|
|
Left = 0
|
|
Top = 0
|
|
Width = 582
|
|
Height = 97
|
|
Align = alTop
|
|
ParentBackground = True
|
|
TabOrder = 0
|
|
AutoContentSizes = [acsWidth, acsHeight]
|
|
object Label1: TLabel
|
|
Left = 42
|
|
Top = 55
|
|
Width = 333
|
|
Height = 13
|
|
Caption =
|
|
'(El cliente debe tener obligatoriamente correo electr'#243'nico en su' +
|
|
' ficha)'
|
|
end
|
|
object cxDBCheckBox1: TcxDBCheckBox
|
|
Left = 22
|
|
Top = 28
|
|
Caption = 'Permitir que este cliente tenga acceso a la tienda web'
|
|
DataBinding.DataField = 'TIENDA_WEB'
|
|
DataBinding.DataSource = dsTiendaWeb
|
|
Properties.ImmediatePost = True
|
|
Properties.NullStyle = nssUnchecked
|
|
Properties.ValueChecked = 1
|
|
Properties.ValueUnchecked = 0
|
|
Style.BorderColor = clWindowFrame
|
|
Style.BorderStyle = ebs3D
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
TabOrder = 0
|
|
Width = 121
|
|
end
|
|
object dxLayoutGroup1: TdxLayoutGroup
|
|
ShowCaption = False
|
|
Hidden = True
|
|
LayoutDirection = ldHorizontal
|
|
ShowBorder = False
|
|
object dxLayoutControlTiendaWebGroup3: TdxLayoutGroup
|
|
AutoAligns = [aaVertical]
|
|
AlignHorz = ahClient
|
|
Caption = 'Acceso a la tienda web'
|
|
object dxLayoutControlTiendaWebItem1: TdxLayoutItem
|
|
AutoAligns = [aaVertical]
|
|
AlignHorz = ahClient
|
|
Caption = 'cxDBCheckBox1'
|
|
ShowCaption = False
|
|
Control = cxDBCheckBox1
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControlTiendaWebItem2: TdxLayoutItem
|
|
AutoAligns = [aaVertical]
|
|
AlignHorz = ahClient
|
|
Caption = 'Label1'
|
|
Offsets.Left = 20
|
|
ShowCaption = False
|
|
Control = Label1
|
|
ControlOptions.AutoColor = True
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object dsTiendaWeb: TDADataSource
|
|
Left = 8
|
|
Top = 8
|
|
end
|
|
end
|