[mazay]

Подскажите пожалуйста как с делать так чтобы на 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: Пользуемся тегами!

Очень нужно применить меганите , а сам еще чайник =((