object frImprimirBeneficiosAnualesContratos: TfrImprimirBeneficiosAnualesContratos Tag = 6 Left = 0 Top = 0 Width = 668 Height = 130 Color = 16383743 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 0 object pnlTitulo: TRdxPanelTituloOperacion Left = 0 Top = 0 Width = 668 Height = 22 Caption = ' ' Color = 12111795 Align = alTop Font.Charset = DEFAULT_CHARSET Font.Color = 16640 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] end object pnlVistaPrevia: TPanel Left = 0 Top = 113 Width = 668 Height = 17 Align = alClient BevelOuter = bvNone Color = 16383743 TabOrder = 0 end object pnlCuerpo: TPanel Left = 0 Top = 22 Width = 668 Height = 91 Align = alTop AutoSize = True BevelOuter = bvNone BorderWidth = 10 Caption = 'pnlCuerpo' ParentColor = True TabOrder = 1 object pnlInforme: TAdvPanel Left = 10 Top = 10 Width = 648 Height = 71 Align = alTop BevelOuter = bvNone Color = 16383743 TabOrder = 0 UseDockManager = True Version = '1.5.0.0' AnchorHint = False AutoSize.Enabled = False AutoSize.Height = True AutoSize.Width = True AutoHideChildren = True BackgroundPosition = bpTopLeft BorderColor = clBlack BorderShadow = False Buffered = True CanMove = False CanSize = False Caption.Background.Data = { 72010000424D7201000000000000760000002800000014000000150000000100 040000000000FC000000E30E0000E30E00001000000010000000B5BDC600F9FE FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111 1111111100001111111111111111111100001111111111111111111100001111 1111111111110000000011111111111111111111000011111111111111111111 0000111111111111111111110000111111111111111111110000111111111111 1111111100001111111111111111111100001111111111111111111100001111 1111111111111111000011111111111111111111000011111111111111111111 0000111111111111111111110000111111111111111111110000111111111111 1111111100001111111111111111111100001111111111111111111100001111 11111111111111110000111111111111111111110000} Caption.ButtonPosition = cbpLeft Caption.Color = clBtnFace Caption.ColorTo = clNone Caption.CloseColor = clBtnFace Caption.CloseButton = False Caption.CloseButtonColor = clBlack Caption.Flat = True Caption.Font.Charset = DEFAULT_CHARSET Caption.Font.Color = 16640 Caption.Font.Height = -11 Caption.Font.Name = 'Tahoma' Caption.Font.Style = [fsBold] Caption.Height = 23 Caption.Indent = -4 Caption.MinMaxButton = True Caption.MinMaxButtonColor = 16640 Caption.ShadeLight = 200 Caption.ShadeGrain = 0 Caption.ShadeType = stBitmapRStretch Caption.Shape = csRectangle Caption.Text = 'Datos del informe' Caption.TopIndent = 0 Caption.Visible = True Collaps = False CollapsColor = clWhite CollapsDelay = 20 CollapsSteps = 0 ColorTo = clNone FixedTop = False FixedLeft = False FixedHeight = False FixedWidth = False FreeOnClose = False Hover = False HoverColor = clNone HoverFontColor = clNone Indent = 0 LineSpacing = 0 Position.Save = False Position.Location = clRegistry ShadowColor = clGray ShadowOffset = 2 ShowMoveCursor = False TextVAlign = tvaTop TopIndent = 0 URLColor = clBlue FullHeight = 38 object eAno: TLabel Left = 126 Top = 38 Width = 23 Height = 13 Alignment = taRightJustify Caption = 'A'#241'o:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object cbxAno: TcxComboBox Left = 156 Top = 34 Width = 125 Height = 21 Properties.DropDownListStyle = lsFixedList Properties.OnChange = cbxAnoChange Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro StyleDisabled.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro StyleFocused.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro StyleHot.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro TabOrder = 0 end end end object dsAno: TDataSource DataSet = TablaFacturasClienteAno Left = 16 Top = 56 end object TablaFacturasClienteAno: TIBQuery BufferChunks = 1000 CachedUpdates = False SQL.Strings = ( 'select distinct(extract(year from fechacontrato)) as ANO' 'from contratoscliente') Left = 48 Top = 56 end end