domingo, 11 de mayo de 2014

Visualizar un gif en gambas3


' Gambas class file

' Como usar un gif en gambas3
' buscar el gif que nos interese y colocarlo en la carpeta del proyecto,
' dentro de la carpeta Datos.
' Agregar un MovieBox1 y en su propiedad path asignarle el gif que pusimos en la carpeta
' del proyecto
' Despues para visualizarlo ponemos la propiedad del MovieBox1.Playing a True para visualizarlo
' o False si  queremos que pare.

Public Sub _new()

End

Public Sub Form_Open()
Me.Center
btnDesconectar.Enabled = False
End

Public Sub btnConectar_Click()

  MovieBox1.Playing = True
  btnConectar.Enabled = False
  btnDesconectar.Enabled = True

End

Public Sub btnDesconectar_Click()

  MovieBox1.Playing = False
  btnConectar.Enabled = True
  btnDesconectar.Enabled = False

End

Código fuente: gif-0.0.1.tar.gz

3 comentarios:

  1. No funciona. Dice "Valor incorrecto de la propiedad". Archivo no existe

    ResponderBorrar
  2. hola Luis, destilda gb.gui y tilda gb.qt5 y andará, saludos.
    proyectos-->propiedades-->componentes

    ResponderBorrar