object fcuentas_bancarias: Tfcuentas_bancarias
  Left = 0
  Top = 0
  Caption = 'Cuentas Bancarias'
  ClientHeight = 201
  ClientWidth = 570
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 13
  object Panel7: TPanel
    Left = 0
    Top = 0
    Width = 570
    Height = 40
    Align = alTop
    TabOrder = 0
    ExplicitTop = -4
    ExplicitWidth = 445
    object btAcancelar: TButton
      Left = 221
      Top = 1
      Width = 55
      Height = 38
      Align = alLeft
      Caption = 'Cancelar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 3
      Images = BASE.listaiconos
      ParentFont = False
      TabOrder = 1
      OnClick = btAcancelarClick
    end
    object btAmodificar: TButton
      Left = 111
      Top = 1
      Width = 55
      Height = 38
      Align = alLeft
      Caption = 'Editar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 2
      Images = BASE.listaiconos
      ParentFont = False
      TabOrder = 2
      OnClick = btAmodificarClick
    end
    object btAborrar: TButton
      Left = 56
      Top = 1
      Width = 55
      Height = 38
      Align = alLeft
      Caption = 'Borrar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 1
      Images = BASE.listaiconos
      ParentFont = False
      TabOrder = 3
      OnClick = btAborrarClick
    end
    object btAnuevo: TButton
      Left = 1
      Top = 1
      Width = 55
      Height = 38
      Align = alLeft
      Caption = 'Nuevo'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 0
      Images = BASE.listaiconos
      ParentFont = False
      TabOrder = 4
      OnClick = btAnuevoClick
    end
    object btAguardar: TButton
      Left = 166
      Top = 1
      Width = 55
      Height = 38
      Align = alLeft
      Caption = 'Guardar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ImageAlignment = iaBottom
      ImageIndex = 140
      Images = BASE.listaiconos
      ParentFont = False
      TabOrder = 0
      OnClick = btAguardarClick
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 40
    Width = 570
    Height = 161
    Align = alClient
    TabOrder = 1
    ExplicitWidth = 445
    object Panel2: TPanel
      Left = 1
      Top = 1
      Width = 568
      Height = 159
      Align = alClient
      TabOrder = 0
      ExplicitWidth = 443
      object DBGrid1: TDBGrid
        Left = 1
        Top = 1
        Width = 566
        Height = 157
        Align = alClient
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Tahoma'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'id'
            Title.Caption = 'Id'
            Width = 62
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'descripcion'
            Title.Caption = 'Descripci'#243'n'
            Width = 300
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'activo'
            Title.Caption = 'Activo'
            Width = 44
            Visible = True
          end>
      end
      object Panel3: TPanel
        Left = 1
        Top = 1
        Width = 566
        Height = 157
        Align = alClient
        TabOrder = 1
        ExplicitLeft = 2
        ExplicitTop = 2
        object Panel4: TPanel
          Left = 1
          Top = 1
          Width = 564
          Height = 155
          Align = alClient
          TabOrder = 0
          object DBGrid2: TDBGrid
            Left = 1
            Top = 1
            Width = 562
            Height = 153
            Align = alClient
            DataSource = dsqcuentasbancarias
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'Tahoma'
            TitleFont.Style = []
            Columns = <
              item
                Expanded = False
                FieldName = 'banco'
                Title.Caption = 'Banco'
                Width = 215
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'cciban'
                Title.Caption = 'IBAN'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'ccentidad'
                Title.Caption = 'Entidad'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'ccoficina'
                Title.Caption = 'Oficina'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'ccdc'
                Title.Caption = 'DC'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'cccc'
                Title.Caption = 'Cuenta'
                Visible = True
              end>
          end
        end
      end
    end
  end
  object dsqcuentasbancarias: TDataSource
    DataSet = qcuentas_bancarias
    Left = 232
    Top = 96
  end
  object qaux: TFDQuery
    Connection = DM.DBagrigest
    Params = <>
    Left = 104
    Top = 72
  end
  object qcuentas_bancarias: TFDQuery
    Connection = DM.DBagrigest
    SQL.Strings = (
      'select * from cuentas_bancarias order by banco')
    Params = <>
    Left = 40
    Top = 144
    object qcuentas_bancariaside: TIntegerField
      FieldName = 'ide'
      Required = True
    end
    object qcuentas_bancariasid: TIntegerField
      FieldName = 'id'
      Required = True
    end
    object qcuentas_bancariasbanco: TWideStringField
      FieldName = 'banco'
      Required = True
      Size = 100
    end
    object qcuentas_bancariascciban: TWideStringField
      FieldName = 'cciban'
      Required = True
      Size = 8
    end
    object qcuentas_bancariasccentidad: TWideStringField
      FieldName = 'ccentidad'
      Required = True
      Size = 8
    end
    object qcuentas_bancariasccoficina: TWideStringField
      FieldName = 'ccoficina'
      Required = True
      Size = 8
    end
    object qcuentas_bancariasccdc: TWideStringField
      FieldName = 'ccdc'
      Required = True
      Size = 4
    end
    object qcuentas_bancariascccc: TWideStringField
      FieldName = 'cccc'
      Required = True
    end
  end
end