listview - 如何从 Delphi 10 中的 ListView 访问 ItemAppearance？

Question

如下图所示，当单击 ListView 中的项目时，我需要选择 txtID 字段的值。我该怎么做？

Answer 1

procedure TForm1.ListView1ItemClick(const Sender: TObject;
  const AItem: TListViewItem);
begin
  showmessage(AItem.Objects[1].Data.AsString);  // Value of field
  showmessage(AItem.Objects[1].Name);  // Name of field

// OR

  showmessage(AItem.Data['txtID'].AsString);  // Value of field
end;