inherited frViewMontaje: TfrViewMontaje Width = 616 Height = 271 OnCreate = CustomViewCreate OnDestroy = CustomViewDestroy ExplicitWidth = 616 ExplicitHeight = 271 object dxLayoutControlMontaje: TdxLayoutControl Left = 0 Top = 0 Width = 616 Height = 265 Align = alTop ParentBackground = True TabOrder = 0 AutoContentSizes = [acsWidth, acsHeight] DesignSize = ( 616 265) object cbSituacion: TcxDBComboBox Left = 101 Top = 28 Anchors = [] DataBinding.DataField = 'SITUACION' DataBinding.DataSource = DADataSource Properties.DropDownListStyle = lsFixedList Properties.ImmediatePost = True Properties.OnInitPopup = cbSituacionPropertiesInitPopup Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.Shadow = False Style.ButtonStyle = bts3D Style.ButtonTransparency = ebtNone Style.PopupBorderStyle = epbsFrame3D StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 0 Width = 225 end object edtFechaFin: TcxDBDateEdit Left = 101 Top = 82 Anchors = [akBottom] DataBinding.DataField = 'FECHA_FIN' DataBinding.DataSource = DADataSource Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.ButtonStyle = bts3D Style.PopupBorderStyle = epbsFrame3D StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 2 Width = 225 end inline frViewClienteMontaje: TfrViewDatosYSeleccionCliente Left = 304 Top = 28 Width = 350 Height = 212 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 3 ReadOnly = False ExplicitLeft = 304 ExplicitTop = 28 inherited dxLayoutControl1: TdxLayoutControl inherited edtlNombre: TcxDBTextEdit ExplicitWidth = 224 Width = 224 end inherited edtNIFCIF: TcxDBTextEdit ExplicitWidth = 562 Width = 562 end inherited edtCalle: TcxDBTextEdit ExplicitWidth = 562 Width = 562 end inherited edtPoblacion: TcxDBTextEdit ExplicitWidth = 177 Width = 177 end inherited edtProvincia: TcxDBTextEdit ExplicitWidth = 327 Width = 327 end inherited edtCodigoPostal: TcxDBTextEdit Left = 198 ExplicitLeft = 198 end inherited Button3: TBitBtn Left = 88 ExplicitLeft = 88 end end inherited DADataSource: TDADataSource Left = 0 Top = 48 end inherited ActionList1: TActionList Left = 0 Top = 80 end inherited PngImageList: TPngImageList Left = 0 Top = 112 end end object edtFechaInicio: TcxDBDateEdit Left = 101 Top = 55 Anchors = [akBottom] DataBinding.DataField = 'FECHA_INICIO' DataBinding.DataSource = DADataSource Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.ButtonStyle = bts3D Style.PopupBorderStyle = epbsFrame3D StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 1 Width = 160 end object dxLayoutControlMontajeGroup_Root: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControlMontajeGroup3: TdxLayoutGroup AutoAligns = [] AlignHorz = ahClient AlignVert = avClient Caption = 'New Group' ShowCaption = False Hidden = True ShowBorder = False object dxLayoutControlMontajeGroup1: TdxLayoutGroup AutoAligns = [] AlignHorz = ahClient Caption = 'Datos del montaje' object dxLayoutControlMontajeItem1: TdxLayoutItem Caption = 'Situaci'#243'n:' Control = cbSituacion ControlOptions.ShowBorder = False end object dxLayoutControlMontajeItem5: TdxLayoutItem Caption = 'Fecha de inicio:' Control = edtFechaInicio ControlOptions.ShowBorder = False end object dxLayoutControlMontajeItem3: TdxLayoutItem Caption = 'Fecha final:' Control = edtFechaFin ControlOptions.ShowBorder = False end end end object dxLayoutControlMontajeGroup2: TdxLayoutGroup AutoAligns = [] AlignHorz = ahClient Caption = 'Datos del cliente' object dxLayoutControlMontajeItem4: TdxLayoutItem Control = frViewClienteMontaje ControlOptions.AutoColor = True ControlOptions.ShowBorder = False end end end end object DADataSource: TDADataSource Left = 120 end end