' 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
