Generic ObjectList und Suchen - Wie am besten ?

[Stevie]

Delphi-Quellcode:

function TMyObjectList<T>.Search(const predicate: TPredicate<T>): T;
begin
  for Result in Self do
    if predicate(Result) then
      Exit;
end;

TPredicate<T> ist in SysUtils definitiert.