TListView自动将图像列表中的图像附加到TListView的第一列。我如何摆脱这种行为？

Question

我使用的是Embarcadero的C ++ Builder XE8。我有一个ListView，并动态添加其项目列。我需要一个图像列表，因为我想将图像添加到第二列，也就是使用（ListItem-＆gt; SubItemImages [0] = i;）

似乎通过添加此图像列表，默认情况下C ++ Builder认为主列还需要一个图像，因此它默认将图像列表的第0个元素附加到该列中的所有项目。我不希望这种情况发生。而是在“ID”列下，我只想要ID而不是任何图像。我怎样才能做到这一点？

我的代码：

void __fastcall TForm1::FormCreate(TObject *Sender)
{
  const string firstName[] = {"Snowball", "Scavies", "Tinkerbell", "Fido", "Garfield", "Kobe"};
  const string lastName[] = {"M", "E", "O", "W", "W", "W"};
  TListColumn  *NewColumn;
  TListItem  *ListItem;
  TListView   *ListView = ListView1;

  ListView->SmallImages = ImageList1;

  ListView->ViewStyle = vsReport;
  NewColumn = ListView->Columns->Add();
  NewColumn->Caption = "ID";
  NewColumn = ListView->Columns->Add();
  NewColumn->Caption = "Node";
  NewColumn = ListView->Columns->Add();
  NewColumn->Caption = "First";
  for (int i = 0; i < sizeof( firstName ) / sizeof( firstName[0] ); i++)
  {
    char buffer[3];
    itoa(i,buffer,10);
    ListItem = ListView->Items->Add();
    ListItem->Caption = buffer;
    ListItem->SubItems->Add(firstName[i].c_str());
    ListItem->SubItems->Add(lastName[i].c_str());
    ListItem->SubItemImages[0] = i;
    //ListItem->ImageIndex = NULL;
  }
}

Answer 1

当您将项目添加到与 ImageList 相关联的列表视图时，它会假设您的意图是将这些图像用于项目本身，因此添加的每个项目都将被分配默认值 0 的（图像列表中的第一个图像）。

要从项目中删除图像，您只需将 0 的默认 ImageIndex 替换为 -1 ，表示＆ ＃34;没有图像＆＃34;。

ListItem->ImageIndex = -1; 
ListItem->SubItemImages[0] = i;

如评论中所述，这涉及不在项目标题旁边绘制图像（第0列），但列表视图仍将为这些图像留出空间，即使不绘制任何图像：

有两种方法可以避免这种情况：

1. 不要将图像列表与列表视图关联，并使用自定义图形绘制任何需要图像的子项。

2. 将第0列的列宽设置为0以有效隐藏该列，并将第一个子项视为项标题。

每种方法都有权衡。

第一个要求增加自定义绘图的复杂性。第二个更直接，但意味着您需要在列表视图上启用 RowSelect 行为。如果没有这个，子项不能用于选择列表中的项目，也不能用任何选择突出显示。

这也意味着在任何事件处理等中你必须记住将 Subitem [0] 视为特殊情况（项目＆＃39;标题＆＃39;）：

ListView->RowSelect = true;

// ..

NewColumn = ListView->Columns->Add();
NewColumn->Caption = "Not Used";
NewColumn->Width   = 0;
NewColumn = ListView->Columns->Add();
NewColumn->Caption = "ID";

// ..

// No need to set ListItem->Caption since it is hidden

ListItem->SubItems->Add(buffer);  // subitem[0] = 'the item'
ListItem->SubItems->Add(firstName[i].c_str());
ListItem->SubItems->Add(lastName[i].c_str());
ListItem->SubItemImages[1] = i;

一些好奇的用户可能会调整 列[0] 并发现您隐藏的秘密。 ：）

Answer 2

您在寻找什么吗？

然后，在TForm.OnCreate中，只需将ListItem->Indent属性设置为-1：

// in Pascal code
for lListItem in ListView1.Items do
  lListItem.Indent := -1;