当hoverering一张图片时,TVirtualStringTree改变光标

时间:2015-04-28 18:46:27

标签: delphi virtualtreeview tvirtualstringtree

当我从节点悬停ImageIndex时如何更改光标

基本上我在节点上显示了一个附加图标,我想让用户通过更改光标了解他是否有可能通过按下它来下载文件。

1 个答案:

答案 0 :(得分:1)

在树的OnMouseMove事件检查中,光标位于“图标区域”上并相应地更改光标。像

这样的东西
procedure TForm1.VTMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var HitInfo: THitInfo;
begin
  VT.GetHitTestInfoAt(X, Y, True, HitInfo);
  if(hiOnNormalIcon in HitInfo.HitPositions)then begin
     VT.Cursor := crHandPoint;
  end else begin
     VT.Cursor := crDefault;
  end;
end;

VT变量是您的TVirtualStringTree对象。