Bom dia caros amigos preciso de uma rotina que mostre um texto em
movimento e no fundo seja transparente, eu fiz da seguinte forma
coloquei um label deixei o fundo com transparente e coloquei um timer
para ele ser deslocado a cada intervalo de segundo, mas estou com um
problema ele fica piscando demais, já coloquei o repaint, invalidate
refresh e nada. Não sei mais o que fazer será que alguém pode me dar
uma mão? Abaixo vai o codigo da minha rotina.
LblPropaganda.Left := LblPropagandaInicio;
LblPropaganda.Canvas.Refresh;
LblPropaganda.Repaint;
LblPropaganda.Invalidate;
PropagandaInicio := PropagandaInicio - PropagandaCont;
if LblPropaganda.Left = -1000 then
PropagandaInicio := 850;
Fico no aguardo.
--
[]'s
Emerson Moreno
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
