如何让一条线闪烁(这条线是动态添加的)(100分)

whb_li · 2000-05-22

1.各位师兄，我学delphi已快一年了，可是水平涨的太慢，不知那位师兄
能指点一、二，在下不胜感激！

2.我在一家小公司工作，前面有位高手编了一个'图形编辑器'，现在要求
让一条线闪烁，我怎么也做不出来，不知那位师兄有办法，能告诉我，
多谢！！

老屯 · 2000-05-23

给该直线加上一个timer,令Canvas.Pen.Mode := pmNot;定时重画该直线.
可以给该直线加上一个Flash的属性控制Timer.Enabled.

黄耀彰 · 2000-05-23

让一条线闪烁可以让它定时改变颜色。

就可以产生闪烁感。

whb_li · 2000-05-23

这条线是在众多线中的一条，得到一个信号时，才取出，并闪烁，

wjiachun · 2000-05-23

有多少条都没关系的，其他的你不用管，在得到信号是，让你指定的这条
定时改变颜色就可以让它闪烁了

SuperMMX · 2000-05-23

我惨了，我也要闪烁效果，然后我就在 image 中用一个循环画，
猜，我看到了什么？什么也没看到，只看到最后的结果，
前两天看见一位老兄说，image 是全部画完以后才显示的，
似乎用 timer 不是个好办法。

whb_li · 2000-05-31

还有没有那位大侠有更好的方法，多谢了，

whb_li · 2000-05-31

难道太简单，没有人愿意回答，我真惨！！

Chenlili · 2000-05-31

加一个Timer,
begin
if timer.enabled then
p1.visibled := not p1.visibled;
end;

whb_li · 2000-06-04

多人接受答案了。