object Form19: TForm19 Left = -3 Top = 113 HorzScrollBar.Visible = False VertScrollBar.Visible = False ActiveControl = Memo2 AutoScroll = False Caption = 'Notas Preliminares' ClientHeight = 455 ClientWidth = 633 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] Position = poScreenCenter WindowState = wsMaximized PixelsPerInch = 96 TextHeight = 16 object Memo1: TMemo Left = 0 Top = 8 Width = 17 Height = 25 Font.Color = clBlack Font.Height = -1 Font.Name = 'Arial' Font.Style = [] Lines.Strings = ( '.' '' '' '' '' '' '' '' '' '' '' '' '' '' '.') ParentFont = False TabOrder = 0 Visible = False end object Memo123: TMemo Left = 0 Top = 88 Width = 17 Height = 25 Font.Color = clBlack Font.Height = -1 Font.Name = 'Arial' Font.Style = [] Lines.Strings = ( '.' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '.') ParentFont = False TabOrder = 1 Visible = False end object Panel1: TPanel Left = 8 Top = 8 Width = 617 Height = 441 BevelInner = bvLowered BevelWidth = 2 BorderWidth = 1 BorderStyle = bsSingle DragMode = dmAutomatic TabOrder = 2 object BitBtn1: TBitBtn Left = 16 Top = 16 Width = 41 Height = 41 Hint = 'Volver al Men�' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = BitBtn1Click Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777777777777777777777777777777 777777777777777777777777777777731444444E131313131377777777FFFF71 F4444EE9F9F9F13131777777777777739B44449B9B9B9B9B93777FFFF7777771 F9CCC4F931F939F9F1777777777777739B9CCC4B139B139B9377777777744471 F9F4CCC431F931F9F1777777774CCC439BA44CCE139B139B9377744774CCCCC4 4AA4CCE931F931F9F17774444CCCCCCCAAA3339B139B139B93777E4444CEECCA AA4BBB3931F931F9F17777E44EE77ECCA4CCBB3B9B9B9B9B9377777EEE7777EC 4CCCE38444443339F177777777777774CCCE0AACCCCCBB3B937777777777774C CCEAAACCCCCCBBB3F1777777777774CCCECAACCCEEEEBB3B9377777777777ECC CCECCCCE313133F9F1777111111117ECCCCECCE31313139B937771999999997E CCCCCCB1313131F9F177719999999973ECCCCBBB1313139B937771999FF99971 FEECBBBBB13131F9F177719999FF99739B888B3B3313139B9377719FFFFFF971 F9888833313131F9F177719999FF99739B44444444139B9B937771999FF99971 F9CCCCCCCCF9F9F9F1777199999999739BEECCCCEE9B9B9B9377779999999971 F9F9CCCEF9F9F131317777777777777313131313131313131377777777777777 7777777777777777777777777777777777777777777777777777} end object BitBtn2: TBitBtn Left = 560 Top = 16 Width = 41 Height = 41 Hint = 'Imprimir' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = BitBtn2Click Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00700000000000 000000000000000000070F8888888888888888888888888888800FF800000000 000000000000008888800FF708888888888888888888880778800FF70F777777 777777777777778078800FF70F777777777777777777778808800FF70F777777 777777777777778808800FF708888888888888888888888808800FF000000000 000000000000000808800F0888888888888888888888888008800F0777777777 777777777777777808800F0777777777777777777777777880800F0777777777 777777777777777888000F0777777777777777777777777888000F0777777777 777777777777777888000F0777777777777777777999977888000F0777777777 777777777777777888000F0FFFFFFFFFFFFFFFFFFFFFFFF888000F0777777777 777777777777777F88000FF0777700000000000000008777F8000FF700000FFF FFFFFFFFFFF0000000000FF777770FFCCCCCCCCCCFF0777778800FF777770FFF FFFFFFFFFFF0777778800FF7777788F8CCCCCCCCC8F8877778800FF7777770FF FFFFFFFFFFFF077778800FF77777770FFCCCCCCCCCCFF07778800FF777777770 FFFFFFFFFFFFFF0778800FF7777777788FCCCCCCCCCCFF8878800FF777777777 0FFFFFFFFFFFFFF078800FFFFFFFFFFF0FFFFFFFFFFFFFF0FF800FFFFFFFFFFF 0FFFFFFFFFFFFFF0FFF070000000000000000000000000000007} end object Memo2: TMemo Left = 16 Top = 80 Width = 585 Height = 145 Alignment = taCenter DragMode = dmAutomatic Lines.Strings = ( '' 'Las orientaciones de los productos que se indican para cada s�nt' + 'oma no son ' 'prescriptivas sino orientativas. Esto no elimina la necesidad d' + 'el paciente de ' 'acudir al m�dico � a un terap�uta competente en caso de problema' + 's m�s ' 'complejos o de que no mejore con las recomendaciones en el progr' + 'ama ' 'indicadas. Dada la diversidad de reacci�n de unas personas a ' + 'otras, no ' 'podemos garantizar la seguridad de los resultados, ni la curaci' + '�n de los' 'pacientes, con la sola aplicaci�n de estos tratamientos.') ReadOnly = True TabOrder = 2 end object Memo3: TMemo Left = 16 Top = 232 Width = 585 Height = 193 Alignment = taCenter DragMode = dmAutomatic Lines.Strings = ( '' 'El Programa Naturopat�a v1.0 ha sido creado, pensando en todas a' + 'quellas ' 'personas que desean la curaci�n sin medicamentos. Todos los pro' + 'ductos' 'mencionados se venden en Herbolarios y Tiendas de Diet�tica. Al' + ' tratarse' 'de productos naturales, carecen de efectos secundarios important' + 'es a las' 'dosis terap�uticas recomendadas, consiguiendo de forma eficaz un' + 'a ' 'notable mejor�a de los s�ntomas que acompa�an a cualquier enferm' + 'edad o' 'dolencia a tratar. Ante cualquier duda sobre cualquiera de los p' + 'roductos ' 'mencionados en el programa, recomendamos consultar a cualquier ' 'natur�pata profesional o al profesional que atiende el Herbolari' + 'o o Tienda' 'de Diet�tica donde usted vaya a comprar los productos.') ReadOnly = True TabOrder = 3 end object Panel3: TPanel Left = 136 Top = 16 Width = 337 Height = 49 BevelInner = bvRaised BorderWidth = 1 BorderStyle = bsSingle DragMode = dmAutomatic Caption = 'NATUROPAT�A v1.0' Font.Color = clBlue Font.Height = -27 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 4 end end object PrintDialog1: TPrintDialog Copies = 1 Options = [poSelection] Left = 608 Top = 16 end object FontDialog1: TFontDialog Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 608 Top = 304 end object PrinterSetupDialog1: TPrinterSetupDialog Left = 608 Top = 336 end object ReplaceDialog1: TReplaceDialog Left = 608 Top = 280 end end