object EDITORTABLA: TEDITORTABLA
  Left = -4
  Top = 132
  Width = 641
  Height = 482
  Caption = 'Edici�n de la Tabla de Productos (Base de Datos)'
  Font.Color = clWindowText
  Font.Height = -10
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  WindowState = wsMaximized
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel5431: TPanel
    Left = 8
    Top = 8
    Width = 617
    Height = 441
    BevelInner = bvLowered
    BevelWidth = 2
    BorderWidth = 1
    BorderStyle = bsSingle
    DragMode = dmAutomatic
    TabOrder = 0
    object Label50: TLabel
      Left = 40
      Top = 24
      Width = 57
      Height = 49
      Hint = 'Se desplaza al primer registro'
      Alignment = taCenter
      Caption = 'Primero'
      Font.Color = clRed
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      Transparent = True
    end
    object Label51: TLabel
      Left = 96
      Top = 24
      Width = 57
      Height = 49
      Hint = 'Se desplaza al registro anterior'
      Alignment = taCenter
      Caption = 'Anterior'
      Font.Color = clRed
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      Transparent = True
    end
    object Label52: TLabel
      Left = 152
      Top = 24
      Width = 65
      Height = 49
      Hint = 'Se desplaza al siguiente registro'
      Alignment = taCenter
      Caption = 'Siguiente'
      Font.Color = clRed
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      Transparent = True
    end
    object Label53: TLabel
      Left = 216
      Top = 24
      Width = 57
      Height = 49
      Hint = 'Se desplaza al �ltimo registro'
      Alignment = taCenter
      Caption = '�ltimo'
      Color = clMaroon
      Font.Color = clRed
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      Transparent = True
    end
    object Label54: TLabel
      Left = 272
      Top = 24
      Width = 57
      Height = 49
      Hint = 'Inserta un nuevo registro vac�o'
      Alignment = taCenter
      Caption = 'Nuevo'
      Font.Color = clRed
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      Transparent = True
    end
    object Label55: TLabel
      Left = 328
      Top = 24
      Width = 57
      Height = 49
      Hint = 'Borra el registro actual'
      Alignment = taCenter
      Caption = 'Borrar'
      Font.Color = clRed
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      Transparent = True
    end
    object Label56: TLabel
      Left = 384
      Top = 24
      Width = 65
      Height = 49
      Hint = 'Grabar el registro'
      Alignment = taCenter
      Caption = 'Grabar'
      Font.Color = clRed
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      Transparent = True
    end
    object Label57: TLabel
      Left = 504
      Top = 24
      Width = 57
      Height = 49
      Hint = 'Actualiza los datos'
      Alignment = taCenter
      Caption = 'Actualizar'
      Font.Color = clRed
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      Transparent = True
    end
    object Label3: TLabel
      Left = 448
      Top = 24
      Width = 57
      Height = 49
      Hint = 'Cancelar'
      Caption = 'Cancelar'
      Font.Color = clRed
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object Speed1: TSpeedButton
      Left = 552
      Top = 176
      Width = 41
      Height = 41
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000000000000000000000000001000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFF0
        0000000FFFFFFFFFFFFFFFFFFFFFFFF0BFBFBF00FFFFFFFFFFFFFFFFFFFFFFF0
        FBFBFB0B0FFFFFFFFFFFFFFFFFFFFFF0BFBFBF0BB0FFFFFFFFFFFFFFFFFFFFF0
        FBFBFB0BB07FFFFFFFFFFFFFFFFFFFF00000000BB077FFFFFFFFFFFFFFFFFFFF
        0BBBBBB0B077FFFFFFFFFFFFFFFFFFF00000000B0077FFFFFFFFFFFFFFFFFFF0
        FBFBFB00B077FFFFFFFFFFFFFFFFFFF0BFBFBF0B0FF7FFFFFFFFFFFFFFFFFFF0
        FBFBFB0BB07FFFFFFFFFFFFFFFFFFFF0BFBFBFB0B077FFFFFFFFFFFFFFFFFFF0
        FBFBFBF0B077FFFFFFFFFFFFFFFFFFFF0FBFBFBF0077FFFFFFFFFFFFFFFFFFFF
        0BFBFBFBF0777FFFFFFFFFFFFFFFFFFFF0BFBFBFBF0777FFFFFFFFFF0000000F
        FF0BFBFBFB00777FFFFFFFFF0FBFBF0FFFF0BFBFBFB00777FFFFFFFF0BFBFB0F
        FFFF0BFBFBF0B077FFFFFFFF0FBFBF0FFFFF0FBFBFB0B077FFFFFFFF0BFBFB0F
        FFFF0BFBFBF0BB077FFFFFFF0FBFBFB0FFF0BFBFBFB0BB077FFFFFFF0BFBFBFB
        000BFBFBFBF0BB077FFFFFFFF0BFBFBFBFBFBFBFBF0BBB077FFFFFFFF0FBFBFB
        FBFBFBFBFB0BBB077FFFFFFFFF0FBFBFBFBFBFBFB0BBBB077FFFFFFFFFF0FBFB
        FBFBFBFB0BBBB077FFFFFFFFFFFF00BFBFBFBF00BBBBB077FFFFFFFFFFFFF000
        000000BBBBBB077FFFFFFFFFFFFFFF0BBBBBBBBBBBB077FFFFFFFFFFFFFFFFF0
        0BBBBBBBB0077FFFFFFFFFFFFFFFFFFFF0000000077FFFFFFFFF}
      OnClick = Speed1Click
    end
    object DBNavigator2: TDBNavigator
      Left = 40
      Top = 40
      Width = 522
      Height = 25
      DataSource = DataSource1
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbPost, nbCancel, nbRefresh]
      TabOrder = 0
      OnClick = DBNavigator2Click
    end
    object Panel1: TPanel
      Left = 80
      Top = 88
      Width = 449
      Height = 201
      BevelInner = bvLowered
      BevelWidth = 2
      BorderStyle = bsSingle
      DragMode = dmAutomatic
      TabOrder = 1
      object Label2: TLabel
        Left = 24
        Top = 16
        Width = 49
        Height = 13
        Caption = 'C�digo:'
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 24
        Top = 144
        Width = 33
        Height = 13
        Caption = 'Precio:'
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label1: TLabel
        Left = 24
        Top = 76
        Width = 59
        Height = 13
        Caption = 'Descripci�n:'
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object DBEdit1: TDBEdit
        Left = 24
        Top = 32
        Width = 97
        Height = 24
        Hint = 'Introduzca el N�mero de C�digo'
        DataField = 'Codigo'
        DataSource = DataSource1
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'System'
        Font.Style = [fsBold]
        MaxLength = 0
        ParentFont = False
        ParentShowHint = False
        ReadOnly = True
        ShowHint = True
        TabOrder = 0
        OnEnter = DBEdit1Enter
        OnExit = DBEdit1Exit
        OnKeyPress = DBEdit1KeyPress
      end
      object DBEdit3: TDBEdit
        Left = 24
        Top = 160
        Width = 97
        Height = 24
        Hint = 'Introduzca el Precio del Producto'
        DataField = 'Precio'
        DataSource = DataSource1
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'System'
        Font.Style = [fsBold]
        MaxLength = 0
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnEnter = DBEdit1Enter
        OnExit = DBEdit1Exit
        OnKeyPress = DBEdit3KeyPress
      end
      object DBEdit2: TDBEdit
        Left = 24
        Top = 97
        Width = 401
        Height = 24
        Hint = 'Introduzca la Descripci�n del Producto'
        DataField = 'Descripcion'
        DataSource = DataSource1
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'System'
        Font.Style = [fsBold]
        MaxLength = 30
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnEnter = DBEdit1Enter
        OnExit = DBEdit1Exit
        OnKeyPress = DBEdit2KeyPress
      end
    end
    object BitBtnFRAN: TBitBtn
      Left = 16
      Top = 168
      Width = 41
      Height = 41
      Hint = 'Volver al Men�'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = BitBtnFRANClick
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000000000000000000000000001000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777777777777777777777777777777777777777777777
        777777777777777777777777777777731444444E131313131377777777FFFF71
        F4444EE9F9F9F13131777777777777739B44449B9B9B9B9B93777FFFF7777771
        F9CCC4F931F939F9F1777777777777739B9CCC4B139B139B9377777777744471
        F9F4CCC431F931F9F1777777774CCC439BA44CCE139B139B9377744774CCCCC4
        4AA4CCE931F931F9F17774444CCCCCCCAAA3339B139B139B93777E4444CEECCA
        AA4BBB3931F931F9F17777E44EE77ECCA4CCBB3B9B9B9B9B9377777EEE7777EC
        4CCCE38444443339F177777777777774CCCE0AACCCCCBB3B937777777777774C
        CCEAAACCCCCCBBB3F1777777777774CCCECAACCCEEEEBB3B9377777777777ECC
        CCECCCCE313133F9F1777111111117ECCCCECCE31313139B937771999999997E
        CCCCCCB1313131F9F177719999999973ECCCCBBB1313139B937771999FF99971
        FEECBBBBB13131F9F177719999FF99739B888B3B3313139B9377719FFFFFF971
        F9888833313131F9F177719999FF99739B44444444139B9B937771999FF99971
        F9CCCCCCCCF9F9F9F1777199999999739BEECCCCEE9B9B9B9377779999999971
        F9F9CCCEF9F9F131317777777777777313131313131313131377777777777777
        7777777777777777777777777777777777777777777777777777}
    end
    object DBGrid2: TDBGrid
      Left = 16
      Top = 304
      Width = 577
      Height = 117
      Color = clBtnFace
      Columns = <
        item
          FieldName = 'Codigo'
          Width = 70
        end
        item
          FieldName = 'Descripcion'
          Width = 292
        end
        item
          FieldName = 'Precio'
          Width = 71
        end>
      DataSource = DataSource1
      DragMode = dmAutomatic
      Font.Color = clWindowText
      Font.Height = -10
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
      TitleFont.Color = clNavy
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Visible = False
    end
    object CANCELAR: TButton
      Left = 472
      Top = 376
      Width = 97
      Height = 33
      Hint = 'Ocultar la Lista de C�digos'
      Caption = '&Ocultar la Lista'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      Visible = False
      OnClick = CANCELARClick
    end
    object Botonver: TButton
      Left = 472
      Top = 376
      Width = 97
      Height = 33
      Hint = 'Ver Lista de C�digos'
      Caption = '&Ver Lista C�digos'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      OnClick = BotonverClick
    end
    object Memo10: TMemo
      Left = 16
      Top = 304
      Width = 577
      Height = 121
      DragMode = dmAutomatic
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = 'Arial'
      Font.Style = []
      Lines.Strings = (
        
          'Escriba el N�mero de C�digo,  el Precio  y  la  Descripci�n del ' +
          'producto.'
        
          'Estos datos le servir�n para poder utilizar las Opciones: Sumar ' +
          'datos y Ventas Diarias,'
        
          'ambas opciones se encuentran situadas en la Pantalla Principal: ' +
          '"Men� de Opciones".'
        'C�digo = 10 d�gitos.'
        'Descripci�n = 30 caracteres.'
        'Precio = 10 d�gitos.')
      ParentFont = False
      ReadOnly = True
      TabOrder = 6
      Visible = False
    end
    object OCULTAR: TButton
      Left = 472
      Top = 376
      Width = 97
      Height = 33
      Caption = '&Ocultar la Ayuda'
      TabOrder = 7
      OnClick = OCULTARClick
    end
  end
  object Table1: TTable
    Active = True
    Filtered = True
    DatabaseName = 'C:\NATUP1'
    TableName = 'Producto.db'
    Left = 584
    Top = 264
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 584
    Top = 104
  end
end