【问题标题】:How to create fade in and fade out effects for TLabel in DelphiDelphi中如何为TLabel创建淡入淡出效果
【发布时间】:2014-02-17 23:06:55
【问题描述】:

当用户点击标签时,它会在几毫秒内改变颜色,然后返回之前的颜色。

如何在Delphi中模拟这种效果?

【问题讨论】:

  • 在其 onclick 事件触发的一系列定时处理程序中更改标签的字体颜色。
  • 您能详细描述一下这种技术吗?
  • 就像已发布的答案一样。只有你必须多次触发计时器,每次逐渐改变颜色。
  • 谢谢,我知道该怎么做了。

标签: delphi effects


【解决方案1】:

一种方法是在您单击项目时设置字体颜色。然后启动一个TTimer

Label.Font.Color := <insert your highlight color>;
TimerEffects.Enabled := true;

当计时器触发时,请执行以下操作:

TimerEffects.Enabled := false;
Label.Font.Color := clBLack; // whatever color you want to set the label back to

【讨论】:

  • 谢谢!我的第一次尝试是在 OnClick 事件中使用睡眠,但你的建议更好。
猜你喜欢
  • 2014-01-09
  • 2013-07-20
  • 1970-01-01
  • 2011-03-05
  • 2011-10-16
  • 2018-05-04
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
相关资源
最近更新 更多