Переключение из ListView в VirtualStringTree

Я пытаюсь строить свои проекты с VirtualStringTree, а не с Listview, из-за огромной разницы в скорости. Дело в том, что даже после просмотра демонстрации я просто не могу понять, как именно использовать его в качестве ListView. Например, добавление, удаление и в основном просто работа с элементами ListView очень просты, но когда я смотрю на VT, он становится слишком сложным.

Все, что я ищу, это VT, который выглядит как ListView, с подпунктами и т. Д.

Вот некоторые подпрограммы, использующие ListView, которые я хотел бы использовать с VT (Это всего лишь псевдо-пример:

procedure Add;
begin
  with ListView.Items.Add do
    Begin
      Caption := EditCaption.Text;
      SubItems.Add(EditSubItem.Text):
    End;

end;

Procedure ReadItem(I : Integer);
begin

   ShowMessage(ListView.Items[I].Caption);
   ShowMessage(ListView.Items[I].SubItems[0]);

end;

Конечно, также функция Delete, но так как это похоже на 1 строку Я не стал беспокоиться: P

Может ли кто-нибудь перевести приведенные выше примеры на использование VT в стиле ListView?

Спасибо!