inherited frViewCliente: TfrViewCliente Width = 967 Height = 717 OnCreate = CustomViewCreate OnDestroy = CustomViewDestroy OnShow = CustomViewShow ExplicitWidth = 967 ExplicitHeight = 717 inherited dxLayoutControlContacto: TdxLayoutControl Width = 967 Height = 717 ExplicitWidth = 967 ExplicitHeight = 717 inherited PngSpeedButton1: TPngSpeedButton Left = 922 ExplicitLeft = 922 end inherited PngSpeedButton2: TPngSpeedButton Left = 922 ExplicitLeft = 922 end inherited PngSpeedButton3: TPngSpeedButton Left = 922 ExplicitLeft = 922 end inherited eCalle: TcxDBTextEdit Left = 132 Top = 193 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 6 ExplicitLeft = 132 ExplicitTop = 193 ExplicitWidth = 181 Width = 181 end inherited cbProvincia: TcxDBComboBox Left = 132 Top = 220 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 7 ExplicitLeft = 132 ExplicitTop = 220 ExplicitWidth = 121 Width = 121 end inherited cbPoblacion: TcxDBComboBox Left = 132 Top = 247 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 9 ExplicitLeft = 132 ExplicitTop = 247 ExplicitWidth = 213 Width = 213 end inherited eCodigoPostal: TcxDBTextEdit Left = 437 Top = 220 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 8 ExplicitLeft = 437 ExplicitTop = 220 end inherited eTlfParticular: TcxDBTextEdit Left = 618 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 14 ExplicitLeft = 618 ExplicitWidth = 233 Width = 233 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 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 = 143 end inherited eTlfTrabajo: TcxDBTextEdit Left = 618 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 13 ExplicitLeft = 618 ExplicitWidth = 233 Width = 233 end object eCodigoAsignado: TcxDBTextEdit [10] Left = 132 Top = 109 DataBinding.DataField = 'CODIGO_ASIGNADO' DataBinding.DataSource = dsContacto Enabled = False Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = clWindow 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 = 4 Width = 227 end object cbProcedenciaCliente: TcxDBComboBox [11] Left = 132 Top = 136 DataBinding.DataField = 'PROCEDENCIA_CLIENTE' DataBinding.DataSource = dsContacto Properties.ImmediatePost = True Properties.OnInitPopup = cbProcedenciaClientePropertiesInitPopup Properties.OnValidate = cbProcedenciaClientePropertiesValidate Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.SkinName = '' Style.ButtonStyle = bts3D Style.PopupBorderStyle = epbsFrame3D 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 = 211 end inherited eTlfMovil: TcxDBTextEdit Left = 618 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 15 ExplicitLeft = 618 ExplicitWidth = 233 Width = 233 end inherited eFax: TcxDBTextEdit Left = 618 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 16 ExplicitLeft = 618 ExplicitWidth = 233 Width = 233 end inherited eNombre: TcxDBTextEdit Left = 132 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 132 ExplicitWidth = 135 Width = 135 end inherited eNIFCIF: TcxDBTextEdit Left = 346 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 346 ExplicitWidth = 59 Width = 59 end inherited eMailTrabajo: TcxDBHyperLinkEdit Left = 618 Properties.Prefix = 'mailto:' Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 17 ExplicitLeft = 618 ExplicitWidth = 204 Width = 204 end inherited eMailParticular: TcxDBHyperLinkEdit Left = 618 Properties.Prefix = 'mailto:' Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 18 ExplicitLeft = 618 ExplicitWidth = 204 Width = 204 end inherited ePaginaWeb: TcxDBHyperLinkEdit Left = 618 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 19 ExplicitLeft = 618 ExplicitWidth = 204 Width = 204 end inherited eReferencia: TcxDBTextEdit Left = 132 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 132 ExplicitWidth = 38 Width = 38 end inherited ePersonaContacto: TcxDBTextEdit Left = 132 Top = 301 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 11 ExplicitLeft = 132 ExplicitTop = 301 ExplicitWidth = 256 Width = 256 end inherited frViewTienda1: TfrViewTienda Left = 523 Width = 270 AutoSize = True TabOrder = 20 ExplicitLeft = 523 ExplicitWidth = 270 inherited dxLayoutControl1: TdxLayoutControl Width = 270 ExplicitWidth = 270 inherited cbTienda: TcxComboBox Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' ExplicitWidth = 376 Width = 376 end end end inherited frViewObservaciones1: TfrViewObservaciones Top = 385 Width = 585 Height = 127 TabOrder = 21 ExplicitTop = 385 ExplicitWidth = 585 ExplicitHeight = 127 inherited memObservaciones: TcxDBMemo DataBinding.DataSource = dsContacto ExplicitWidth = 585 ExplicitHeight = 127 Height = 127 Width = 585 end end inherited cbPais: TcxDBComboBox Left = 132 Top = 274 Enabled = True Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 10 ExplicitLeft = 132 ExplicitTop = 274 ExplicitWidth = 256 Width = 256 end inherited cbIdioma: TcxDBLookupComboBox Left = 132 Top = 328 Enabled = True 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 = 12 ExplicitLeft = 132 ExplicitTop = 328 ExplicitWidth = 256 Width = 256 end inherited dxLayoutControlContactoGroup_Root: TdxLayoutGroup AutoAligns = [aaHorizontal] inherited dxLayoutControlContactoGroup9: TdxLayoutGroup inherited dxLayoutControlContactoGroup4: TdxLayoutGroup inherited dxLayoutControlContactoGroup1: TdxLayoutGroup inherited dxLayoutControlContactoItem13: TdxLayoutItem Caption = 'Nombre fiscal:' end object dxLayoutControlContactoItem24: TdxLayoutItem Caption = 'Nombre comercial:' Control = eNombreComercial ControlOptions.ShowBorder = False end object dxLayoutControlContactoItem22: TdxLayoutItem Caption = 'C'#243'digo de proveedor:' Enabled = False Visible = False Control = eCodigoAsignado ControlOptions.ShowBorder = False end object dxLayoutControlContactoItem23: TdxLayoutItem Caption = 'Procedencia cliente:' Control = cbProcedenciaCliente ControlOptions.ShowBorder = False end end inherited dxLayoutControlContactoGroup3: TdxLayoutGroup Caption = 'Domicilio' inherited dxLayoutControlContactoItem19: TdxLayoutItem Enabled = True Visible = True end inherited dxLayoutControlContactoItem20: TdxLayoutItem Enabled = True Visible = True end end end inherited dxLayoutControlContactoGroup6: TdxLayoutGroup inherited dxLayoutControlContactoGroup100: TdxLayoutGroup Caption = 'El cliente pertenece a la tienda' end end end inherited dxLayoutControlContactoGroup7: TdxLayoutGroup inherited dxLayoutControlContactoItem8: TdxLayoutItem AutoAligns = [aaHorizontal] end end end end inherited dsContacto: TDADataSource Top = 144 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' end end end