Archivado/LuisLeon_FactuGES2
Archived
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
This repository has been archived on 2024-11-28. You can view files and clone it, but cannot push or open issues or pull requests.
master
LuisLeon_FactuGES2/Source/Modulos/Contactos/Views/uViewCliente.dfm

745 lines
26 KiB
Plaintext
Raw Permalink Blame History

inherited frViewCliente: TfrViewCliente
Width = 951
Height = 789
OnCreate = CustomViewCreate
OnDestroy = CustomViewDestroy
ExplicitWidth = 951
ExplicitHeight = 789
inherited dxLayoutControlContacto: TdxLayoutControl
Width = 951
Height = 789
ExplicitWidth = 951
ExplicitHeight = 789
inherited PngSpeedButton1: TPngSpeedButton
Left = 906
ExplicitLeft = 906
end
inherited PngSpeedButton2: TPngSpeedButton
Left = 906
ExplicitLeft = 906
end
inherited PngSpeedButton3: TPngSpeedButton
Left = 906
ExplicitLeft = 906
end
object Label1: TLabel [3]
Left = 531
Top = 440
Width = 269
Height = 39
Margins.Bottom = 0
Caption =
'Para que el cliente pueda tener acceso a la tienda web, obligato' +
'riamente debe tener indicado un correo electr'#243'nico de trabajo'
WordWrap = True
end
object Label2: TLabel [4]
Left = 531
Top = 337
Width = 271
Height = 39
Margins.Bottom = 0
Caption =
'Si procede, indique la direcci'#243'n de correo electr'#243'nico del clien' +
'te que se utilizar'#225' para enviar documentaci'#243'n (facturas, albaran' +
'es, recibos, etc.) por e-mail.'
WordWrap = True
end
object PngSpeedButton4: TPngSpeedButton [5]
Left = 906
Top = 382
Width = 23
Height = 22
Action = actMandarCorreoTrabajo
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000000970485973000017120000171201679FD252000001964944415478DA
63FCFFFF3F03232323033A58BCE9F87F647EAC9F258622B05E6C068034873B8A
80D92019C62F8F194C1356339CDF399D91A0014B361FFB1FE6208AA299E1F323
306D52F90CC5100C03566E3DFC3FD04E02A2F9F727064690462066006A66FC02
64FFFAC8603451096E088A01CB361FFDFF8F819981183077D11A86FDAB7B18E1
062CDD7CE27F14573FC3B2EF450CD13E86181ABE7DFFCDF0F5DB6F866FDFFE30
1CB97897218AB38FC1B85B98E1DC8E698C600396000D8861696058FAB7116CC0
94C5FBB0DAEC6CAECF70EED6238668E67AB057500CF8F0E10383A0A0208A0B90
6D06B1BF01D9379E3C67387AFE09C389A37BD15CE06B01B47907434EAC13C3EF
3F7F19662E3F8862BB898606C3EFDFFF1896EF3DCFA0A5C0CD306FE9265403FC
9D20362F5CB71F4CE7C47AA01890D5BC164C7716F980D56018606BAC0656B079
EF2986F82047AC6150DEB785A13CD911AC06C300234D05867DC72F30B8D818E1
8DC2494B0E63F702281075D455884A07576EDEC134404A5480E1DAED07441900
021806F44D5D44B46618801B400900007F4518F05E90AAF20000000049454E44
AE426082}
PngOptions = [pngBlendOnDisabled, pngGrayscaleOnDisabled]
end
inherited eCalle: TcxDBTextEdit
Left = 132
Top = 440
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 12
ExplicitLeft = 132
ExplicitTop = 440
ExplicitWidth = 260
Width = 260
end
inherited cbProvincia: TcxDBComboBox
Left = 132
Top = 467
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 13
ExplicitLeft = 132
ExplicitTop = 467
ExplicitWidth = 159
Width = 159
end
object eNombreComercial: TcxDBTextEdit [8]
Left = 132
Top = 82
DataBinding.DataField = 'NOMBRE_COMERCIAL'
DataBinding.DataSource = dsContacto
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.Color = clWindow
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 = 3
Width = 260
end
object cbClienteBloqueado: TcxDBCheckBox [9]
Left = 22
Top = 383
Action = actBloqueoCliente
DataBinding.DataField = 'BLOQUEADO'
DataBinding.DataSource = dsContacto
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 = 10
Width = 163
end
object eCodigoAsignado: TcxDBTextEdit [10]
Left = 132
Top = 109
DataBinding.DataField = 'CODIGO_ASIGNADO'
DataBinding.DataSource = dsContacto
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.Color = clWindow
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 = 4
Width = 260
end
inherited cbPoblacion: TcxDBComboBox
Left = 132
Top = 494
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 15
ExplicitLeft = 132
ExplicitTop = 494
ExplicitWidth = 260
Width = 260
end
inherited eCodigoPostal: TcxDBTextEdit
Left = 436
Top = 467
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 14
ExplicitLeft = 436
ExplicitTop = 467
end
object cbFelicitacion: TcxDBCheckBox [13]
Left = 531
Top = 280
Caption = 'Mandar felicitaci'#243'n navide'#241'a a este cliente'
DataBinding.DataField = 'FELICITACION'
DataBinding.DataSource = dsContacto
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 = 26
Width = 370
end
object cxDBCheckBox1: TcxDBCheckBox [14]
Left = 531
Top = 485
Caption = 'Permitir el acceso de este cliente a la tienda web'
DataBinding.DataField = 'TIENDA_WEB'
DataBinding.DataSource = dsContacto
Properties.ImmediatePost = True
Properties.MultiLine = 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 = 28
Width = 266
end
object cbRapel: TcxDBCheckBox [15]
Left = 132
Top = 190
Caption = 'Este cliente tiene rapel'
DataBinding.DataField = 'RAPEL'
DataBinding.DataSource = dsContacto
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 = 7
OnClick = actBloqueoClienteExecute
Width = 148
end
object eMailAdministracion: TcxDBHyperLinkEdit [16]
Left = 643
Top = 382
DataBinding.DataField = 'EMAIL_ADMINISTRACION'
DataBinding.DataSource = dsContacto
Properties.OnEditValueChanged = eMailAdministracionPropertiesEditValueChanged
Properties.OnValidate = eMailAdministracionPropertiesValidate
Properties.Prefix = 'mailto:'
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 = 27
Width = 133
end
inherited eObservaciones: TcxDBMemo
Top = 632
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 29
ExplicitTop = 632
ExplicitWidth = 733
ExplicitHeight = 69
Height = 69
Width = 733
end
object cbTipoCliente: TcxDBComboBox [18]
Left = 132
Top = 163
DataBinding.DataField = 'TIPO_CLIENTE'
DataBinding.DataSource = dsContacto
Properties.ImmediatePost = True
Properties.OnInitPopup = cbTipoClientePropertiesInitPopup
Properties.OnValidate = cbTipoClientePropertiesValidate
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
Style.ButtonStyle = bts3D
Style.PopupBorderStyle = epbsFrame3D
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
Width = 332
end
object cbSEPA: TcxDBCheckBox [19]
Left = 306
Top = 190
Action = actBloqueoCliente
Caption = 'Este cliente ha aceptado SEPA'
DataBinding.DataField = 'SEPA'
DataBinding.DataSource = dsContacto
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 = 8
Width = 181
end
inline frViewDatosYSeleccionCentral1: TfrViewDatosYSeleccionCentral [20]
Left = 22
Top = 247
Width = 235
Height = 100
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 9
ReadOnly = False
ExplicitLeft = 22
ExplicitTop = 247
ExplicitWidth = 235
ExplicitHeight = 100
inherited dxLayoutControl1: TdxLayoutControl
Width = 235
Height = 65
ExplicitWidth = 235
ExplicitHeight = 65
inherited edtlNombre: TcxDBTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 591
Width = 591
end
inherited edtNIFCIF: TcxDBTextEdit
Left = 389
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 389
end
end
inherited Panel1: TPanel
Width = 235
ExplicitWidth = 235
end
end
inherited ePaginaWeb: TcxDBHyperLinkEdit [21]
Left = 643
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 25
ExplicitLeft = 643
ExplicitWidth = 209
Width = 209
end
inherited eReferencia: TcxDBTextEdit [22]
Left = 132
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 132
end
inherited ePersonaContacto: TcxDBTextEdit [23]
Left = 132
Top = 575
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 18
ExplicitLeft = 132
ExplicitTop = 575
ExplicitWidth = 260
Width = 260
end
inherited eNIFCIF: TcxDBTextEdit [24]
Left = 360
Properties.OnValidate = eNIFCIFPropertiesValidate
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 360
ExplicitWidth = 91
Width = 91
end
inherited eMailTrabajo: TcxDBHyperLinkEdit [25]
Left = 643
Properties.Prefix = 'mailto:'
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 23
ExplicitLeft = 643
ExplicitWidth = 209
Width = 209
end
inherited eMailParticular: TcxDBHyperLinkEdit [26]
Left = 643
Properties.Prefix = 'mailto:'
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 24
ExplicitLeft = 643
ExplicitWidth = 209
Width = 209
end
inherited eTlfMovil: TcxDBTextEdit [27]
Left = 643
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 21
ExplicitLeft = 643
ExplicitWidth = 238
Width = 238
end
inherited eFax: TcxDBTextEdit [28]
Left = 643
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 22
ExplicitLeft = 643
ExplicitWidth = 238
Width = 238
end
inherited eNombre: TcxDBTextEdit [29]
Left = 132
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 132
ExplicitWidth = 260
Width = 260
end
inherited eTlfParticular: TcxDBTextEdit [30]
Left = 643
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 20
ExplicitLeft = 643
ExplicitWidth = 238
Width = 238
end
inherited eTlfTrabajo: TcxDBTextEdit [31]
Left = 643
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 19
ExplicitLeft = 643
ExplicitWidth = 238
Width = 238
end
inherited cbPais: TcxDBComboBox [32]
Left = 132
Top = 521
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 16
ExplicitLeft = 132
ExplicitTop = 521
ExplicitWidth = 155
Width = 155
end
inherited cbIdioma: TcxDBLookupComboBox [33]
Left = 132
Top = 548
TabOrder = 17
ExplicitLeft = 132
ExplicitTop = 548
ExplicitWidth = 145
Width = 145
end
object eBloqueo: TcxDBTextEdit
Left = 191
Top = 383
DataBinding.DataField = 'MOTIVO_BLOQUEO'
DataBinding.DataSource = dsContacto
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 = 11
Width = 197
end
object cbGrupoCliente: TcxDBComboBox
Left = 132
Top = 136
DataBinding.DataField = 'GRUPO_CLIENTE'
DataBinding.DataSource = dsContacto
Properties.ImmediatePost = True
Properties.OnInitPopup = cbGrupoClientePropertiesInitPopup
Properties.OnValidate = cbGrupoClientePropertiesValidate
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
Style.ButtonStyle = bts3D
Style.PopupBorderStyle = epbsFrame3D
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 = 5
Width = 260
end
inherited dxLayoutControlContactoGroup_Root: TdxLayoutGroup
AutoAligns = [aaHorizontal]
AlignVert = avBottom
inherited dxLayoutControlContactoGroup9: TdxLayoutGroup
inherited dxLayoutControlContactoGroup4: TdxLayoutGroup
inherited dxLayoutControlContactoGroup1: TdxLayoutGroup
object dxLayoutControlContactoItem24: TdxLayoutItem
Caption = 'Nombre comercial:'
Control = eNombreComercial
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem22: TdxLayoutItem
Caption = 'C'#243'digo de proveedor:'
Visible = False
Control = eCodigoAsignado
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem34: TdxLayoutItem
Caption = 'Marca:'
Control = cbGrupoCliente
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem30: TdxLayoutItem
Caption = 'Tipo Cliente:'
Control = cbTipoCliente
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoGroup17: TdxLayoutGroup
ShowCaption = False
Hidden = True
LayoutDirection = ldHorizontal
ShowBorder = False
object dxLayoutControlContactoItem29: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = ' '
Control = cbRapel
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem31: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahClient
ShowCaption = False
Control = cbSEPA
ControlOptions.ShowBorder = False
end
end
end
object dxLayoutControlContactoGroup19: TdxLayoutGroup [1]
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = 'Sucursal principal'
object dxLayoutControlContactoItem32: TdxLayoutItem
Control = frViewDatosYSeleccionCentral1
ControlOptions.AutoColor = True
ControlOptions.ShowBorder = False
end
end
object dxLayoutControlContactoGroup18: TdxLayoutGroup [2]
Caption = 'Bloqueo'
LayoutDirection = ldHorizontal
object dxLayoutControlContactoItem26: TdxLayoutItem
AutoAligns = [aaVertical]
Caption = ' '
ShowCaption = False
Control = cbClienteBloqueado
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem33: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahClient
Control = eBloqueo
ControlOptions.ShowBorder = False
end
end
inherited dxLayoutControlContactoGroup3: TdxLayoutGroup
Caption = 'Domicilio fiscal'
end
end
inherited dxLayoutControlContactoGroup6: TdxLayoutGroup
inherited dxLayoutControlContactoGroup2: TdxLayoutGroup
inherited dxLayoutControlContactoItem9: TdxLayoutItem
Visible = False
end
end
object dxLayoutControlContactoGroup8: TdxLayoutGroup
Caption = 'Otros'
Visible = False
object dxLayoutControlContactoItem20: TdxLayoutItem
ShowCaption = False
Control = cbFelicitacion
ControlOptions.ShowBorder = False
end
end
object dxLayoutControlContactoGroup14: TdxLayoutGroup
Caption = 'Correo electr'#243'nico de administraci'#243'n'
object dxLayoutControlContactoItem23: TdxLayoutItem
ShowCaption = False
Control = Label2
ControlOptions.AutoColor = True
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoGroup15: TdxLayoutGroup
ShowCaption = False
Hidden = True
LayoutDirection = ldHorizontal
ShowBorder = False
object dxLayoutControlContactoItem27: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = 'Correo administrativo:'
Control = eMailAdministracion
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem28: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahRight
ShowCaption = False
Control = PngSpeedButton4
ControlOptions.ShowBorder = False
end
end
end
object dxLayoutControlContactoGroup30: TdxLayoutGroup
AutoAligns = [aaHorizontal]
AlignVert = avClient
Caption = 'Acceso a la tienda web'
object dxLayoutControlContactoItem21: TdxLayoutItem
ShowCaption = False
Control = Label1
ControlOptions.AutoColor = True
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem48: TdxLayoutItem
ShowCaption = False
Control = cxDBCheckBox1
ControlOptions.ShowBorder = False
end
end
end
end
inherited dxLayoutControlContactoGroup7: TdxLayoutGroup
inherited dxLayoutControlContactoItem8: TdxLayoutItem
ControlOptions.MinHeight = 10
end
end
end
end
inherited ActionList1: TActionList
inherited actMandarCorreoParticular: TAction
Category = 'Correos'
end
inherited actMandarCorreoTrabajo: TAction
Category = 'Correos'
end
inherited actVerPaginaWeb: TAction
Category = 'Web'
end
object actBloqueoCliente: TAction
Category = 'Bloqueo'
Caption = 'Este cliente est'#225' bloqueado'
OnExecute = actBloqueoClienteExecute
end
object actMandarCorreoAdministracion: TAction
Category = 'Correos'
OnExecute = actMandarCorreoAdministracionExecute
OnUpdate = actMandarCorreoAdministracionUpdate
end
end
end
Reference in New Issue View Git Blame Copy Permalink