Generics.Collections.TList<T>.需要移动源

Question

不幸的是，Generics.Collections of Delphi 2009 中的 TList 缺少 Move 方法。我迫切需要它。有人可以 post 在这里为我提供更高版本吗？

我打算在后代中使用它 class。

Answer 1

你可以这样实现：

procedure TMyList<T>.Move(CurIndex, NewIndex: Integer);
var
  Item: T;
begin
  Item := Self[CurIndex];
  Delete(CurIndex);
  Insert(NewIndex, Item);
end;

Generics.Collections.TList<T>.需要移动源

Generics.Collections.TList<T>.Move source needed

delphi

generics

move

tlist