home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hot Shareware 32
/
hot34.iso
/
ficheros
/
9EDU
/
NATURO10.ZIP
/
natur10.exe
/
NATUP1
/
NATUP1.EXE
/
0
/
RCDATA
/
TFORM19
/
TFORM19.txt
Wrap
Text File
|
1995-05-10
|
9KB
|
399 lines
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