FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Varios con GIF animados.
Posts: 632
Joined: Thu Jan 19, 2006 10:45 AM
Varios con GIF animados.
Posted: Fri Mar 09, 2012 10:59 AM
Intento mostrar un gif animado para que de la sensación de "procesando datos" en aquellos momentos en que el programa realiza cálculos como por ejemplo cuando busca y recupera datos. Necesito que se muestre en la parte central de la ventana y que muera cuando voy a presentar los datos. En los ejemplos que tiene fivewin viene como crearlo pero no se si hago algo mal, puesto que si lo pongo así:

Code (fw): Select all Collapse
   oGif := tGif():New( oWnd, "..\bmp\gif\please-wait.gif", 130, 130 )
   //   msginfo("1")
   oGif:Play()

   DO WHILE PFECHA <= aFecha[2]
   //aquí me recupera los registros y hago una base de datos temporal
   // pero tarda un tiempo que es el que quiero mostrar el gif animado
   ENDDO
    
   oGif:Stop() //supongo que es así como lo tengo que hacer
   oGif:Destroy() 
    
   MuestroElResultadodelReporte()

Me produce cosas anómalas.
Preguntas:
1.- Como hago para centrar el gif en la pantalla, hay alguna función que me dé las coordenadas del punto centrar de la ventana? Alguna clausula CENTRE?
2.- El código anterior me muestra el gif pero sin funcionar, me muestra un recuadro. Pero si antes de entrar en el WHILE muestro un mensaje, me lo muestra bien y funcionando.
3.- El destruir el objeto gif, no me funciona sigue en pantalla. Que hago mal?
4.- El que salga transparente y se vea el fondo de que depende, del tipo de GIF o de algun comando que hay que poner?

He revisado la clase y creo que se debería hacer así, pero el resultado no es el esperado.
Saludos



Andrés González desde Mallorca
Posts: 632
Joined: Thu Jan 19, 2006 10:45 AM
Re: Varios con GIF animados.
Posted: Fri Mar 09, 2012 11:12 AM

Para descargaros el gif basta buscarlo en Google imagenes. Encontrareis muchos muy atractivos para hacer esto ademas de los que tiene el directorio GIF de Fivewin.

Saludos



Andrés González desde Mallorca

Continue the discussion