当鼠标悬停在标签上时，如何在Delphi中突出显示标签？

我应该使用哪个事件？我该怎么说

procedure TLogin.FormCreate(Sender: TObject);
begin
position:=poScreenCenter;
end;

procedure TLogin.lblHelpClick(Sender: TObject);
begin
Help.Show;
end;

end.

---

在哪里使用代码突出显示？

我有一个解决方案，如下所示：

设置透明（标签属性）=False

标记事件：

• onMouseCenter（将光标放在标签上时）
• OnMouseLeave（当光标位于标签外时）

代码如下所示：

// On Mouse Enter
procedure TMainForm.lblNameMouseEnter(Sender: TObject);
begin
    lblName.Color := clRed; // assign color that you want
end;

// On Mouse Leave
procedure TMainForm.lblNameMouseLeave(Sender: TObject);
begin
    lblName.Color := clBtnFace; // assign default color
end;

---

希望您能尽快解决此问题。

我有一个解决方案如下：

设置透明（标签属性）=False

标记事件：

• onMouseCenter（将光标放在标签上时）
• OnMouseLeave（当光标位于标签外时）

代码如下所示：

// On Mouse Enter
procedure TMainForm.lblNameMouseEnter(Sender: TObject);
begin
    lblName.Color := clRed; // assign color that you want
end;

// On Mouse Leave
procedure TMainForm.lblNameMouseLeave(Sender: TObject);
begin
    lblName.Color := clBtnFace; // assign default color
end;

---

希望您能尽快解决此问题。

onMouseCenter/leaveonMouseCenter/leave非常感谢您的帮助……非常感谢您的帮助。。。