delphi - 如何获取 ListView 中的项目和子项目？

Question

我想在我的 ListView 中获取所有项目和子项目，但我得到的只是“TlistItem”

这是我的代码:

procedure TFrameAnalyzer.AddEntry(opcode:word;data:Array of byte;direction:byte);
begin
  MessageBox(0,PChar(sListView1.Items.Item[4].ToString),'',0);
end;

如何以字符串形式获取项目名称及其 2 个子项目的名称？

Answer 1

您无法获取项目的名称，因为它没有名称。它有一个 Caption不过，还有一个 SubItems TStrings 类型的属性.所有这些都可以在 Delphi 文档 BTW 中轻松找到。查看 TListItem和 TListItems类。

所以你可以做类似的事情

procedure TFrameAnalyzer.AddEntry(opcode:word;data:Array of byte;direction:byte);
var
  Item: TListItem;
  s: string;
begin
  Item := sListView1.Items.Item[4];
  s := Item.Caption + #13#10
    + '  ' + Item.SubItems[0] + #13#10
    + '  ' + Item.SubItems[1];
  MessageBox(0, PChar(s), nil, 0);
end;

省略了所有错误处理，如果不首先检查索引是否有效，您当然不应该以这种方式访问​​数组属性。