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