Подскажите пожалуйста как с делать так чтобы на Canvas , LineTo стал мерцать после нажатия клавиши на форме . (походу через таймер нужно, но как его прописать что не веду   )
Какие есть вообще способы мерцания на Canvas ??
кому не трудно на пищите код для прямой 
	Код:
	var 
x0,y0: Integer; 
Form1: TForm1; 
implementation 
{$R *.dfm} 
procedure TForm1.FormActivate(Sender: TObject); 
begin 
x0:=10; 
y0:=10; 
Form1.Image1.Canvas.MoveTo(x0,y0); 
Form1.Image1.Canvas.LineTo(x0+200,y0); 
end; 
 
Admin: Пользуемся тегами!
Очень нужно применить меганите , а сам еще чайник =((