Delphi VirtualTreeView - 节点悬停时的自动聚焦节点

Jac*_*ień 2 delphi drag-and-drop virtualtreeview

我正在将节点从一个应用程序拖到另一个应用程序.只有在我之前选择节点时,它才能正常工作.这是因为我使用GetNodeData(FocusedNode)方法收集数据.

我想以某种方式在节点悬停上自动聚焦节点.可能吗?

我正在使用VirtualTreeView v.4.8.7

TLa*_*ama 5

如果要在悬停时关注并选择节点,请尝试OnHotChange使用以下内容进行操作

procedure TForm1.VirtualStringTree1HotChange(Sender: TBaseVirtualTree; OldNode,
  NewNode: PVirtualNode);
begin
  VirtualStringTree1.FocusedNode := NewNode;
  VirtualStringTree1.Selected[NewNode] := True;
end;
Run Code Online (Sandbox Code Playgroud)