inherited frViewContenido: TfrViewContenido Width = 443 Height = 270 Align = alClient object cxGrid: TcxGrid Left = 0 Top = 25 Width = 443 Height = 245 Align = alClient TabOrder = 0 LookAndFeel.Kind = lfOffice11 LookAndFeel.NativeStyle = True object cxGridView: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DADataSource DataController.Filter.Options = [fcoCaseInsensitive] DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoSortByDisplayText, dcoFocusTopRowAfterSorting] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Format = ',0.00 '#8364';-,0.00 '#8364 Kind = skSum end> DataController.Summary.SummaryGroups = <> Filtering.Visible = fvNever OptionsBehavior.AlwaysShowEditor = True OptionsBehavior.CellHints = True OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.BestFitMaxRecordCount = 20 OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsCustomize.ColumnGrouping = False OptionsCustomize.ColumnMoving = False OptionsCustomize.ColumnSorting = False OptionsCustomize.DataRowSizing = True OptionsData.Appending = True OptionsSelection.MultiSelect = True OptionsSelection.UnselectFocusedRecordOnExit = False OptionsView.CellEndEllipsis = True OptionsView.CellAutoHeight = True OptionsView.ColumnAutoWidth = True OptionsView.Footer = True OptionsView.GridLineColor = cl3DLight OptionsView.GroupByBox = False OptionsView.HeaderEndEllipsis = True OptionsView.Indicator = True OptionsView.NewItemRowInfoText = 'Click here to add a new row' Styles.ContentEven = cxStyleEven Styles.ContentOdd = cxStyleOdd Styles.Inactive = cxStyleSelection Styles.Selection = cxStyleSelection end object cxGridLevel: TcxGridLevel GridView = cxGridView end end object ToolBar1: TToolBar Left = 0 Top = 0 Width = 443 Height = 25 Caption = 'ToolBar1' EdgeBorders = [] EdgeInner = esNone EdgeOuter = esNone Flat = True Images = ContenidoImageList List = True ShowCaptions = True TabOrder = 1 end object ActionListContenido: TActionList Left = 8 Top = 104 object actAnadir: TAction Caption = 'A'#241'adir' ImageIndex = 0 OnExecute = actAnadirExecute end object actEliminar: TAction Caption = 'Eliminar' ImageIndex = 1 OnExecute = actEliminarExecute OnUpdate = actEliminarUpdate end object actSubir: TAction Caption = 'Subir' ImageIndex = 2 OnExecute = actSubirExecute OnUpdate = actSubirUpdate end object actBajar: TAction Caption = 'Bajar' ImageIndex = 3 OnExecute = actBajarExecute OnUpdate = actBajarUpdate end end object DADataSource: TDADataSource DataTable = dmPresupuestos.tbl_DetallesPresupuestos Left = 8 Top = 136 end object ContenidoImageList: TPngImageList PngImages = < item PngImage.Data = { 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF 610000000970485973000017120000171201679FD252000000D04944415478DA 6364C0062630FCC72A5EC0C0882EC488CB80191909706EDDBA750CAF767D6260 5830240DF8F9FB3743EBE6CD780CC011602003409A7F0071EF8E1D10030C30D5 31A23B1706609AB1E23F7FC0F4FA2967B01B408CE6A3B76E815D856100319ABF FFFAC570EEC103540340218D0C92EDECE01AD79E398335ACE106305CC0942CAC 77871BB0F5E2454820620138A331D3CB09EEECBD57AF929E0E629DADC106FCF9 F70F1E602419106A67C6F01DE40260805D7AFC9874037C2C0D194EDDBD8B1260 241900A6D103178B01000648ED7B1FCA93F30000000049454E44AE426082} Name = 'PngImage0' Background = clWindow end item PngImage.Data = { 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF 610000000970485973000017120000171201679FD2520000006E4944415478DA 63FCFFFF3F03258071D40006C6397A1214990036203925952CCD73E7CCC66100 C85BBF7F32307CFDC4C0F0FD2B03C33710FD05487F46E0374F19E6FE964032E0 CF6F840120CD200D5F3F43357E42F0416C90013FBFA119B0B099742FC00CA028 10073E1D0C7D030077CE5E397DD56C480000000049454E44AE426082} Name = 'PngImage1' Background = clWindow end item PngImage.Data = { 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF 610000000970485973000017120000171201679FD252000000E14944415478DA 63FCFFFF3F032580717019C0C8C88822E9D770F9FFA6065D1441740B711A00D2 1C1DA5CA307DC64586037DE68C241900D3FCF10B23C39123CF19AE5EBECF7076 B623235106206BFEF899114C3FBAFB94E1C4D1AB0CB7567A33E235C0BFF1CAFF 9F3F7F3380B0B7BF2158F3BB8F4C0C7B36EE60F8F9E317C30F207EB1238C91A0 17AC728EFC77F234076BFEF2E631C3C1BDE7191E6E0C24CE0B20609CBAFFBFB9 A31DD0004606B6DF8F18766E3DC9F0726738F106E8C6EFFA6F68AC0617DFB8F6 30C3C783B1C41BA016BEF53FCCCF30FCF364326103C801C3C00000BEA5B3E15D 7F64240000000049454E44AE426082} Name = 'PngImage2' Background = clWindow end item PngImage.Data = { 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF 610000000970485973000017120000171201679FD252000000DF4944415478DA 63FCFFFF3F032580717019C0C8C808A643DA6E80057FFDFACDF0F327041FE833 074BA25B88D380982805869FBF18183E7E61645830EF34C3B12936C41BE0D770 F97F74942A58F39123CF19AE5EBECF7076B623F106B8579EFB1F1CAACDF0F133 23C3E58BCF18CE9FBDC57079A11B6103FC1BAFFC87F9D9DBDF10EC8247779F32 9C387A95E1E78F5F0C3F80F8C58E3046BC2E70283AF91FA6F9DD472620666460 FBFD8861E7D6930C2F77863312E505E3D4FDFFCD1DED3034131D0620A016BEF5 BF85B5368A66920C000171F795FF91351334801C300C0C00007FBCB4E1E577C7 9A0000000049454E44AE426082} Name = 'PngImage3' Background = clWindow end> Left = 8 Top = 64 Bitmap = {} end object cxStyleRepository: TcxStyleRepository Left = 8 Top = 168 object cxStyleEven: TcxStyle end object cxStyleOdd: TcxStyle AssignedValues = [svColor] Color = 16119285 end object cxStyleSelection: TcxStyle AssignedValues = [svColor, svTextColor] Color = clHighlight TextColor = clHighlightText end end end