object Form1: TForm1
  Left = 10
  Top = 82
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  AutoScroll = False
  Caption = 'Naturopat�a v1.0 (Base de Datos)'
  ClientHeight = 455
  ClientWidth = 634
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Position = poScreenCenter
  WindowState = wsMaximized
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 16
  object Memo1: TMemo
    Left = 8
    Top = -8
    Width = 601
    Height = 25
    DragMode = dmAutomatic
    Lines.Strings = (
      'Realizado por: FRANCISCO PATI�O SANCHEZ y  MERCEDES SOTO SOLI�O '
      'D.N.I.: 35239976    --   D.N.I.: 50041703')
    ReadOnly = True
    TabOrder = 0
    Visible = False
  end
  object Panel5rde21: TPanel
    Left = 8
    Top = 8
    Width = 617
    Height = 441
    BevelInner = bvLowered
    BevelWidth = 2
    BorderWidth = 1
    BorderStyle = bsSingle
    DragMode = dmAutomatic
    TabOrder = 1
    object Panel1: TPanel
      Left = 16
      Top = 16
      Width = 577
      Height = 409
      BevelInner = bvRaised
      BorderWidth = 1
      BorderStyle = bsSingle
      DragMode = dmAutomatic
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'System'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnMouseMove = Panel1MouseMove
      object Panel4: TPanel
        Left = 16
        Top = 280
        Width = 545
        Height = 113
        BevelInner = bvLowered
        BorderWidth = 1
        BorderStyle = bsSingle
        DragMode = dmAutomatic
        TabOrder = 0
        OnMouseMove = Panel4MouseMove
        object Label1: TLabel
          Left = 8
          Top = 8
          Width = 62
          Height = 15
          Caption = '22/22/1998'
          DragMode = dmAutomatic
          Font.Color = clBlack
          Font.Height = -12
          Font.Name = 'Arial'
          Font.Style = []
          ParentFont = False
          OnMouseMove = Label1MouseMove
        end
        object Label2: TLabel
          Left = 480
          Top = 8
          Width = 48
          Height = 15
          Caption = '22:22:22'
          DragMode = dmAutomatic
          Font.Color = clBlack
          Font.Height = -12
          Font.Name = 'Arial'
          Font.Style = []
          ParentFont = False
          OnMouseMove = Label2MouseMove
        end
        object BitBtn33: TBitBtn
          Left = 88
          Top = 16
          Width = 49
          Height = 41
          Hint = 'Pedidos'
          ParentShowHint = False
          ShowHint = False
          TabOrder = 0
          OnClick = BitBtn17Click
          OnMouseMove = BitBtn33MouseMove
          Glyph.Data = {
            76020000424D7602000000000000760000002800000020000000200000000100
            0400000000000000000000000000000000001000000010000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00778888888888
            8888888888887777777777888888888888888888888877777777000000000000
            000000000088777777770FFFFFFFFFFFFFFFFFFFF088777777770FF8888888FF
            FFFFFFFFF088777777770F99999998FFFFFFFFFFF088777777770F9FFFFF98FF
            FFFFFFFFF088777777770F9FFFFF98FFFFFFFFFFF088777777770F9FFFFF98FF
            FFFFFFFFF088777777770F9FFFFF98FFFF000FFFF088777777770F9FFFFF98FF
            FF00003FF088877777770F9999999FFFFF0003B3B088887777770FFFFFFFFFFF
            FFF03B3B3B38888777770FF8888888FFFFF0B3B3B3BC888877770F99999998FF
            FFFB3B3B3BCCC88887770F90FFF098FFFFFFB3B3B3ECCC8888770F9F0F0F98FF
            FFFF3B3BCCCECCC888870F9FF0FF98FFFFFFF3BECCCCECCC88880F9F0F0F98FF
            FFFFFBCCECCCCECCC8880F90FFF098FFFFFFFCCCCECCCCECCC880F99999998FF
            FFFFFFCCCCECCCCECCC80FFFFFFFF8FFFFFFFFFCCCCECCCCECCC0FF8888888FF
            FFFFFFFFCCCCECCCCECC0F99999998FFFFFFFFFFFCCCCECCCCEC0F9FFFFF98FF
            FFFFFFFFF0CCCCECCCCE0F9FFFFF98FFFFFFFFFFF08CCCCECCCC0F9FFFFF98FF
            FFFFFFFFF088CCCCECCC0F9FFFFF98FFFFFFFFFFF0887CCCCECC0F9FFFFF98FF
            FFFFFFFFF08877CCCCEC0F9999999FFFFFFFFFFFF088777CCCCE0FFFFFFFFFFF
            FFFFFFFFF0777777CCCC00000000000000000000007777777CCC}
        end
        object CATALOGO: TBitBtn
          Left = 152
          Top = 16
          Width = 49
          Height = 41
          Hint = 'Cat�logo'
          ParentShowHint = False
          ShowHint = False
          TabOrder = 1
          OnClick = CATALOGOClick
          OnMouseMove = CATALOGOMouseMove
          Glyph.Data = {
            76020000424D7602000000000000760000002800000020000000200000000100
            0400000000000000000000000000000000001000000010000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
            7777777770000777777777777777470000077770007800077777777777774000
            08C00000777888000477777777740C88088C007779778888000777777774C878
            07F077797FF8888888007777774CC8780770727FF00077888880777774CC8778
            07F07FF00B330077888077744CC8FF780770F00BBB3333007780444CCC8FF778
            07F70BBBBF73333300704CCC88FFFF78077F3BBFFBB7333333074C888FFFF778
            07F73FFB37BB733300004C8F8FFFFF78077F3B73737BB73033304C8F8FFFF778
            07F783B73737BB703BB04C8F8FFFFF78077FF83B737B80B0BBB34C8F8FFFF778
            07F78F000BB00308BB374C8F8FFFFF78077FF83BB0B03BBBB3774C8F8FFFF778
            07F78F3BB808BBB330774C8F8FFFFF78077FF8833BBBB33CC0774C8F8FFFF778
            07F78FF8833338BCC0774C8F8FFFFF78077FF88FFFFFF8FCC0774C8F8FFFF778
            07F78FF8888FF8BCC0774C8F8FFFFF78077FF88FFFFFF8FCC0774C8F8FFFF778
            07FF8FF888FFF8CCC0774C8F8FFFFF78888FF88FFFFFF84444774C8F8FFFF778
            778FFFF8888FF87777774C8F8FFFFF7877788FFFFFFFF87777774C8F8FFFF787
            7777788FFFFFF8777777448F8FFFFF8777777778888888777777778F8FFFF877
            7777777777777777777777888FFF87777777777777777777777777778FF87777
            7777777777777777777777778887777777777777777777777777}
        end
        object BitBtn35: TBitBtn
          Left = 216
          Top = 16
          Width = 49
          Height = 41
          Hint = 'Pr�logo'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          ParentShowHint = False
          ShowHint = False
          TabOrder = 2
          OnClick = BitBtn14Click
          OnMouseMove = BitBtn35MouseMove
          Glyph.Data = {
            76020000424D7602000000000000760000002800000020000000200000000100
            0400000000000000000000000000000000001000000010000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00700777E71111
            1111E766E7E7E7EEEE07770771117E7E7E7E1176667E7E7EE007770017E7E7E7
            E7E1E7176667E7EEE0777770777E7E7E711888811E667E7E0077777007E7E7E7
            1777778881E667E00777777700077E7177700008881E66007777777777000017
            77888880888100777777777777777100787777880880177777777777777771F0
            87778878800F17777777777777771FF07F7FFF77880FF1777777777777771FF0
            FF800007780FF177777777777771FF0FFF0F77707780FF17777777777771FF0F
            FFFF0077F770FF17777777777771F00FFFF0F007FF700F17777777777771F0FF
            FFF8F787FF770F17777777777771187FFFFF087777778117777777777771817F
            F777087777771817777777777777187F44778888447881777777777777770878
            8080000808888077777777777777708888077770088007777777777777777000
            00777777000007777777777777770F7778F78777038880777777777777770F77
            78F7887703888077777777777777708888F7777700000777777777777777770B
            338F7770333077777777777777777703BBB88883333077777777777777777770
            BBBBBBB333077777777777777777777700BBBB3B007777777777777777777777
            7700000077777777777777777777777777777777777777777777777777777777
            7777777777777777777777777777777777777777777777777777}
        end
        object BitBtn34: TBitBtn
          Left = 280
          Top = 16
          Width = 49
          Height = 41
          Hint = '? ...'
          ParentShowHint = False
          ShowHint = False
          TabOrder = 3
          OnClick = BitBtn34Click
          OnMouseMove = BitBtn34MouseMove
          Glyph.Data = {
            5A030000424D5A03000000000000760000002800000024000000250000000100
            040000000000E4020000C30E0000C30E00000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFF8F8F8F8800000008
            8FFFFFFFFFFFFFFF0000FFF8F8FF800CCCEEFFFCC08FFFFFFFF0FFFF0000FF8F
            8F88800CCCEEFFFCCE08FFFFFF000FFF0000FFF8F8F0E00CCCEEFFFCCE00FFFF
            F000FFFF0000FFFF8F80E00CCCEEFFFCCE00FFFF000FFFFF0000FFFFFFF0E00C
            CCEEFFFCCE00FFF000FFFFFF0000FFFFFFF0E00CCCEEFFFCCE00FF000FFFFFFF
            0000FFFFFFF0E000000000000E00F000FFFFFFFF0000FFFFFFF000CCCCEEFFFC
            C00F000FFFFFFFFF0000FFFFFFF0EC0CCCEEFFFCCEF000FFFFFFFFFF0000FFFF
            FF00E000000000000F000FFFFFFFFFFF0000FFFFF7008C8C8C8C8C8CF000FFFF
            FFFFFFFF0000FFFF80C8C8C8C8C8C8CF000FC08FFFFFFFFF0000FFF80C8C8C88
            888888F000FC8C08FFFFFFFF0000FFF0C8C8C80833083F0F0FE8CCC0FFFFFFFF
            0000FFF88C8C8BBB3333F0FF060E8E80FFFFFFFF0000FFFF08C33BB3B333F0F0
            6308C80FFFFFFFFF0000FFFF780333BB3333300F30E008EFFFFFFFFF0000FFFF
            F033333B877773600330EFFFCEFFFFFF0000FFFFF03333337700773333330F0F
            0FF0FFFF0000FFFFF033333370FF073B3B3B0FFFFFCFFFFF0000FFFFF0B3B3B3
            70FF073333330FCE0FEFFFFF0000FFFFF03333337700773333330FFFFFF0FFFF
            0000FFFFF03333333777733333330FFFCEFFFFFF0000FFFFFF033E3BB33333B3
            3330FFFFFFFFFFFF0000FFFFFF0E33B8B33333BB3330FFFFFFFCEFFF0000FFFF
            FFF03BBB83333B7BB30FFFFFFFFFFFFF0000FFFFFFF0BB8B333333BBBB0FFFFF
            FFFFFFFF0000FFFFFFFF00B83333333B00FFFFFFFFFFFFFF0000FFFFFFFFFF00
            33333300FFFFFFFFFFFFFFFF0000FFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF
            0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000}
        end
        object Panel3: TPanel
          Left = 8
          Top = 64
          Width = 521
          Height = 25
          BevelInner = bvLowered
          BevelOuter = bvNone
          BorderWidth = 1
          DragMode = dmAutomatic
          Font.Color = clBlue
          Font.Height = -12
          Font.Name = 'Arial'
          Font.Style = []
          ParentFont = False
          TabOrder = 4
          OnMouseMove = Panel3MouseMove
        end
        object BitBtn1: TBitBtn
          Left = 408
          Top = 16
          Width = 49
          Height = 41
          Hint = 'Salir'
          ParentShowHint = False
          ShowHint = False
          TabOrder = 5
          OnClick = BitBtn1Click
          OnMouseMove = BitBtn1MouseMove
          Glyph.Data = {
            76020000424D7602000000000000760000002800000020000000200000000100
            0400000000000000000000000000000000001000000010000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
            7777777777777777777777777777777777777777777777777777777777777777
            777777777777777777777777777777731444444E131313131377777777FFFF71
            F4444EE9F9F9F13131777777777777739B44449B9B9B9B9B93777FFFF7777771
            F9CCC4F931F939F9F1777777777777739B9CCC4B139B139B9377777777744471
            F9F4CCC431F931F9F1777777774CCC439BA44CCE139B139B9377744774CCCCC4
            4AA4CCE931F931F9F17774444CCCCCCCAAA3339B139B139B93777E4444CEECCA
            AA4BBB3931F931F9F17777E44EE77ECCA4CCBB3B9B9B9B9B9377777EEE7777EC
            4CCCE38444443339F177777777777774CCCE0AACCCCCBB3B937777777777774C
            CCEAAACCCCCCBBB3F1777777777774CCCECAACCCEEEEBB3B9377777777777ECC
            CCECCCCE313133F9F1777111111117ECCCCECCE31313139B937771999999997E
            CCCCCCB1313131F9F177719999999973ECCCCBBB1313139B937771999FF99971
            FEECBBBBB13131F9F177719999FF99739B888B3B3313139B9377719FFFFFF971
            F9888833313131F9F177719999FF99739B44444444139B9B937771999FF99971
            F9CCCCCCCCF9F9F9F1777199999999739BEECCCCEE9B9B9B9377779999999971
            F9F9CCCEF9F9F131317777777777777313131313131313131377777777777777
            7777777777777777777777777777777777777777777777777777}
        end
        object BitBtn3333: TBitBtn
          Left = 344
          Top = 16
          Width = 49
          Height = 41
          Hint = 'Ayuda'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          ParentShowHint = False
          ShowHint = False
          TabOrder = 6
          OnClick = BitBtn3333Click
          OnMouseMove = BitBtn3333MouseMove
          Glyph.Data = {
            76020000424D7602000000000000760000002800000020000000200000000100
            0400000000000000000000000000000000001000000010000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFF0
            0000000FFFFFFFFFFFFFFFFFFFFFFFF0BFBFBF00FFFFFFFFFFFFFFFFFFFFFFF0
            FBFBFB0B0FFFFFFFFFFFFFFFFFFFFFF0BFBFBF0BB0FFFFFFFFFFFFFFFFFFFFF0
            FBFBFB0BB07FFFFFFFFFFFFFFFFFFFF00000000BB077FFFFFFFFFFFFFFFFFFFF
            0BBBBBB0B077FFFFFFFFFFFFFFFFFFF00000000B0077FFFFFFFFFFFFFFFFFFF0
            FBFBFB00B077FFFFFFFFFFFFFFFFFFF0BFBFBF0B0FF7FFFFFFFFFFFFFFFFFFF0
            FBFBFB0BB07FFFFFFFFFFFFFFFFFFFF0BFBFBFB0B077FFFFFFFFFFFFFFFFFFF0
            FBFBFBF0B077FFFFFFFFFFFFFFFFFFFF0FBFBFBF0077FFFFFFFFFFFFFFFFFFFF
            0BFBFBFBF0777FFFFFFFFFFFFFFFFFFFF0BFBFBFBF0777FFFFFFFFFF0000000F
            FF0BFBFBFB00777FFFFFFFFF0FBFBF0FFFF0BFBFBFB00777FFFFFFFF0BFBFB0F
            FFFF0BFBFBF0B077FFFFFFFF0FBFBF0FFFFF0FBFBFB0B077FFFFFFFF0BFBFB0F
            FFFF0BFBFBF0BB077FFFFFFF0FBFBFB0FFF0BFBFBFB0BB077FFFFFFF0BFBFBFB
            000BFBFBFBF0BB077FFFFFFFF0BFBFBFBFBFBFBFBF0BBB077FFFFFFFF0FBFBFB
            FBFBFBFBFB0BBB077FFFFFFFFF0FBFBFBFBFBFBFB0BBBB077FFFFFFFFFF0FBFB
            FBFBFBFB0BBBB077FFFFFFFFFFFF00BFBFBFBF00BBBBB077FFFFFFFFFFFFF000
            000000BBBBBB077FFFFFFFFFFFFFFF0BBBBBBBBBBBB077FFFFFFFFFFFFFFFFF0
            0BBBBBBBB0077FFFFFFFFFFFFFFFFFFFF0000000077FFFFFFFFF}
        end
      end
      object Panel2: TPanel
        Left = 16
        Top = 16
        Width = 545
        Height = 257
        BevelInner = bvLowered
        BorderWidth = 1
        BorderStyle = bsSingle
        DragMode = dmAutomatic
        TabOrder = 1
        OnMouseMove = Panel2MouseMove
        object Label3: TLabel
          Left = 176
          Top = 8
          Width = 200
          Height = 32
          Alignment = taCenter
          Caption = 'NATUROPAT�A'
          DragMode = dmAutomatic
          Font.Color = clGreen
          Font.Height = -27
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          Transparent = True
          OnMouseMove = Label3MouseMove
        end
        object BitBtn22: TBitBtn
          Left = 16
          Top = 48
          Width = 169
          Height = 33
          Caption = '&Productos Cosm�ticos'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ModalResult = 1
          ParentFont = False
          TabOrder = 0
          OnClick = BitBtn8Click
          OnMouseMove = BitBtn8MouseMove
          NumGlyphs = 2
        end
        object BitBtn20: TBitBtn
          Left = 192
          Top = 48
          Width = 169
          Height = 33
          Caption = '&Tratamientos Naturales'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 1
          OnClick = BitBtn5Click
          OnMouseMove = BitBtn5MouseMove
        end
        object BitBtn21: TBitBtn
          Left = 368
          Top = 48
          Width = 161
          Height = 33
          Caption = '&Dietas Naturistas'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          ParentShowHint = False
          ShowHint = False
          TabOrder = 2
          OnClick = BitBtn6Click
          OnMouseMove = BitBtn6MouseMove
        end
        object BitBtn19: TBitBtn
          Left = 16
          Top = 88
          Width = 169
          Height = 33
          Caption = '&Informaci�n General'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 3
          OnClick = BitBtn7Click
          OnMouseMove = BitBtn7MouseMove
        end
        object BitBtn23: TBitBtn
          Left = 192
          Top = 88
          Width = 169
          Height = 33
          Caption = '&Remedios de la Abuela'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 4
          OnClick = BitBtn12Click
          OnMouseMove = BitBtn12MouseMove
        end
        object BitBtn24: TBitBtn
          Left = 368
          Top = 88
          Width = 161
          Height = 33
          Caption = '&Glosario M�dico'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 5
          OnClick = BitBtn18Click
          OnMouseMove = BitBtn18MouseMove
        end
        object BitBtn28: TBitBtn
          Left = 16
          Top = 128
          Width = 169
          Height = 33
          Caption = '&Confeccionar Fichas'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 6
          OnClick = BitBtn16Click
          OnMouseMove = BitBtn16MouseMove
        end
        object BitBtn26: TBitBtn
          Left = 192
          Top = 128
          Width = 169
          Height = 33
          Caption = 'Terapias &Alternativas'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 7
          OnClick = BitBtn11Click
          OnMouseMove = BitBtn11MouseMove
        end
        object BitBtn27: TBitBtn
          Left = 368
          Top = 128
          Width = 161
          Height = 33
          Caption = '&Editor de Texto'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 8
          OnClick = BitBtn15Click
          OnMouseMove = BitBtn15MouseMove
        end
        object BitBtn25: TBitBtn
          Left = 16
          Top = 168
          Width = 169
          Height = 33
          Caption = '&Funci�n Fisiol�gica'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ModalResult = 1
          ParentFont = False
          TabOrder = 9
          OnClick = BitBtn10Click
          OnMouseMove = BitBtn10MouseMove
          NumGlyphs = 2
        end
        object BitBtn29: TBitBtn
          Left = 192
          Top = 168
          Width = 169
          Height = 33
          Caption = '&S�ntoma - Diagn�stico'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 10
          OnClick = BitBtn13Click
          OnMouseMove = BitBtn13MouseMove
        end
        object BitBtn30: TBitBtn
          Left = 368
          Top = 168
          Width = 161
          Height = 33
          Caption = '&Herbodiet�tica'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ModalResult = 1
          ParentFont = False
          TabOrder = 11
          OnClick = BitBtn9Click
          OnMouseMove = BitBtn9MouseMove
          NumGlyphs = 2
        end
        object BOTONEDITAR: TBitBtn
          Left = 16
          Top = 208
          Width = 169
          Height = 33
          Caption = 'Editar Pr&oductos'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 12
          OnClick = BOTONEDITARClick
          OnMouseMove = BOTONEDITARMouseMove
        end
        object BitBtn2: TBitBtn
          Left = 192
          Top = 208
          Width = 169
          Height = 33
          Caption = 'S&umar Productos'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 13
          OnClick = BitBtn2Click
          OnMouseMove = BitBtn2MouseMove
        end
        object VENTASDIARIAS: TBitBtn
          Left = 368
          Top = 208
          Width = 161
          Height = 33
          Caption = '&Ventas Diarias'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'System'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 14
          OnClick = VENTASDIARIASClick
          OnMouseMove = VENTASDIARIASMouseMove
        end
      end
      object PANELFRAN2: TMemo
        Left = 8
        Top = 8
        Width = 553
        Height = 385
        DragMode = dmAutomatic
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        Lines.Strings = (
          '   '
          
            '      Versi�n ShareWare (Versi�n Reducida) del programa Naturopa' +
            't�a v1.0 (Base de Datos).'
          ''
          
            '                                         - Ideal para Probar ant' +
            'es de Comprar -'
          ''
          
            ' Todos los botones y campos est�n activados, excepto el Campo Cl' +
            'ave (�ndice) que no est� '
          
            ' activado, as� pues, no podr� usted GRABAR nada de lo que escrib' +
            'a en la Base de Datos.'
          
            ' Tambi�n y en lo referente a Herbodiet�tica, Tratamientos Natura' +
            'les, Informaci�n Diet�tica, '
          
            ' S�ntomas y Diagn�sticos, Terapias Alternativas, etc..., existen' +
            ' algunos datos no disponibles.'
          
            ' Si desea usted el Programa Completo, entonces, deber� de solici' +
            'tar la Versi�n Comercial.'
          ' '
          
            ' Si desea la Versi�n Comercial (Programa Completo) deber� de sol' +
            'icitarlo enviando por correo'
          
            ' la Hoja de Pedido � puede hacerlo m�s r�pido llamando por Tel�f' +
            'ono � enviando un Fax.'
          ''
          ' - Informaci�n y Pedidos a:'
          '                                                    SOFT MAGIC'
          
            '                                                    Distribuidor' +
            ' comercial:'
          
            '                                                    FRANCISCO PA' +
            'TI�O S�NCHEZ '
          
            '                                                    Apartado de ' +
            'Correos, 114'
          
            '                                                    36080 - Pont' +
            'evedra.'
          ''
          ' - Tel�fono y Fax:  (986) - 84.43.04'
          ' - Tel�fono M�vil: 939.501.801')
        ParentFont = False
        ReadOnly = True
        TabOrder = 2
      end
      object F3: TPanel
        Left = 480
        Top = 336
        Width = 73
        Height = 49
        BevelInner = bvRaised
        BorderWidth = 5
        BorderStyle = bsSingle
        Caption = 'F3'
        TabOrder = 3
        object F2: TButton
          Left = 8
          Top = 8
          Width = 53
          Height = 29
          Caption = '&Men�'
          TabOrder = 0
          OnClick = F2Click
        end
      end
    end
  end
  object Timer2: TTimer
    OnTimer = Timer2Timer
    Left = 8
    Top = 408
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 608
  end
end