windows - 使用 HWND（或类似的东西）作为虚拟字符串树中的节点图像

Question

是否可以显示从外部句柄获得的图标，作为虚拟字符串树中我的节点的图像？节点的数据包含 HWND。

Answer 1

我会使用ImageList分配给您的 VT 的Images属性和OnGetImageIndex事件。以下是使用WM_GETICON填充图像列表的方法。

procedure TForm1.Button1Click(Sender: TObject);
var IconHandle: HIcon;

begin
  IconHandle := SendMessage(123456, WM_GETICON, ICON_SMALL2, 0);
  ImageList_AddIcon(ImageList1.Handle, IconHandle);
end;

例如，将 0 图像索引传递给 VirtualTreeView。

procedure TForm10.VirtualStringTree1GetImageIndex(Sender: TBaseVirtualTree;
  Node: PVirtualNode; Kind: TVTImageKind; Column: TColumnIndex;
  var Ghosted: Boolean; var ImageIndex: Integer);
begin
  ImageIndex := 0;
end;