Incorporar Word en un formulario

28/03/2006 - 15:42 por ROLANDO MILMAN | Informe spam

Mi nombre es Rolando Milman, hace un tiempo que estoy programando en VFP
6.0 y quisiera que me ayudaran con la siguiente inquietud: necesito que en
un formulario, pueda activar parte de algún procesador de texto (por
ejemplo Word) es decir, utilizar los menúes y características que tiene el
mismo para la edición de texto.
Aprovecho para agradecer a todas las personas que se ocupan de contestar
las inquietudes de los que lo requieren, ya que en muchos casos me fue de
gran ayuda sus respuestas.
Desde ya, muchísimas gracias y a la espera de una respuesta.

PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Siga el debate

3 respuestas

Tengo una respuesta

Preguntas similare

Leer las respuestas

#1 Jorge Martínez

28/03/2006 - 19:05 | Informe spam

Saludos Rolando; Utiliza el siguiente código dentro de un botón contenido
en un formulario:

Local loWord As Object
loWord = Createobject("word.application")

Espero y te sirva amigo;

Saludos;

Jorge Martínez

Jorge Martínez M
<a
href="mailto:Jorge35@venezuelasite.com">Jorge35@venezuelasite.com</a>

PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Responder a este mensaje

#2 enrique

31/03/2006 - 16:48 | Informe spam

Probé lo que indicas, en un botón de comando de un formulario, pero no resulta.

saludos :
enrique
El objeto más noble que puede ocupar el hombre
es ilustrar a sus semejantes"
Simón Bolívar "El Libertador"
Estadista y Militar Venezolano

"Jorge Martínez" escribió:

Saludos Rolando; Utiliza el siguiente código dentro de un botón contenido
en un formulario:

Local loWord As Object
loWord = Createobject("word.application")

Espero y te sirva amigo;

Saludos;

Jorge Martínez

Jorge Martínez M
<a
href="mailto:"></a>

PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Responder a este mensaje

#3 Jorge Martínez

03/04/2006 - 19:01 | Informe spam

Puedes también usar éste truco, espero y te sirva:

_Vfp.AutoYield = .f.

Public oForm

oForm = Createobject("FormWord")
oForm.Show()

*- Definición de la clase FormWord
Define Class FormWord As Form

Add Object oleWebWrowser As IEClass With;
Name = "oleWebBrowser"

Procedure Resize
This.oleWebBrowser.Height = This.Height
This.oleWebBrowser.Width = This.Width
Endproc

Procedure Init
With This.oleWebBrowser
.Top = 0
.Left = 0
.Navigate(Getfile("Archivos de word (*.doc):doc"))
Endwith
This.Resize()
Endproc
Enddefine

*- Definición de la clase IEClass
Define Class IEClass As OleControl

OleClass = "Shell.Explorer.2"

Procedure Init
This.Navigate("about:blank")
Endproc

Procedure Refresh
Nodefault
Endproc
Enddefine
**Eof()

Saludos cordiales,
Jorge Martínez

Jorge Martínez M
<a
href="mailto:Jorge35@venezuelasite.com">Jorge35@venezuelasite.com</a>

PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida