var
List: TObjectList<TNewObject>;
Obj: TNewObject;
begin
Obj := TNewObject.Create('Three');
List := TObjectList<TNewObject>.Create();
List.Add(TNewObject.Create('One'));
List.Add(Obj);
Obj.free; //手动释放
List.Pack(function(const L, R: TNewObject): Boolean begin result:= L = nil; end) //如何判断L是否释放
List.Free
readln;
end.

代码如1楼所示。
本来TObjectList提供删除其中的元素后，自动释放被删除的元素。
但是这个元素一旦在外部被删除，那么List.Free的时候，就会报错。
因此，需要对List进行清理，即Pack，清除为空的元素。
于是就需要在Pack中，定义出什么样的元素是空元素，涉及到对L的判断。
if L = nil then ...
if Not Boolean(L) then ...
if Assigned(L) then ...
这三种办法，都无法判断Obj被Free掉了。。。
求高人指点！

既然都用TObjectList了，你就不该在外面释放

如果非要这样，那就放弃Free，改用函数FreeAndNil吧。
例如：T.Free => FreeAndNil(T)
这样施放的类变量会被置nil，也就可以使用是否=nil来判断了。