Flash en VFP 6.0

29/09/2004 - 20:22 por Sistemas | Informe spam
Buenas tardes, alguien me podria colaborar indicandome como incluir en mis
aplicaciones animaciones realizadas en Flash

Muchas gracias
Eliana
Medellin-Colombia
 

Leer las respuestas

#1 Luis María Guayán
29/09/2004 - 20:34 | Informe spam
Esto te puede servir:

PUBLIC oForm
oForm = NEWOBJECT("MiForm")
oForm.SHOW

DEFINE CLASS MiForm AS FORM
TOP = 0
LEFT = 0
DOCREATE = .T.
CAPTION = "Ejemplo de formulario con un archivo .SWF"
WINDOWSTATE = 0
NAME = "Form1"
WIDTH = 640
HEIGHT = 300

ADD OBJECT olecontrol1 AS OLECONTROL WITH ;
TOP = 10, ;
LEFT = 10, ;
WIDTH = 200, ;
HEIGHT = 200, ;
NAME = "Olecontrol1", ;
OLECLASS = "Shell.Explorer.2"

PROCEDURE olecontrol1.REFRESH
NODEFAULT
ENDPROC

PROCEDURE olecontrol1.INIT
*-- Apuntar al archivo .SWF que se quiera mostrar
*-- THIS.Navigate("C:\MiFlash.swf")

THIS.Navigate("http://www.bna.com.ar/promoviajes/i....swf")
ENDPROC
ENDDEFINE


Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos

"Sistemas" escribió en el mensaje
news:%
Buenas tardes, alguien me podria colaborar indicandome como incluir en mis
aplicaciones animaciones realizadas en Flash

Muchas gracias
Eliana
Medellin-Colombia


Preguntas similares