General :: Ejemplo Con Dos Timers

Portal

Foro

Buscar

FAQ

Registrarse

Conectarse

Fecha y hora actual: Viernes, 26 Abril 2024, 00:38 • Todas las horas son UTC + 1 Hora

Ejemplo Con Dos Timers

Página 1 de 1

Ejemplo Con Dos Timers

Autor

Mensaje

Shell

Analista Programador

Registrado: Marzo 2010
Mensajes: 5278
Edad: 53
Ubicación:

Al otro lado de la pantalla

Ejemplo Con Dos Timers

Si veis el funcionamiento de este ejemplo.

¿ Qué os recuerda ?. Es algo que usamos a veces mucho.

Código:

Código: [Descargar] [Ocultar] [Seleccionar]

' gambas class file

Private x As Integer
Private y As Integer
Private cuentatotal As Integer
Const limite As Integer = 30

Public Sub Form_Open()

  ProgressBar1.Value = 0
  ProgressBar2.Value = 0

  Timer1.Delay = 400
  Timer2.Delay = 400

  Timer1.Start

End

Public Sub Timer1_Timer()

  x += 1
  ProgressBar1.Value += 10 / limite
  Timer1.stop
  Timer2.Start
  ProgressBar2.Value = 0

End

Public Sub Timer2_Timer()

  If cuentatotal = limite Then
    Timer1.Stop
    Timer2.Stop
  Else
    y += 1
    ProgressBar2.Value += 0.1
    cuentatotal += 1
    'Print "Timer1 = " & x, "Timer2 = " & y
    If y Mod 10 = 0 Then
      y = 0
      Timer1.Start
      Timer2.Stop
    Else
      Timer1.Stop
    Endif
  Endif

End

Ahora debe funcionar mejor.

Saludos

DosTimers.tar.gz
Descripción:		Descargar
Nombre del archivo:	DosTimers.tar.gz
Tamaño:	12.26 KB
Descargado:	41 veces

DosTimers.tar.gz
Descripción:		Descargar
Nombre del archivo:	DosTimers.tar.gz
Tamaño:	12.26 KB
Descargado:	41 veces

DosTimers.tar.gz
Descripción:		Descargar
Nombre del archivo:	DosTimers.tar.gz
Tamaño:	12.26 KB
Descargado:	41 veces

===================
Gambas Básico
"No es un bug, es una característica no documentada"

última edición por Shell el Lunes, 08 Febrero 2016, 11:05; editado 1 vez

#1 Domingo, 07 Febrero 2016, 22:06

Shell

Analista Programador

Registrado: Marzo 2010
Mensajes: 5278
Edad: 53
Ubicación:

Al otro lado de la pantalla

Re: Ejemplo Con Dos Timers

Pues he cambiado un poco el código y he vuelto a subir el ejemplo.

Saludos

===================
Gambas Básico
"No es un bug, es una característica no documentada"

última edición por Shell el Lunes, 08 Febrero 2016, 11:06; editado 1 vez

#2 Domingo, 07 Febrero 2016, 22:10

vuott

Analista Programador

Registrado: Agosto 2013
Mensajes: 2086
Edad: 60
Ubicación:

Re: Ejemplo Con Dos Timers

Utilicé dos Timer en el mi programa "Console Midi":
http://foro.gambas-es.org/viewtopic.php?f=5&t=3586

#3 Domingo, 07 Febrero 2016, 23:30

Shell

Analista Programador

Registrado: Marzo 2010
Mensajes: 5278
Edad: 53
Ubicación:

Al otro lado de la pantalla

Re: Ejemplo Con Dos Timers

Vuott:

A mi uno de los que más me gustó que subiste, fue el reproductor de archivos de sonido de Amiga. Mod, SM3 (creo)..

Bueno, como nadie ha dicho nada aun. (Fin de semana). Y supongo que tambien lo veis claro.
Los dos timers hacen la función de "un bucle anidado".
(Que no se por qué el uso de ambos timers me ha recordado en electrónica al uso de contactores, temporizadores, guardamotores...

)

¿ Y por que la idea de un bucle anidado con dos timers?.

Pues por que quiero aplicarlo a mostrar una imagen. Quiero mostrarla parte a parte, por ejemplo una linea horizontal completa o pixel a pixel.
Hasta que se complete la imagen.

Pero aun no se me ha ocurrido bien el ejemplo.

¿ Sabias que está prohibido o no recomendado usar Wait en rellenos de figuras con Paint ?.

P.d en Cádiz estamos de lunes de resaca..es fiesta!..( para algunos ).

Saludos

===================
Gambas Básico
"No es un bug, es una característica no documentada"

#4 Lunes, 08 Febrero 2016, 09:42

shordi

Analista Programador

Registrado: Septiembre 2009
Mensajes: 4982
Edad: 64
Ubicación:

Albacete

Re: Ejemplo Con Dos Timers

Mu bonito. Pero es sólo un ejercicio abstracto de uso de los timer ¿no?. Personalmente no creo que sirva para casi nada mezclar timers con barras de progreso... al menos aún he visto un de la vida real que lo pida.

Bueno... vale, si haces un juego de "Quiere ser millonario" tendrías que poner una barra de progreso basada en un timer, pero fuera de eso...

===================
No podemos regresar

#5 Lunes, 08 Febrero 2016, 17:26

Shell

Analista Programador

Registrado: Marzo 2010
Mensajes: 5278
Edad: 53
Ubicación:

Al otro lado de la pantalla

Re: Ejemplo Con Dos Timers

Citar:

Bueno... vale, si haces un juego de "Quiere ser millonario" tendrías que poner una barra de progreso basada en un timer, pero fuera de eso.

Lo de mostrar las barras de progresos es solo como para ver visualmente el funcionamiento del bucle externo y el interno.
A ver si lo puedo adaptar para cargar de la imagen una linea de pixeles ,o pixel a pixel, cada x tiempo. Esa era la idea.

Es que soy un poco friki del Spectrum.

Este ejemplo se aplica a lo que quiero hacer con una imagen.

Saludos

===================
Gambas Básico
"No es un bug, es una característica no documentada"

#6 Martes, 09 Febrero 2016, 00:28

Temas parecidos

	Autor	Foro	Respuestas	último mensaje
Ejemplo De Puzle	pittusa	Aplicaciones/Fragmentos de Código	0	Martes, 18 Enero 2011, 20:52 pittusa
Ejemplo De Estructura	Shell	General	2	Jueves, 20 Junio 2013, 14:47 jguardon
Detectar Estado De Conexión Por Medio De ...	v3ctor	General	4	Jueves, 25 Junio 2015, 17:41 PabloGener
Ejemplo Con Sumas	Shell	General	1	Lunes, 12 Octobre 2015, 21:25 Shell

Página 1 de 1

Fecha y hora actual: Viernes, 26 Abril 2024, 00:38 • Todas las horas son UTC + 1 Hora

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno

Lista de permisos

No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario

Versión reducida del foro - (Lo-Fi)
Página generada en:: 0.3104s (PHP: -73% SQL: 173%)
Consultas SQL: 49 - Debug off - GZIP Activado

Design by Mighty Gorgon