要用到泛型的 TObjectList<>，必须先 uses 以下两个单元： System.Generics.Collections, System.Generics.Defaults
第二个单元是用于 TComparer 的声明的。

TMyObj = class
private
public
FMyName: string;
end;

FList: TObjectList;

那么，对这个 FList 做 Sort 的方法是在它的 Sort 方法里面，写入自己的排序算法的匿名函数。
procedure TForm2.SortMyList;
begin
FList.Sort(
TComparer.Construct(
function (const L, R: TMyObj): Integer
begin
Result := CompareStr(L.FMyName, R.FMyName); //对这个 List 里面的 Object 按 FMyName 的字符串排序。
end
)
);
end;