object FBimestre: TFBimestre
  Left = 195
  Top = 55
  Caption = 'Aportaciones Voluntarias'
  ClientHeight = 497
  ClientWidth = 908
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesigned
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 19
  object PBim: TPanel
    Left = 0
    Top = 0
    Width = 908
    Height = 161
    Align = alTop
    TabOrder = 0
    DesignSize = (
      908
      161)
    object Label1: TLabel
      Left = 24
      Top = 88
      Width = 131
      Height = 19
      Caption = 'Elegir Bimestre:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 232
      Top = 88
      Width = 90
      Height = 19
      Caption = 'Elegir A'#241'o:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 424
      Top = 88
      Width = 123
      Height = 19
      Caption = 'Observaciones:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object JvDBComboBox1: TJvDBComboBox
      Left = 24
      Top = 113
      Width = 177
      Height = 27
      DataField = 'Bimestre'
      DataSource = DSBimestres
      Items.Strings = (
        '1er Bimestre'
        '2do. Bimestre'
        '3er. Bimestre'
        '4to. Bimestre'
        '5to. Bimestre'
        '6to. Bimestre')
      TabOrder = 0
      Values.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5'
        '6')
      ListSettings.OutfilteredValueFont.Charset = DEFAULT_CHARSET
      ListSettings.OutfilteredValueFont.Color = clRed
      ListSettings.OutfilteredValueFont.Height = -11
      ListSettings.OutfilteredValueFont.Name = 'Tahoma'
      ListSettings.OutfilteredValueFont.Style = []
    end
    object JvDBComboBox2: TJvDBComboBox
      Left = 232
      Top = 113
      Width = 145
      Height = 27
      DataField = 'Anio'
      DataSource = DSBimestres
      Items.Strings = (
        '2016'
        '2017'
        '2018'
        '2019'
        '2020'
        '2021'
        '2022'
        '2023'
        '2024'
        '2025')
      TabOrder = 1
      Values.Strings = (
        '2016'
        '2017'
        '2018'
        '2019'
        '2020'
        '2021'
        '2022'
        '2023'
        '2024'
        '2025')
      ListSettings.OutfilteredValueFont.Charset = DEFAULT_CHARSET
      ListSettings.OutfilteredValueFont.Color = clRed
      ListSettings.OutfilteredValueFont.Height = -11
      ListSettings.OutfilteredValueFont.Name = 'Tahoma'
      ListSettings.OutfilteredValueFont.Style = []
    end
    object DBEdit1: TDBEdit
      Left = 424
      Top = 113
      Width = 450
      Height = 27
      Anchors = [akLeft, akTop, akRight]
      DataField = 'Observaciones'
      DataSource = DSBimestres
      TabOrder = 2
    end
    object BtnNuevo: TBitBtn
      Tag = 5
      Left = 17
      Top = 2
      Width = 76
      Height = 61
      Caption = '&Nuevo'
      Glyph.Data = {
        [encoded data, 12352 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
      Layout = blGlyphTop
      NumGlyphs = 2
      TabOrder = 3
      OnClick = btnPrimeroClick
    end
    object BtnEditar: TBitBtn
      Tag = 6
      Left = 92
      Top = 2
      Width = 76
      Height = 61
      Caption = 'Editar'
      Glyph.Data = {
        [encoded data, 12352 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
      Layout = blGlyphTop
      NumGlyphs = 2
      TabOrder = 4
      OnClick = BtnEditarClick
    end
    object BtnGuardar: TBitBtn
      Tag = 8
      Left = 259
      Top = 2
      Width = 70
      Height = 61
      Caption = 'Guardar'
      Enabled = False
      Glyph.Data = {
        [encoded data, 12352 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
      Layout = blGlyphTop
      NumGlyphs = 2
      TabOrder = 5
      OnClick = BtnGuardarClick
    end
    object BtnCancelar: TBitBtn
      Tag = 9
      Left = 329
      Top = 2
      Width = 69
      Height = 61
      Caption = 'Cancelar'
      Enabled = False
      Glyph.Data = {
        [encoded data, 12352 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
      Layout = blGlyphTop
      NumGlyphs = 2
      TabOrder = 6
      OnClick = BtnCancelarClick
    end
    object BtnEliminar: TBitBtn
      Tag = 7
      Left = 167
      Top = 2
      Width = 75
      Height = 61
      Caption = 'Eliminar'
      Glyph.Data = {
        [encoded data, 12352 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
      Layout = blGlyphTop
      NumGlyphs = 2
      TabOrder = 7
      Visible = False
      OnClick = BtnEliminarClick
    end
    object btnBuscar: TBitBtn
      Left = 472
      Top = 2
      Width = 68
      Height = 61
      Caption = 'Buscar'
      Glyph.Data = {
        [encoded data, 12352 characters]
        F5FBF7F5FBF7F5FBF7F5FBF7F5FBF7F5FBF7F5FBF7F5FBF7F5FB}
      Layout = blGlyphTop
      NumGlyphs = 2
      TabOrder = 8
      OnClick = btnBuscarClick
    end
    object BitBtn2: TBitBtn
      Left = 834
      Top = 2
      Width = 69
      Height = 61
      Anchors = [akTop, akRight]
      Caption = '&Cerrar'
      Glyph.Data = {
        [encoded data, 6208 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
      Layout = blGlyphTop
      TabOrder = 9
      OnClick = BitBtn2Click
    end
  end
  object PNodos: TPanel
    Left = 0
    Top = 161
    Width = 908
    Height = 336
    Align = alClient
    TabOrder = 1
    object Panel1: TPanel
      Left = 1
      Top = 1
      Width = 906
      Height = 56
      Align = alTop
      TabOrder = 0
      DesignSize = (
        906
        56)
      object Label4: TLabel
        Left = 421
        Top = 6
        Width = 140
        Height = 19
        Caption = 'Fecha de Emisi'#243'n'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object BitBtn1: TBitBtn
        Left = 13
        Top = 5
        Width = 158
        Height = 45
        Caption = 'Cargar Excel...'
        Glyph.Data = {
          [encoded data, 8320 characters]
          FF7FFF7FFF7F}
        NumGlyphs = 2
        TabOrder = 0
        OnClick = BitBtn1Click
      end
      object BitBtn4: TBitBtn
        Left = 704
        Top = 5
        Width = 197
        Height = 45
        Anchors = [akTop, akRight]
        Caption = 'Crear Ap. Voluntarias'
        Glyph.Data = {
          [encoded data, 12352 characters]
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
        NumGlyphs = 2
        TabOrder = 1
        OnClick = BitBtn4Click
      end
      object FechaEm: TDateTimePicker
        Left = 421
        Top = 24
        Width = 174
        Height = 27
        Date = 43356.000000000000000000
        Time = 0.603632835649477800
        TabOrder = 2
      end
      object BitBtn5: TBitBtn
        Left = 172
        Top = 5
        Width = 212
        Height = 45
        Caption = 'Eliminar Aportaciones'
        Glyph.Data = {
          [encoded data, 6208 characters]
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
        TabOrder = 3
        OnClick = BitBtn5Click
      end
    end
    object DBGrid1: TDBGrid
      Left = 1
      Top = 57
      Width = 906
      Height = 278
      Align = alClient
      DataSource = DSNodos
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -16
      TitleFont.Name = 'Tahoma'
      TitleFont.Style = [fsBold]
      Columns = <
        item
          Expanded = False
          FieldName = 'NumEmp'
          Title.Caption = 'N'#250'mero de Empleado'
          Width = 222
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Ahorro_ST'
          Title.Caption = 'Aportaci'#243'n Voluntaria'
          Width = 257
          Visible = True
        end>
    end
  end
  object TBimestres: TADOTable
    Connection = dm.Conector
    CursorType = ctStatic
    AfterScroll = TBimestresAfterScroll
    TableName = 'Bimestres'
    Left = 672
    Top = 8
  end
  object DSBimestres: TDataSource
    DataSet = TBimestres
    OnStateChange = DSBimestresStateChange
    Left = 344
    Top = 64
  end
  object DSNodos: TDataSource
    DataSet = TNodos
    Left = 392
    Top = 90
  end
  object QEmpleados: TADOQuery
    Connection = dm.Conector
    Parameters = <>
    SQL.Strings = (
      'Select * from Empleados')
    Left = 657
    Top = 66
  end
  object QConsultas: TADOQuery
    Connection = dm.Conector
    Parameters = <>
    Left = 440
    Top = 24
  end
  object QTools: TADOQuery
    Connection = dm.Conector
    Parameters = <>
    Left = 712
    Top = 64
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = 'xlsx'
    Filter = 'Hoja de Excel|*.xlsx'
    Left = 600
    Top = 8
  end
  object Timporta: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableDirect = True
    Left = 544
    Top = 40
  end
  object ADOConnection1: TADOConnection
    LoginPrompt = False
    Left = 576
    Top = 40
  end
  object TEncabezado: TADOTable
    Connection = dm.Conector
    CursorType = ctStatic
    TableName = 'encabezado'
    Left = 768
    Top = 64
  end
  object DSNodosBim: TDataSource
    DataSet = TNodosBim
    Left = 528
    Top = 64
  end
  object TNodosBim: TADOTable
    Connection = dm.Conector
    TableName = 'EmpleadosBim'
    Left = 632
    Top = 40
  end
  object TNodos: TADOTable
    Connection = dm.Conector
    CursorType = ctStatic
    TableName = 'EmpleadosBim'
    Left = 592
    Top = 64
  end
  object Guardar: TSaveDialog
    DefaultExt = 'txt'
    Filter = 'Archivo de texto|*.txt'
    Left = 625
    Top = 34
  end
  object DSQTools: TDataSource
    DataSet = QTools
    Left = 736
    Top = 32
  end
end
