Contador tipo cronometro.

[YAcosta]

Estoy haciendo un contador tipo cronometro, super sencillo pero me inquieta no poder resolver el parpadeo que me presenta la pantalla, hay alguna forma de poder eliminarlo???

Aqui les pongo el proyecto, solo consta de un form.

Contador

[E N T E R]

Yo baje pero ninguna cosa parpadea funciona muy bien YAcosta

[YAcosta]

Que?  como asi??? yo me refiero al label blanco, a cada instante parpadea ligeramente. El programita (si se le puede llamar asi jeje) funciona pero estéticamente me queda feo ya que parpadea el lblContador y eso que tengo una PC que digamos es fuertesita. A que se debera?

P.D.: Genere el exe y lo mismo.

[LeandroA]

Hola, ami no me parpadea casi nada, pero bueno una opción es poner un label solo para el ultimo numero de los milisegundos que es el que cambia mas frecuente y el resto lo actualizas cada segundo, o bien haces lo mismo para los segundos.
otra opción podría ser utilizar la función "Print" sobre un PictureBox y bien si usas AutoRedraw= TRue seguro que no te va a parpadear pero consumira mas procesador.

[E N T E R]

Acá esta solucionado, no parpadea ni 1 si parpadea corta me la bola jejeje.

http://www.megaupload.com/?d=6JYI8RQ3

[YAcosta]

Hola, ami no me parpadea casi nada, pero bueno una opción es poner un label solo para el ultimo numero de los milisegundos que es el que cambia mas frecuente y el resto lo actualizas cada segundo, o bien haces lo mismo para los segundos.
otra opción podría ser utilizar la función "Print" sobre un PictureBox y bien si usas AutoRedraw= TRue seguro que no te va a parpadear pero consumira mas procesador.

Gracias Lea, voy a probar esa alternativa

[YAcosta]

Acá esta solucionado, no parpadea ni 1 si parpadea corta me la bola jejeje.

http://www.megaupload.com/?d=6JYI8RQ3

Voy a bajarlo, y voy preparando cuchillo tambien. 

[E N T E R]

O sino como dijo el amigo Leandro

Un Picture con la propiedad AutoRedraw= True

Código: [Seleccionar]

Private Sub Timer1_Timer()
   
    I = I + 1
    MyTime = Format(Int(I / 36000) Mod 24, "00") & ":" & Format(Int(I / 600) Mod 60, "00") & ":" & Format(Int(I / 10) Mod 60, "00") & ":" & Format(I Mod 10, "00")
    'lblContador = MyTime
   
    Picture1.Cls
    Picture1.Print MyTime
   
End Sub

[YAcosta]

Houston tenemos problemas!!!

No se que sucede, primero descarte mi ojo y llame a otra persona para que vea si parpadea y confirmo que parpadea. Descartado mi ojo explico lo que paso.

Baje el ejemplo de Ariel, y sucede exactamente lo mismo, parpadea como siempre. Entonces, para demostrar que parpadea empece a grabar la pantalla como cuando hago mis videocast, grabé 10 segundos de parpadeo, me pongo a reproducir el vídeo, y el bendito vídeo me muestra un cronometro sin parpadeo alguno... juatttt!!! tengo animas en mi pc o que???

Concluyo que se trata de mi pc, será algo con el directX? openGL o alguna de esas madres?

La próxima me queda agarrar la filmadora y filmar la pantalla jeje.

Que sera??

[E N T E R]

juazzzz, no no cuando yo probé por primera ves fue así no parpadeo la segunda ya parpadeo, pero desde que le puse el picture ya no parpadeo. El picture no tenes que poner Visible a False tiene que estar en true.

[YAcosta]

 Probe tambien con autoredraw e igual sigue parpadeando. Me voy de salida con esta espina, pero cuando regrese retomo el tema y hasta me filmo la pantalla pa que chequeen je

Saludos

[YAcosta]

Estoy en la pc de un cliente, baje el code y parpadea. 

[E N T E R]

Que raro che, por que en el mio ni un parpadeo, nos era por el windows o no se Yo tengo Win7. Con las 2 forma que te pase funciona de 10.

Código: [Seleccionar]

Private Sub Timer1_Timer()
   
    I = I + 1
    MyTime = Format(Int(I / 36000) Mod 24, "00") & ":" & Format(Int(I / 600) Mod 60, "00") & ":" & Format(Int(I / 10) Mod 60, "00") & ":" & Format(I Mod 10, "00")
    'lblContador = MyTime
   
    Picture1.Cls
    Picture1.Print MyTime
   
End Sub

[E N T E R]

Definitivamente los 2 métodos probé ahora en WinXp Virtualizado y ni una vez parpadeo. Funacina muy bien.

[seba123neo]

a mi no me parpadea lo que puso E N T E R, pero no me funciono hasta que le puse dentro del Timer Static I As Integer