Dicas Delphi – Letreiro Digital – Direita para Esquerda

Salve, salve amigos,
// 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.

Take care

Anúncios

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s