[英]How do I change the color of a TLabel when my cursor hovers hover it in Delphi?
所以我嘗試對標簽使用OnMouseEnter
事件並使用代碼:
Label1.Color := clPurple;
但這沒有用
您需要將 Transparent 屬性設置為FALSE
。
另外,不要忘記您也需要設置OnMouseExit
事件。
所以,最簡單的辦法是設置顏色屬性在設計師,然后設置透明屬性為FALSE
在OnMouseEnter
事件和TRUE
在OnMouseExit
事件。
Label1.Font.Color := clPurple;
Label1.Color
是透明的背景色。
在事件中標簽不能透明,標簽默認是透明的,所以這樣做:
Label1.Color := clPurple;
Label1.Transparent := False
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.