Быстрое копирование TList ?

Есть ли быстрый способ скопировать общий TList?

Copy.Capacity := List.Count;
for Item in List do
  Copy.Add (Item);

очень медленно. Похоже, нет способа использовать CopyMemory, поскольку я не могу получить адрес памяти внутреннего массива (что очевидно с точки зрения скрытия информации). Мне не хватает чего-то вроде

List.Copy (Copy);

который использует знание внутреннего представления для повышения производительности. Можно ли это сделать?