Efeito quot;Letreiroquot; de Star Wars no Delphi

Question

Galera Algu�m conhece algum componente ou rotina para fazer aquele efeito de Star Wars onde as letras come�am subindo na tela. Fiz num memo, mas ficou horrivel pois parecia um efeito rob�, onde as linhas ficam quicando, gostaria de fazer aquele efeito deslizante, como no filme.
Valeu galera !

Garoto Programa · Answer

Prezado,

Eu n�o sei como fazer exatamente o efeito que vc quer mas voc� pode, por exemplo utilizar um compontente Label e posicionalo abaixo do local visivel no seu formul�rio. Depois voc� coloca um componente Time e configura o seu intervalo com a velocidade que achar melhor. No seu evento OnTime voc� pode colocar para que o seu componente label perca 1 ponto em rela��o a propriedade Top
Ex.:

procedure TFrmMenu.Timer1Timer(Sender: TObject);
begin
  Label1.top:= Label1.top-1; //Isso faz com que o label deslise pela tela de baixo para cima.
end;

Espero que isso possa pelo menos apontar um caminho a seguir.

Atenciosamente,

Sremulador · Answer

na biblioteca jvcl tem um componente que faz isto......

F�rum Efeito quot;Letreiroquot; de Star Wars no Delphi #327582