inherited frViewPresupuestosObra: TfrViewPresupuestosObra
  Width = 836
  Height = 667
  OnCreate = CustomViewCreate
  OnDestroy = CustomViewDestroy
  object dxLayoutControl1: TdxLayoutControl
    Left = 0
    Top = 0
    Width = 836
    Height = 667
    Align = alClient
    ParentBackground = True
    TabOrder = 0
    AutoContentSizes = [acsWidth, acsHeight]
    object ToolBar1: TToolBar
      Left = 22
      Top = 28
      Width = 782
      Height = 22
      AutoSize = True
      ButtonWidth = 88
      Caption = 'ToolBar1'
      EdgeBorders = []
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      Images = PngImageList
      List = True
      ParentFont = False
      ShowCaptions = True
      TabOrder = 0
      object ToolButton1: TToolButton
        Left = 0
        Top = 0
        Action = actAnadirPreObr
      end
      object ToolButton2: TToolButton
        Left = 88
        Top = 0
        Action = actEliminarPreObr
      end
      object ToolButton4: TToolButton
        Left = 176
        Top = 0
        Action = actEliminarTodoPreObr
      end
      object ToolButton3: TToolButton
        Left = 264
        Top = 0
        Width = 8
        Caption = 'ToolButton3'
        ImageIndex = 2
        Style = tbsSeparator
      end
      object ToolButton5: TToolButton
        Left = 272
        Top = 0
        Action = actEditarPreObr
      end
    end
    object ToolBar2: TToolBar
      Left = 22
      Top = 355
      Width = 782
      Height = 22
      AutoSize = True
      ButtonWidth = 88
      Caption = 'ToolBar1'
      EdgeBorders = []
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      Images = PngImageList
      List = True
      ParentFont = False
      ShowCaptions = True
      TabOrder = 2
      object ToolButton6: TToolButton
        Left = 0
        Top = 0
        Action = actAnadirPreDec
      end
      object ToolButton7: TToolButton
        Left = 88
        Top = 0
        Action = actEliminarPreDec
      end
      object ToolButton8: TToolButton
        Left = 176
        Top = 0
        Action = actEliminarTodoPreDec
      end
      object ToolButton9: TToolButton
        Left = 264
        Top = 0
        Width = 8
        Caption = 'ToolButton3'
        ImageIndex = 2
        Style = tbsSeparator
      end
      object ToolButton10: TToolButton
        Left = 272
        Top = 0
        Action = actEditarPreDec
      end
    end
    inline frViewPresupuestosPreDec: TfrViewPresupuestosBase
      Left = 22
      Top = 383
      Width = 792
      Height = 300
      Align = alClient
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      ReadOnly = False
      inherited cxGrid: TcxGrid
        Width = 792
        Height = 300
        inherited cxGridView: TcxGridDBTableView
          PopupMenu = MenuPreDec
          OnCellDblClick = frViewPresupuestosPreDeccxGridViewCellDblClick
          DataController.DataSource = DADataSourcePreDec
          DataController.Summary.FooterSummaryItems = <
            item
              Format = 'Total: 0 presupuestos de decoraci'#243'n'
              Kind = skCount
              Column = frViewPresupuestosPreDec.cxGridViewNOMBRE
            end>
          OptionsSelection.UnselectFocusedRecordOnExit = True
          OptionsView.Footer = True
          inherited cxGridViewACEPTADO: TcxGridDBColumn
            Caption = ''
            Width = 20
            IsCaptionAssigned = True
          end
          inherited cxGridViewNOMBRE: TcxGridDBColumn
            Width = 120
          end
          inherited cxGridViewPRESUPUESTOINICIAL: TcxGridDBColumn
            HeaderAlignmentHorz = taRightJustify
          end
          inherited cxGridViewPRESUPUESTOFINAL: TcxGridDBColumn
            HeaderAlignmentHorz = taRightJustify
          end
          inherited cxGridViewRETENCION: TcxGridDBColumn
            HeaderAlignmentHorz = taRightJustify
          end
          inherited cxGridViewTIEMPORETENCION: TcxGridDBColumn
            HeaderAlignmentHorz = taRightJustify
          end
          inherited cxGridViewIMPORTERETENCION: TcxGridDBColumn
            HeaderAlignmentHorz = taRightJustify
          end
        end
      end
      inherited DADataSource: TDADataSource
        Left = 560
        Top = 120
      end
      inherited ActionList1: TActionList
        Left = 528
        Top = 120
      end
      inherited dxComponentPrinter: TdxComponentPrinter
        Left = 496
        Top = 120
        inherited dxComponentPrinterLink: TdxGridReportLink
          ReportDocument.CreationDate = 38826.798064953720000000
          BuiltInReportLink = True
        end
      end
      inherited dxPSEngineController1: TdxPSEngineController
        Left = 464
        Top = 120
      end
      inherited cxStyleRepository1: TcxStyleRepository
        Left = 432
        Top = 120
      end
    end
    inline frViewPresupuestosPreObr: TfrViewPresupuestosBase
      Left = 22
      Top = 56
      Width = 792
      Height = 300
      Align = alClient
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      ReadOnly = False
      inherited cxGrid: TcxGrid
        Width = 792
        Height = 300
        inherited cxGridView: TcxGridDBTableView
          PopupMenu = MenuPreObr
          OnCellDblClick = frViewPresupuestosPreObrcxGridViewCellDblClick
          DataController.DataSource = DADataSourcePreObr
          DataController.Summary.FooterSummaryItems = <
            item
              Format = 'Total: 0 presupuestos de obra'
              Kind = skCount
              Column = frViewPresupuestosPreObr.cxGridViewNOMBRE
            end>
          OptionsView.Footer = True
          inherited cxGridViewACEPTADO: TcxGridDBColumn
            Caption = ''
            Width = 20
            IsCaptionAssigned = True
          end
          inherited cxGridViewNOMBRE: TcxGridDBColumn
            Width = 120
          end
        end
      end
      inherited dxComponentPrinter: TdxComponentPrinter
        inherited dxComponentPrinterLink: TdxGridReportLink
          ReportDocument.CreationDate = 38847.754639965280000000
          BuiltInReportLink = True
        end
      end
    end
    object dxLayoutControl1Group_Root: TdxLayoutGroup
      ShowCaption = False
      Hidden = True
      ShowBorder = False
      object dxLayoutControl1Group2: TdxLayoutGroup
        AutoAligns = [aaHorizontal]
        AlignVert = avClient
        Caption = 'Presupuestos obra'
        object dxLayoutControl1Item1: TdxLayoutItem
          Caption = 'New Item'
          ShowCaption = False
          Control = ToolBar1
          ControlOptions.ShowBorder = False
        end
        object dxLayoutControl1Item4: TdxLayoutItem
          AutoAligns = [aaHorizontal]
          AlignVert = avClient
          Control = frViewPresupuestosPreObr
          ControlOptions.AutoColor = True
          ControlOptions.ShowBorder = False
        end
      end
      object dxLayoutControl1Group1: TdxLayoutGroup
        AutoAligns = [aaHorizontal]
        AlignVert = avClient
        Caption = 'Presupuestos decoraci'#243'n'
        object dxLayoutControl1Item2: TdxLayoutItem
          Caption = 'New Item'
          ShowCaption = False
          Control = ToolBar2
          ControlOptions.AutoColor = True
          ControlOptions.ShowBorder = False
        end
        object dxLayoutControl1Item3: TdxLayoutItem
          AutoAligns = [aaHorizontal]
          AlignVert = avClient
          Control = frViewPresupuestosPreDec
          ControlOptions.AutoColor = True
          ControlOptions.ShowBorder = False
        end
      end
    end
  end
  object ActionList1: TActionList
    Images = PngImageList
    Left = 88
    Top = 80
    object actAnadirPreObr: TAction
      Caption = 'A'#241'adir'
      ImageIndex = 0
    end
    object actAnadirPreDec: TAction
      Caption = 'A'#241'adir'
      ImageIndex = 0
    end
    object actEditarPreObr: TAction
      Caption = 'Editar'
      ImageIndex = 2
      OnUpdate = actEditarPreObrUpdate
    end
    object actEditarPreDec: TAction
      Caption = 'Editar'
      ImageIndex = 2
      OnUpdate = actEditarPreDecUpdate
    end
    object actEliminarPreDec: TAction
      Caption = 'Eliminar'
      ImageIndex = 1
      OnExecute = actEliminarPreDecExecute
      OnUpdate = actEliminarPreDecUpdate
    end
    object actEliminarPreObr: TAction
      Caption = 'Eliminar'
      ImageIndex = 1
      OnExecute = actEliminarPreObrExecute
      OnUpdate = actEliminarPreObrUpdate
    end
    object actEliminarTodoPreObr: TAction
      Caption = 'Eliminar todo'
      OnExecute = actEliminarTodoPreObrExecute
      OnUpdate = actEliminarTodoPreObrUpdate
    end
    object actEliminarTodoPreDec: TAction
      Caption = 'Eliminar todo'
      OnExecute = actEliminarTodoPreDecExecute
      OnUpdate = actEliminarTodoPreDecUpdate
    end
  end
  object DADataSourcePreObr: TDADataSource
    Top = 80
  end
  object cxStyleRepository1: TcxStyleRepository
    Left = 48
    Top = 112
    object cxStyleEven: TcxStyle
    end
    object cxStyleOdd: TcxStyle
      AssignedValues = [svColor]
      Color = clInactiveCaptionText
    end
    object cxStyleSelection: TcxStyle
      AssignedValues = [svColor, svTextColor]
      Color = clHighlight
      TextColor = clHighlightText
    end
  end
  object dxPSEngineController1: TdxPSEngineController
    LookAndFeel = pslfOffice11
    UseNativeLookAndFeel = False
    Left = 88
    Top = 112
  end
  object dxComponentPrinter: TdxComponentPrinter
    CurrentLink = dxComponentPrinterLink
    PreviewOptions.EnableOptions = [peoCanChangeMargins, peoPageBackground, peoPageSetup, peoPreferences, peoPrint]
    PreviewOptions.VisibleOptions = [pvoPageBackground, pvoPageSetup, pvoPreferences, pvoPrint, pvoPrintStyles, pvoReportFileOperations, pvoPageMargins]
    PreviewOptions.WindowState = wsMaximized
    Version = 0
    Left = 120
    Top = 112
    object dxComponentPrinterLink: TdxGridReportLink
      PrinterPage.DMPaper = 9
      PrinterPage.Footer = 6350
      PrinterPage.Header = 6350
      PrinterPage.Margins.Bottom = 12700
      PrinterPage.Margins.Left = 12700
      PrinterPage.Margins.Right = 12700
      PrinterPage.Margins.Top = 12700
      PrinterPage.PageSize.X = 210000
      PrinterPage.PageSize.Y = 297000
      PrinterPage._dxMeasurementUnits_ = 0
      PrinterPage._dxLastMU_ = 2
      ReportDocument.CreationDate = 38826.675490983800000000
      OptionsCharts.Transparent = True
      OptionsFormatting.SuppressBackgroundBitmaps = True
      OptionsOnEveryPage.Caption = False
      OptionsOnEveryPage.FilterBar = False
      OptionsSize.AutoWidth = True
      OptionsView.Caption = False
      OptionsView.ExpandButtons = False
      OptionsView.FilterBar = False
      OptionsView.GroupFooters = False
      BuiltInReportLink = True
    end
  end
  object DADataSourcePreDec: TDADataSource
    Top = 248
  end
  object PngImageList: TPngImageList
    PngImages = <
      item
        PngImage.Data = {
          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
          610000000970485973000017120000171201679FD252000000E14944415478DA
          63FCFFFF3F032580717019C0C8C8086787B4DDF8FFEBD76F869F3F7F33EC6C37
          824BA05B88D300BF86CBFFA3A35419A6CFB8C870A0CF9C7403DC2BCFFD8F88D4
          66983DEB34C3B12936C41910DA7E13EE6C100E0D37609837E7180358EC0708FF
          6278B0218011A701FE8D57C0CEFEF68391E1DB770630FD1D88BF7C07E26F8C0C
          6B17AE6178B1230CB7011E55E7FF836C86B9C23FC48661C9BC5D609B7F40F187
          0331B80D400E03DDF85DFF3D039D1856CEDFCCF0706320E981A816BEF5BF8BBF
          07D8D92F7786936E80BCFFFAFF30677F3C184B9C01E480616000007F3BB6E1E0
          0AF3B40000000049454E44AE426082}
        Name = 'PngImage0'
        Background = clWindow
      end
      item
        PngImage.Data = {
          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
          610000000970485973000017120000171201679FD252000000714944415478DA
          63FCFFFF3F03258071D4002A1B10DA7E13CC01897DFDFA83E1DBB71F60FAFBB7
          9F0C9F3F7F03E3F7FBA219F11A1013A500E77FFCCCC8F0EA1D23C38BB74C0CCF
          5E3131AC9E3397E1F7E914DC0684B4DDF88FCBE62F9FBF33FCF9F397E1FFF974
          DC060C7C208E1A401E0000EFE473E127272ED00000000049454E44AE426082}
        Name = 'PngImage1'
        Background = clWindow
      end
      item
        PngImage.Data = {
          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
          610000000970485973000017120000171201679FD2520000015D4944415478DA
          63FCFFFF3F03082CDD7212C22000627C2D1891F98CC80644FB98E3D50C54C3D0
          3B6521C3F99DD3194936E0DFBF7F0CCBB79D6690161366B04C57058B715C6060
          24CA0090E6DF7FFE31ACD9759621A4D68281352A97E1F7B2C90C8B2E10E10298
          E6DFBFFF325C5DC2C1F044E912C39B4B4B19984A3AB17BC171E64DACAEE860D0
          60D0F399C2F0F2D636868587CC18A41A1A18D218F07801DD669866100E699161
          10D5F6050726411720DB0CD35CDE369B61DED24DD80DF8FDE72FD856107D6319
          1786E6ED7B4F311C387911BB01611E260C6E73EF80F9110C1F180C182C18C4D5
          BC5034830C3E7AF60A7603029D0D212E00FA7DEDAA2B0C2D2D210C6B6A9EA068
          06E15317AF6337C0C75E8F2160D92330FF4E8B0B838B4B0D985D5CE907D70CC2
          E7AFDEC26E80BBB50E5CD11FA84B60E181C0FF18AEDCBC83DD0027734D829A41
          00A701B6C66A0C9BF69C24265362370094D348012003002CB76B52FA97B19500
          00000049454E44AE426082}
        Name = 'PngImage2'
        Background = clWindow
      end>
    Left = 456
    Top = 24
    Bitmap = {}
  end
  object MenuPreObr: TPopupMenu
    Left = 432
    Top = 24
    object Modificar1: TMenuItem
      Action = actAnadirPreObr
    end
    object Duplicar1: TMenuItem
      Action = actEliminarPreObr
    end
    object Eliminar1: TMenuItem
      Action = actEliminarTodoPreObr
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Nuevo1: TMenuItem
      Action = actEditarPreObr
    end
  end
  object MenuPreDec: TPopupMenu
    Left = 392
    Top = 288
    object MenuItem1: TMenuItem
      Action = actAnadirPreDec
    end
    object MenuItem2: TMenuItem
      Action = actEliminarPreDec
    end
    object MenuItem3: TMenuItem
      Action = actEliminarTodoPreDec
    end
    object MenuItem4: TMenuItem
      Caption = '-'
    end
    object MenuItem5: TMenuItem
      Action = actEditarPreDec
    end
  end
end
