Scroll horizontal texto

[Neftali [Germán.Estévez]]

Empezado por jaimeh

...pero con letras grandes se nota que el desplazamiento no es suave. Es como si tuviera que hacerse a nivel de pixels y no de caracteres.

en ese caso sólo se me ocurre que la etiqueta o texto la guardes como imagen (antes de empezar la animación) y luego en cada paso cortes una sección por la izquierda y la pegues por la derecha. No se si me explico....

Empezado por jaimeh

Y otra cosa, con la rutina que he puesto no sabría como hacer para que volviese ha empezar a entrar por la derecha, cuando acabara de salir por la izquierda del label.

Debería bastar con poner en el Timer esto:

Código Delphi [-]
  Str := Label1.caption;
  Str := Copy(Str, 2, length(Str)) + Str[1];
  Label1.Caption := Str;