inherited frViewMontaje: TfrViewMontaje Width = 750 Height = 300 Align = alClient Anchors = [] Constraints.MinHeight = 300 Constraints.MinWidth = 750 object pnlGeneral: TPanel Left = 0 Top = 0 Width = 345 Height = 105 BevelOuter = bvNone Constraints.MinWidth = 300 ParentBackground = True ParentColor = True TabOrder = 0 DesignSize = ( 345 105) object Label5: TLabel Left = 8 Top = 8 Width = 103 Height = 13 Caption = 'Datos del montaje' Font.Charset = DEFAULT_CHARSET Font.Color = clActiveCaption Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Bevel1: TBevel Left = 120 Top = 8 Width = 215 Height = 9 Anchors = [akLeft, akTop, akRight] Shape = bsBottomLine end object Label2: TLabel Left = 16 Top = 55 Width = 59 Height = 13 Caption = 'Fecha inicio:' end object Label3: TLabel Left = 16 Top = 30 Width = 47 Height = 13 Caption = 'Situaci'#243'n:' end object Label4: TLabel Left = 16 Top = 80 Width = 88 Height = 13 Caption = 'Fecha finalizaci'#243'n:' end object cbSituacion: TcxDBImageComboBox Left = 111 Top = 27 DataBinding.DataField = 'SITUACION' DataBinding.DataSource = DADataSource Properties.ImmediatePost = True Properties.Items = < item Description = 'Pendiente recepci'#243'n' Value = 'Pendiente recepci'#243'n' end item Description = 'Pendiente montaje' ImageIndex = 0 Value = 'Pendiente montaje' end item Description = 'Pendiente pago' ImageIndex = 1 Value = 'Pendiente pago' end item Description = 'Pagado y terminado' Value = 'Pagado y terminado' end> Style.Color = clInfoBk Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.NativeStyle = True TabOrder = 0 Width = 225 end object edtFechaIni: TcxDBDateEdit Left = 111 Top = 51 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'FECHAINICIO' DataBinding.DataSource = DADataSource Style.LookAndFeel.NativeStyle = True Style.Shadow = False Style.ButtonTransparency = ebtNone StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 1 Width = 225 end object edtFechaFin: TcxDBDateEdit Left = 111 Top = 75 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'FECHAFIN' DataBinding.DataSource = DADataSource Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 2 Width = 225 end end inline frViewDatosYSeleccionContacto: TfrViewDatosYSeleccionContacto Left = 356 Top = 2 Width = 391 Height = 202 Constraints.MinHeight = 202 Constraints.MinWidth = 350 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 ReadOnly = False inherited Label5: TLabel Width = 97 Caption = 'Datos del cliente' end inherited Bevel1: TBevel Left = 112 Width = 251 end inherited lblNombre: TLabel Top = 33 end inherited lblNIFCIF: TLabel Top = 59 end inherited lblCalle: TLabel Top = 85 end inherited lblPoblacion: TLabel Top = 111 end inherited lblProvincia: TLabel Top = 138 end inherited lblCodigoPostal: TLabel Top = 138 end inherited ToolBar1: TToolBar ButtonWidth = 129 Visible = False inherited ToolButton1: TToolButton Caption = 'Elegir un cliente' end inherited ToolButton3: TToolButton Left = 106 end inherited ToolButton2: TToolButton Left = 114 Caption = 'Dar de alta un cliente' end end inherited edtlNombre: TcxDBTextEdit Top = 29 StyleDisabled.TextColor = clActiveCaption end inherited edtPoblacion: TcxDBTextEdit Top = 107 StyleDisabled.TextColor = clActiveCaption end inherited edtProvincia: TcxDBTextEdit Top = 134 StyleDisabled.TextColor = clActiveCaption end inherited edtNIFCIF: TcxDBTextEdit Top = 55 StyleDisabled.TextColor = clActiveCaption end inherited edtCalle: TcxDBTextEdit Top = 81 StyleDisabled.TextColor = clActiveCaption end inherited ToolBar2: TToolBar Left = 187 Top = 161 Width = 182 ButtonWidth = 178 inherited ToolButton4: TToolButton Caption = 'Ver ficha completa del cliente...' end end inherited edtCodigoPostal: TcxDBTextEdit Top = 134 StyleDisabled.TextColor = clActiveCaption end inherited DADataSource: TDADataSource Left = 72 Top = 40 end end inline frViewPresupuestoMontaje: TfrViewPresupuestoMontaje Left = 0 Top = 105 Width = 360 Height = 90 Constraints.MinHeight = 90 Constraints.MinWidth = 360 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 2 ReadOnly = False end object DADataSource: TDADataSource Left = 64 Top = 8 end end