AbetoDesign_FactuGES2/Source/Modulos/Contactos/Views/uViewClienteDatosDistribuidor.dfm

390 lines
14 KiB
Plaintext

inherited frViewClienteDatosDistribuidor: TfrViewClienteDatosDistribuidor
Width = 1123
Height = 650
OnCreate = CustomViewCreate
OnDestroy = CustomViewDestroy
OnShow = CustomViewShow
ExplicitWidth = 1123
ExplicitHeight = 650
object dxLayoutControl1: TdxLayoutControl
Left = 0
Top = 0
Width = 1123
Height = 650
Align = alClient
ParentBackground = True
TabOrder = 0
TabStop = False
AutoContentSizes = [acsWidth]
DesignSize = (
1123
650)
object cbEsDistribuidor: TcxDBCheckBox
Left = 22
Top = 28
Action = actEsDistribuidor
DataBinding.DataField = 'TIENDA_WEB'
DataBinding.DataSource = dsDatosDistribuidor
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
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 0
Width = 180
end
object eUsuario: TcxDBTextEdit
Left = 91
Top = 55
DataBinding.DataField = 'DIST_EMAIL'
DataBinding.DataSource = dsDatosDistribuidor
Enabled = False
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 3
Width = 305
end
object eContrasena: TcxDBTextEdit
Left = 91
Top = 82
DataBinding.DataField = 'DIST_PASSWORD'
DataBinding.DataSource = dsDatosDistribuidor
Enabled = False
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 4
Width = 204
end
object eBloqueado: TcxDBCheckBox
Left = 208
Top = 28
Caption = ' Bloqueado'
DataBinding.DataField = 'BLOQUEADO'
DataBinding.DataSource = dsDatosDistribuidor
Enabled = False
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
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 1
OnClick = actBloqueoClienteExecute
Width = 110
end
object eFormaPagoDistribuidor: TcxDBMemo
Left = 22
Top = 196
Anchors = [akLeft, akTop, akRight, akBottom]
DataBinding.DataField = 'DIST_FORMA_PAGO'
DataBinding.DataSource = dsDatosDistribuidor
Enabled = False
Properties.ScrollBars = ssVertical
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 = 6
Height = 50
Width = 901
end
object eValidezDistribuidor: TcxDBTextEdit
Left = 22
Top = 139
DataBinding.DataField = 'DIST_VALIDEZ'
DataBinding.DataSource = dsDatosDistribuidor
Enabled = False
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 5
Width = 855
end
object eNotasDistribuidor: TcxDBMemo
Left = 22
Top = 282
Anchors = [akLeft, akTop, akRight, akBottom]
DataBinding.DataField = 'DIST_NOTAS'
DataBinding.DataSource = dsDatosDistribuidor
Enabled = False
Properties.ScrollBars = ssVertical
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 = 7
Height = 50
Width = 952
end
object eLOPDDistribuidor: TcxDBMemo
Left = 22
Top = 368
Anchors = [akLeft, akTop, akRight, akBottom]
DataBinding.DataField = 'DIST_LOPD'
DataBinding.DataSource = dsDatosDistribuidor
Enabled = False
Properties.ScrollBars = ssVertical
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 = 8
Height = 50
Width = 952
end
object eCondicionesDistribuidor: TcxDBMemo
Left = 22
Top = 454
Anchors = [akLeft, akTop, akRight, akBottom]
DataBinding.DataField = 'DIST_CONDICIONES'
DataBinding.DataSource = dsDatosDistribuidor
Enabled = False
Properties.ScrollBars = ssVertical
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 = 9
Height = 100
Width = 952
end
object eMotivoBloqueo: TcxDBTextEdit
Left = 421
Top = 28
DataBinding.DataField = 'MOTIVO_BLOQUEO'
DataBinding.DataSource = dsDatosDistribuidor
Enabled = False
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 2
Width = 300
end
object dxLayoutGroup1: TdxLayoutGroup
ShowCaption = False
Hidden = True
ShowBorder = False
object dxLayoutControl1Group10: TdxLayoutGroup
ShowCaption = False
Hidden = True
ShowBorder = False
object dxLayoutControl1Group8: TdxLayoutGroup
ShowCaption = False
Hidden = True
ShowBorder = False
object dxLayoutControl1Group2: TdxLayoutGroup
ShowCaption = False
Hidden = True
ShowBorder = False
object dxLayoutControl1Group3: TdxLayoutGroup
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = 'Usuario y contrase'#241'a'
object dxLayoutControl1Group7: TdxLayoutGroup
ShowCaption = False
Hidden = True
LayoutDirection = ldHorizontal
ShowBorder = False
object dxLayoutControl1Item4: TdxLayoutItem
Caption = ' '
ShowCaption = False
Control = cbEsDistribuidor
ControlOptions.ShowBorder = False
end
object dlbloquear: TdxLayoutItem
Enabled = False
ShowCaption = False
Control = eBloqueado
ControlOptions.ShowBorder = False
end
object dlmotivo: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = 'Motivo de bloqueo:'
Enabled = False
Control = eMotivoBloqueo
ControlOptions.ShowBorder = False
end
end
object dlusuario: TdxLayoutItem
Caption = 'email acceso:'
Enabled = False
Control = eUsuario
ControlOptions.ShowBorder = False
end
object dlcontrasena: TdxLayoutItem
Caption = 'Contrase'#241'a:'
Enabled = False
Control = eContrasena
ControlOptions.ShowBorder = False
end
end
object dlvalidez: TdxLayoutGroup
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = 'Validez presupuestos por defecto'
Enabled = False
object dxLayoutControl1Item1: TdxLayoutItem
Control = eValidezDistribuidor
ControlOptions.ShowBorder = False
end
end
object dlformapago: TdxLayoutGroup
Caption = 'Forma de pago por defecto'
Enabled = False
object dxLayoutControl1Item3: TdxLayoutItem
Control = eFormaPagoDistribuidor
ControlOptions.ShowBorder = False
end
end
end
object dlnotas: TdxLayoutGroup
Caption = 'Notas por defecto'
Enabled = False
object dxLayoutControl1Item2: TdxLayoutItem
Control = eNotasDistribuidor
ControlOptions.ShowBorder = False
end
end
end
object dllopd: TdxLayoutGroup
Caption = 'LOPD del distribuidor'
Enabled = False
object dxLayoutControl1Item5: TdxLayoutItem
Control = eLOPDDistribuidor
ControlOptions.ShowBorder = False
end
end
end
object dlcondiciones: TdxLayoutGroup
Caption = 'Condiciones por defecto'
Enabled = False
object dxLayoutControl1Item6: TdxLayoutItem
Control = eCondicionesDistribuidor
ControlOptions.ShowBorder = False
end
end
end
end
object dsDatosDistribuidor: TDADataSource
Left = 8
Top = 8
end
object ActionListDist: TActionList
Left = 8
Top = 48
object actEsDistribuidor: TAction
Category = 'Distribuidor'
Caption = ' Este cliente es distribuidor'
ImageIndex = 1
OnExecute = actEsDistribuidorExecute
end
object actBloqueoCliente: TAction
Category = 'Distribuidor'
Caption = 'Este cliente est'#225' bloqueado'
OnExecute = actBloqueoClienteExecute
end
end
end