Показать сообщение отдельно
  #1  
Старый 22.10.2009, 02:06
mazay mazay вне форума
Прохожий
 
Регистрация: 22.10.2009
Сообщения: 2
Репутация: 10
По умолчанию Как сделать мерцании в Delphi

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

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