Delphi dicas

Letreiro digital (da direita para esquerda)

{Coloque um Timer, um Panel e um Label dentro do Panel.

Dê um duplo clique no Timer e digite o código abaixo:}



if label1.left>= -(label1.Width) then

label1.left:=label1.left-1

else

label1.left := Panel1.width;



{Você pode alterar a velocidade do texto na propriedade Interval do Timer, quanto menor o Interval, mais rápido ficará o letreiro.



Espero que gostem..

Vlw..}

por : Luis Felipe Tonini