inherited frViewAlbaranCliente: TfrViewAlbaranCliente Width = 903 Height = 542 OnCreate = CustomViewCreate OnDestroy = CustomViewDestroy ExplicitWidth = 903 ExplicitHeight = 542 object dxLayoutControl1: TdxLayoutControl Left = 0 Top = 0 Width = 903 Height = 542 Align = alClient ParentBackground = True TabOrder = 0 TabStop = False AutoContentSizes = [acsWidth, acsHeight] LookAndFeel = dxLayoutOfficeLookAndFeel1 ExplicitHeight = 506 DesignSize = ( 903 542) object Label1: TLabel Left = 22 Top = 491 Width = 299 Height = 26 Caption = 'Si el proveedor entrega los materiales directamente al cliente, ' + 'no se necesario asociar el albar'#225'n a un almac'#233'n.' Enabled = False WordWrap = True end object edtFechaAlbaran: TcxDBDateEdit Left = 116 Top = 84 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'FECHA_ALBARAN' DataBinding.DataSource = DADataSource Properties.ImmediatePost = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = clInfoBk Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.SkinName = '' Style.Shadow = False Style.ButtonStyle = bts3D Style.ButtonTransparency = ebtNone 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 = 2 Width = 336 end object memObservaciones: TcxDBMemo Left = 477 Top = 346 Anchors = [akLeft, akTop, akRight, akBottom] DataBinding.DataField = 'OBSERVACIONES' DataBinding.DataSource = DADataSource Properties.ScrollBars = ssVertical Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.SkinName = '' TabOrder = 22 Height = 69 Width = 403 end object eReferencia: TcxDBTextEdit Left = 116 Top = 30 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'REFERENCIA' DataBinding.DataSource = DADataSource Enabled = False Properties.ReadOnly = False Properties.ValidateOnEnter = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = clInfoBk Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.SkinName = '' StyleDisabled.Color = clMenuBar StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.TextColor = clWindowText 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 = 336 end object eCalle: TcxDBTextEdit Left = 116 Top = 271 DataBinding.DataField = 'CALLE' DataBinding.DataSource = DADataSource Enabled = False 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 = 9 Width = 336 end object eCodigoPostal: TcxDBTextEdit Left = 384 Top = 298 DataBinding.DataField = 'CODIGO_POSTAL' DataBinding.DataSource = DADataSource Enabled = False 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 = 11 Width = 65 end object ePersonaContacto: TcxDBTextEdit Left = 116 Top = 352 DataBinding.DataField = 'PERSONA_CONTACTO' DataBinding.DataSource = DADataSource 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 = 13 Width = 336 end object eTlfTrabajo: TcxDBTextEdit Left = 116 Top = 379 DataBinding.DataField = 'TELEFONO' DataBinding.DataSource = DADataSource Enabled = False 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 = 14 Width = 336 end object bElegirDireccion: TBitBtn Left = 277 Top = 406 Width = 172 Height = 23 Action = actElegirDireccion Caption = 'Elegir una direcci'#243'n de env'#237'o...' Enabled = False TabOrder = 15 end object Button1: TButton Left = 317 Top = 111 Width = 132 Height = 23 Action = actVerPedidoCli Enabled = False TabOrder = 4 end object eReferenciaPedidoCli: TcxTextEdit Left = 116 Top = 111 Anchors = [akLeft, akTop, akRight] Enabled = False Properties.ReadOnly = False Properties.ValidateOnEnter = True 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 = '' StyleDisabled.TextColor = clWindowText 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 = 198 end object cbFormaPago: TcxDBLookupComboBox Left = 116 Top = 164 DataBinding.DataField = 'ID_FORMA_PAGO' DataBinding.DataSource = DADataSource Properties.KeyFieldNames = 'ID' Properties.ListColumns = < item FieldName = 'REFERENCIA' end> Properties.ListOptions.GridLines = glNone Properties.ListOptions.ShowHeader = False Properties.ListOptions.SyncMode = True Properties.ListSource = dsFormaPago 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 = 198 end object bFormasPago: TButton Left = 317 Top = 164 Width = 132 Height = 23 Caption = 'Ver las formas de pago...' TabOrder = 6 OnClick = bFormasPagoClick end object eFechaRecepcion: TcxDBDateEdit Left = 611 Top = 295 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'FECHA_RECEPCION' DataBinding.DataSource = DADataSource Enabled = False Properties.ImmediatePost = True Properties.OnValidate = eFechaRecepcionPropertiesValidate Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = clWindow 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 = 21 Width = 265 end object cbConAlmacen: TCheckBox Left = 32 Top = 459 Width = 179 Height = 21 Caption = 'Asociar este albar'#225'n al almac'#233'n:' Enabled = False TabOrder = 16 OnClick = cbConAlmacenClick end object cbAlmacen: TcxDBLookupComboBox Left = 217 Top = 459 DataBinding.DataField = 'ID_ALMACEN' DataBinding.DataSource = DADataSource Enabled = False Properties.KeyFieldNames = 'ID' Properties.ListColumns = < item FieldName = 'NOMBRE' end> Properties.ListOptions.GridLines = glNone Properties.ListOptions.ShowHeader = False Properties.ListOptions.SyncMode = True Properties.ListSource = dsAlmacenes 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 = 17 Width = 235 end object eRefFacturaCli: TcxDBTextEdit Left = 116 Top = 220 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'REF_FACTURA' DataBinding.DataSource = DADataSource Properties.ReadOnly = False Properties.ValidateOnEnter = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = clWindow Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.SkinName = '' StyleDisabled.Color = clMenuBar StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.SkinName = '' TabOrder = 8 Width = 336 end object eFechaPrevista: TcxDBDateEdit Left = 611 Top = 241 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'FECHA_PREVISTA_ENVIO' DataBinding.DataSource = DADataSource Enabled = False Properties.ImmediatePost = True Properties.OnValidate = eFechaPrevistaPropertiesValidate Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = clWindow Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.SkinName = '' Style.Shadow = False Style.ButtonStyle = bts3D Style.ButtonTransparency = ebtNone 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 = 19 Width = 265 end object eRefCliente: TcxDBTextEdit Left = 116 Top = 57 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'REFERENCIA_CLIENTE' DataBinding.DataSource = DADataSource Enabled = False Properties.ReadOnly = False Properties.ValidateOnEnter = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = clInfoBk Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.SkinName = '' StyleDisabled.Color = clMenuBar StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.SkinName = '' TabOrder = 1 Width = 336 end object eFechaEnvio: TcxDBDateEdit Left = 611 Top = 268 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'FECHA_ENVIO' DataBinding.DataSource = DADataSource Enabled = False Properties.ImmediatePost = True Properties.OnValidate = eFechaEnvioPropertiesValidate Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = clWindow 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 = 20 Width = 265 end object cbProvincia: TcxDBComboBox Left = 116 Top = 298 DataBinding.DataField = 'PROVINCIA' DataBinding.DataSource = DADataSource Enabled = False Properties.ImmediatePost = True Properties.ImmediateUpdateText = True Properties.PostPopupValueOnTab = True Properties.OnInitPopup = cbProvinciaPropertiesInitPopup 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 = 10 Width = 235 end object cbPoblacion: TcxDBComboBox Left = 116 Top = 325 DataBinding.DataField = 'POBLACION' DataBinding.DataSource = DADataSource Enabled = False Properties.ImmediatePost = True Properties.ImmediateUpdateText = True Properties.PostPopupValueOnTab = True Properties.OnInitPopup = cbPoblacionPropertiesInitPopup 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 = 12 Width = 336 end inline frViewDatosYSeleccionClienteAlbaran1: TfrViewDatosYSeleccionClienteAlbaran Left = 477 Top = 30 Width = 406 Height = 181 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 18 ReadOnly = False ExplicitLeft = 477 ExplicitTop = 30 ExplicitWidth = 406 ExplicitHeight = 181 inherited dxLayoutControl1: TdxLayoutControl Width = 406 Height = 181 ExplicitWidth = 406 ExplicitHeight = 181 inherited edtlNombre: TcxDBTextEdit Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' ExplicitWidth = 224 Width = 224 end inherited edtNIFCIF: TcxDBTextEdit Left = 291 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 291 end inherited Button3: TBitBtn Left = 202 Top = 139 ExplicitLeft = 202 ExplicitTop = 139 end inherited edtPersonaContacto: TcxDBTextEdit Top = 110 Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' ExplicitTop = 110 ExplicitWidth = 283 Width = 283 end inherited edtDireccion: TcxMemo Style.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' ExplicitWidth = 287 ExplicitHeight = 34 Height = 34 Width = 287 end inherited Button4: TButton Left = 371 ExplicitLeft = 371 end inherited Button5: TButton Left = 371 Top = 108 ExplicitLeft = 371 ExplicitTop = 108 end end inherited dsCliente: TDADataSource Left = 352 Top = 32 end inherited ActionList1: TActionList Left = 312 Top = 32 end inherited PngImageList: TPngImageList Left = 232 Top = 32 end inherited dsAlbaran: TDADataSource Left = 272 Top = 32 end end object cbCuentaBancaria: TcxDBComboBox Left = 116 Top = 193 DataBinding.DataField = 'DATOS_BANCARIOS' DataBinding.DataSource = DADataSource Properties.DropDownListStyle = lsFixedList Properties.DropDownRows = 12 Properties.ImmediatePost = True Properties.ImmediateUpdateText = True Properties.PostPopupValueOnTab = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.HotTrack = False Style.LookAndFeel.SkinName = '' Style.ButtonStyle = bts3D Style.PopupBorderStyle = epbsFrame3D StyleDisabled.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' TabOrder = 7 Width = 184 end object dxLayoutControl1Group_Root: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Group6: TdxLayoutGroup AutoAligns = [aaVertical] AlignHorz = ahClient ShowCaption = False Hidden = True ShowBorder = False object dxLayoutControl1Group1: TdxLayoutGroup AutoAligns = [] AlignHorz = ahClient Caption = 'Datos del albar'#225'n' object dxLayoutControl1Item3: TdxLayoutItem Caption = 'Referencia:' Control = eReferencia ControlOptions.ShowBorder = False end object dxLayoutControl1Item23: TdxLayoutItem Caption = 'Ref. cliente:' Enabled = False Visible = False Control = eRefCliente ControlOptions.ShowBorder = False end object dxLayoutControl1Item2: TdxLayoutItem Caption = 'Fecha del albar'#225'n:' Control = edtFechaAlbaran ControlOptions.ShowBorder = False end object dxLayoutControl1Group5: TdxLayoutGroup Enabled = False ShowCaption = False Visible = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item7: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Ref. del pedido:' Control = eReferenciaPedidoCli ControlOptions.ShowBorder = False end object dxLayoutControl1Item5: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahRight Caption = 'Button1' ShowCaption = False Control = Button1 ControlOptions.ShowBorder = False end end end object dxLayoutControl1Group16: TdxLayoutGroup Caption = 'Forma de pago' object dxLayoutControl1Group13: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item4: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Forma de pago' Control = cbFormaPago ControlOptions.ShowBorder = False end object dxLayoutControl1Item15: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahRight ShowCaption = False Control = bFormasPago ControlOptions.ShowBorder = False end end object dxLayoutControl1Item17: TdxLayoutItem Caption = 'Cuenta bancaria:' Control = cbCuentaBancaria ControlOptions.ShowBorder = False end object dxLayoutControl1Item22: TdxLayoutItem Caption = 'Ref. factura:' Control = eRefFacturaCli ControlOptions.ShowBorder = False end end object dxLayoutControl1Group8: TdxLayoutGroup AutoAligns = [] AlignHorz = ahClient Caption = 'Direcci'#243'n de entrega' Enabled = False Visible = False object dxLayoutControl1Item8: TdxLayoutItem Caption = 'Calle:' Control = eCalle ControlOptions.ShowBorder = False end object dxLayoutControl1Group4: TdxLayoutGroup ShowCaption = False Hidden = True ShowBorder = False object dxLayoutControl1Group9: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item9: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Provincia:' Control = cbProvincia ControlOptions.ShowBorder = False end object dxLayoutControl1Item10: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahRight Caption = 'C.P.:' Control = eCodigoPostal ControlOptions.ShowBorder = False end end object dxLayoutControl1Item11: TdxLayoutItem Caption = 'Poblaci'#243'n:' Control = cbPoblacion ControlOptions.ShowBorder = False end object dxLayoutControl1Item12: TdxLayoutItem Caption = 'Pers. de contacto:' Control = ePersonaContacto ControlOptions.ShowBorder = False end object dxLayoutControl1Item13: TdxLayoutItem Caption = 'Tel'#233'fono:' Control = eTlfTrabajo ControlOptions.ShowBorder = False end object dxLayoutControl1Item14: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahRight ShowCaption = False Control = bElegirDireccion ControlOptions.ShowBorder = False end end end object dxLayoutControl1Group11: TdxLayoutGroup Caption = 'Almac'#233'n de origen' Enabled = False Visible = False object dxLayoutControl1Group10: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item19: TdxLayoutItem Offsets.Left = 10 ShowCaption = False Control = cbConAlmacen ControlOptions.AutoColor = True ControlOptions.ShowBorder = False end object dxLayoutControl1Item20: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Control = cbAlmacen ControlOptions.ShowBorder = False end end object dxLayoutControl1Item18: TdxLayoutItem Offsets.Bottom = 5 Offsets.Top = 5 ShowCaption = False Control = Label1 ControlOptions.AutoColor = True ControlOptions.ShowBorder = False end end end object dxLayoutControl1Group3: TdxLayoutGroup AutoAligns = [aaVertical] AlignHorz = ahClient ShowCaption = False Hidden = True ShowBorder = False object dxLayoutControl1Group2: TdxLayoutGroup Caption = 'Datos del cliente' object dxLayoutControl1Item1: TdxLayoutItem Caption = 'New Item' ShowCaption = False Control = frViewDatosYSeleccionClienteAlbaran1 ControlOptions.AutoColor = True ControlOptions.ShowBorder = False end end object dxLayoutControl1Group12: TdxLayoutGroup Caption = 'Fechas de envio y recepci'#243'n' Enabled = False Visible = False object dxLayoutControl1Item24: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Fecha prevista de envio:' Offsets.Left = 10 Control = eFechaPrevista ControlOptions.ShowBorder = False end object dxLayoutControl1Item21: TdxLayoutItem Caption = 'Fecha de envio:' Offsets.Left = 10 Control = eFechaEnvio ControlOptions.ShowBorder = False end object dxLayoutControl1Item16: TdxLayoutItem AutoAligns = [] AlignHorz = ahClient Caption = 'Fecha de recepci'#243'n:' Offsets.Left = 10 Control = eFechaRecepcion ControlOptions.ShowBorder = False end end object dxLayoutControl1Group7: TdxLayoutGroup AutoAligns = [aaHorizontal] AlignVert = avClient Caption = 'Observaciones' object dxLayoutControl1Item6: TdxLayoutItem AutoAligns = [aaHorizontal] AlignVert = avClient Control = memObservaciones ControlOptions.ShowBorder = False end end end end end object DADataSource: TDADataSource Left = 48 end object ActionList1: TActionList Left = 24 Top = 48 object actElegirDireccion: TAction Caption = 'Elegir una direcci'#243'n de env'#237'o...' OnExecute = actElegirDireccionExecute OnUpdate = actElegirDireccionUpdate end object actVerPedidoCli: TAction Caption = 'Ver el pedido de cliente...' OnExecute = actVerPedidoCliExecute OnUpdate = actVerPedidoCliUpdate end end object dsFormaPago: TDADataSource Left = 16 end object dsAlmacenes: TDADataSource Left = 64 Top = 192 end object dxLayoutLookAndFeelList1: TdxLayoutLookAndFeelList Left = 120 Top = 24 object dxLayoutOfficeLookAndFeel1: TdxLayoutOfficeLookAndFeel GroupOptions.CaptionOptions.Font.Charset = DEFAULT_CHARSET GroupOptions.CaptionOptions.Font.Color = clWindowText GroupOptions.CaptionOptions.Font.Height = -11 GroupOptions.CaptionOptions.Font.Name = 'Tahoma' GroupOptions.CaptionOptions.Font.Style = [fsBold] GroupOptions.CaptionOptions.TextColor = clHighlight GroupOptions.CaptionOptions.UseDefaultFont = False end end end