Question

delphi如何实现文字左右移动

delphi如何实现label 文字左右移动并实现两种字体颜色闪烁效果

Answer 1

用timer呗，让label左右移动，并不停地改变label的字体颜色不就行了
label1.left := label1.left + 1;//向右动，减1就是向左动

if label1.font.color = 红色 then
绿色
else
红色

代码都在OnTimer中写不就行了