Сделал простой тест производительности многозадачной системы. Есть TSomeItem, который похож на TListItem (Есть Caption и SubItems: TStringList), но добавлена CriticalSection на чтение и запись Caption и значений SubItems. Есть TThread, в которой создается 250 000 элементов и в цикле они заполняются рандомными строками. И есть форма с TListView с OwnerData, который отображает 6 колонок (Caption + 5 SubItem).