当我的光标悬停在 Delphi 中时，如何更改 TLabel 的颜色？

Question

So I tried using the OnMouseEnter event for the label and used the code:

Label1.Color := clPurple;

But that didn't work

Answer 1

You need to set the Transparent property to FALSE .

Also, don't forget you need to set the OnMouseExit event too.

So the simplest way is to set the color property in the designer, then set the transparent property to FALSE in the OnMouseEnter event and TRUE in the OnMouseExit event.

Answer 2

Label1.Font.Color := clPurple;

Label1.Color是透明的背景色。

Answer 3

The label can't be transparent to do this in the event and labels are transparent by default, so do this:

Label1.Color := clPurple;
Label1.Transparent := False