como colocar una marquesina en la cabecera del formulario

14/09/2004 - 04:33 por sandro | Informe spam
hola gente deseo saber si alguien me puede ayudar lo que requiero es la forma
como en un formulario es decir en la cabecera del formulario puedo poner como
que el titulo sale como una marquesina desplazandose ya lo he visto en visual
basic pero quiero ver si se puede en visual fox cualquier cosa mandenme la
solucion a mi correo mit_gon@hotmail.com
 

Leer las respuestas

#1 Ana María Bisbé York
14/09/2004 - 12:10 | Informe spam
Hola Sandro:

No se si te ayude:

Enviado por Luis María Guayán

Yo te sugeriria, que con la herramienta que generaste el archivo .SWF (u
otra similar) lo conviertas en un archivo .GIF animado y allí directamente
lo insertas en el formulario de VFP en un objeto Image. A partir de VFP8


el
control Image puede mostrar un .gif animado.

Otra opción (si no quieres convertir el archivo, o no tienes VFP8 o algún
OCX que te permita mostrar archivos .gif animados) puedes incrustar como


un
objeto OLE el Explorador de internet y allí muestras el archivo .SWF


Otra opción tomando de base el artículo de PortalFox:

Enviado por: Luis María Guayán
http://www.portalfox.com/article.php?sid–4

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 = 250, ;
HEIGHT = 66, ;
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/swf/200x50.swf")
ENDPROC
ENDDEFINE



Enviado por Luis María Guayán

En PortalFox, en la Seccion
Archivos, Clases, existe una clase llamada Banner que desplaza un texto
dentro de un cuadro.

El vínculo es (todo en una linea)




http://www.portalfox.com/modules.ph...dex&re
q=viewdownloaddetails&lid˜&ttitle=Banner

Enviado por Baltazar Moreno

Esto me lo dijeron aqui en el news hace tiempo, es lo que utilizo.

Primero agregas un control ActiveX llamado Macromedia Flash Factory Object
en menu herramientas-opciones-controles,etc

y en el init de la forma pones algo asi:

WITH Thisform.TuOleControl
.Movie = "C:\Archivo.swf"
.Play()
ENDWITH

Espero te sirva




Saludos,

Ana
www.amby.net

"sandro" escribió en el mensaje
news:
hola gente deseo saber si alguien me puede ayudar lo que requiero es la


forma
como en un formulario es decir en la cabecera del formulario puedo poner


como
que el titulo sale como una marquesina desplazandose ya lo he visto en


visual
basic pero quiero ver si se puede en visual fox cualquier cosa mandenme la
solucion a mi correo

Preguntas similares