home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hot Shareware 35
/
hot35.iso
/
ficheros
/
9MISC
/
ONIRO2.ZIP
/
Oniroman
/
Oniroman.exe
/
0
/
RCDATA
/
TFORM3
/
TFORM3.txt
Wrap
Text File
|
1998-06-10
|
11KB
|
300 lines
object Form3: TForm3
Left = 3
Top = 91
ActiveControl = Memo2
AutoScroll = False
Caption = 'Soft Magic - Hoja de Pedidos General -'
ClientHeight = 452
ClientWidth = 629
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
Position = poScreenCenter
WindowState = wsMaximized
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 16
object Panel1: TPanel
Left = 8
Top = 8
Width = 617
Height = 441
BevelInner = bvLowered
BevelWidth = 2
BorderWidth = 1
BorderStyle = bsSingle
DragMode = dmAutomatic
Caption = 'Panel1'
TabOrder = 0
object RzLabel1: TRzLabel
Left = 144
Top = 8
Width = 322
Height = 41
Alignment = taCenter
Caption = 'ONIROMANCIA v2.0'
DragMode = dmAutomatic
Font.Color = clRed
Font.Height = -35
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
TextStyle = tsRaised
end
object RzLabel2: TRzLabel
Left = 184
Top = 48
Width = 246
Height = 29
Alignment = taCenter
Caption = '(Sue�os de la Suerte)'
DragMode = dmAutomatic
Font.Color = clRed
Font.Height = -24
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
TextStyle = tsRaised
end
object SALIRPEDIDOS: TBitBtn
Left = 16
Top = 16
Width = 41
Height = 41
Hint = 'Volver al Men�'
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = SALIRPEDIDOSClick
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 = 552
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 = 88
Width = 577
Height = 337
Hint = 'Pulsar el bot�n: Imprimir Hoja de Pedido'
DragMode = dmAutomatic
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
' Enviar esta Hoja de Pedido a: SOFT MAGIC'
' ' +
' Distribuidor comercial:'
' ' +
' FRANCISCO PATI�O S�NCHEZ'
' ' +
' Apartado de Correos, 114'
' ' +
' 36080 - Pontevedra.'
''
' Pedidos m�s r�pidos por Tel�fono � Fax: 986.84.43.04 - Te' +
'l�fono M�vil: 939.501.801'
'----------------------------------------------------------------' +
'----------------------------------------------------------------' +
'----------'
' '
''
' Deseo que me env�en el programa que he se�alado con [X]'
' '
' [ ] > ONIROMANCIA v2.0 (Sue�os de la Suerte) ..............' +
'................ 9.450 Ptas. - (En CD-ROM)'
' [ ]> CARTOMANCIA v1.0 (Predicci�n con la Baraja Espa�ola) .' +
'.. 9.750 Ptas. - (En CD-ROM)'
' [ ]> TAROT PREDICTIVO v3.0 ................................' +
'.............................. 9.490 Ptas. - (En CD-ROM)'
' [ ]> NATUROPAT�A v1.0 (15 Bases de Datos) .................' +
'................ 9.750 Ptas. - (En CD-ROM)'
' [ ]> GU�A ASTROL�GICA v3.5 ................................' +
'............................. 6.490 Ptas. - (En CD-ROM)'
' [ ]> NUMEROLOG�A v4.0 (Hor�scopo Num�rico) ...............' +
'.......... 6.490 Ptas. - (En CD-ROM)'
' [ ]> HECHIZOS Y CONTRA-HECHIZOS v1.0 ......................' +
'............... 6.490 Ptas. - (En CD-ROM)'
' [ ]> CURSO DE TAROT v3.1 (Nivel Superior) .................' +
'.................. 6.490 Ptas. - (En CD-ROM)'
' [ ]> I CHING (Or�culo Chino) v1.0 .........................' +
'............................... 6.490 Ptas. - (En CD-ROM)'
''
'----------------------------------------------------------------' +
'----------------------------------------------------------------' +
'----------'
''
' FORMA DE PAGO:'
''
' [ ]> Mediante GIRO POSTAL (Sin Gastos de Env�o). N� de ' +
'Giro: _______________________ '
' '
' [ ]> CONTRA-REEMBOLSO: (Deber� de a�adir al Total: 640 P' +
'tas, por los Gastos de Env�o)'
' '
' [ ]> Mediante TRANSFERENCIA BANCARIA en Pesetas (Sin Gas' +
'tos de Env�o) a:'
' Caja ' +
'de Ahorros de Galicia'
' C/. ' +
' Plaza Calvo Sotelo, 3'
' 36001 - P' +
'ontevedra. - (Espa�a)'
''
' - C�digo Swift: CAGLESMM - Oficina: 0500-PONTEVE' +
'DRA. O.P. - Entidad: 2091'
' - D.C.: 11 - N� de Cuenta: 3000090223 - T' +
'itular: FRANCISCO PATI�O S�NCHEZ'
'----------------------------------------------------------------' +
'----------------------------------------------------------------' +
'-----------'
' '
' Por favor, no se olvide de pegar una etiqueta con su Nomb' +
're y Apellidos y la Direcci�n'
' Completa: Calle, N�mero, Piso, Puerta, C�digo Postal, Pob' +
'laci�n y Provincia, a donde '
' desea usted que le enviemos su pedido.'
''
' -------------------' +
'----------------------------------------------'
' '
''
''
' -------------------' +
'----------------------------------------------')
ParentFont = False
ParentShowHint = False
ReadOnly = True
ScrollBars = ssBoth
ShowHint = False
TabOrder = 2
end
end
object PrintDialog1: TPrintDialog
Left = 96
Top = 144
end
object PrinterSetupDialog1: TPrinterSetupDialog
Left = 200
Top = 144
end
object FontDialog1: TFontDialog
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
MinFontSize = 0
MaxFontSize = 0
Left = 160
Top = 256
end
object FindDialog1: TFindDialog
Left = 144
Top = 144
end
object SaveDialog1: TSaveDialog
DefaultExt = 'TXT'
FileEditStyle = fsEdit
Filter = 'TEXT FILES|*.TXT|ALL FILES|*.*'
Options = [ofOverwritePrompt, ofHideReadOnly, ofNoReadOnlyReturn]
Title = 'Save Text File'
Left = 120
Top = 256
end
object ReplaceDialog1: TReplaceDialog
Left = 48
Top = 144
end
object OpenDialog1: TOpenDialog
DefaultExt = 'TXT'
FileEditStyle = fsComboBox
Filter = 'Text Files|*.TXT|All Files|*.*'
Options = [ofHideReadOnly, ofFileMustExist, ofNoReadOnlyReturn]
Title = 'OPEN TEXT FILE'
Left = 536
Top = 168
end
end