Suavizar Movimento do Componente TImage
Olá,
Preciso mover uma TImage em sentido vertical para criação de um display.
Estou utilizando o seguinte código:
Porém a TImage não está se movendo suavemente, a imagem pisca e treme quando se move. Alguém pode me ajudar?
Obrigado.
Preciso mover uma TImage em sentido vertical para criação de um display.
Estou utilizando o seguinte código:
procedure TForm1.FormCreate(Sender: TObject); begin DoubleBuffered := True; end; procedure TForm1.Timer1Timer(Sender: TObject); begin image1.Top := image1.Top-1; end;
Porém a TImage não está se movendo suavemente, a imagem pisca e treme quando se move. Alguém pode me ajudar?
Obrigado.
Lucas Bernieri
Curtidas 0