Wie anonyme Funktion nutzen?

[BlueStarHH]

Ich habe folgende Funktion:

Delphi-Quellcode:

TMyFunc = function(Item: TListItem): Boolean of object;

function Foo(AFunc: TMyFunc = nil): Boolean;
begin
 
end;

Wenn ich Foo aufrufen, möchte ich nun im Parameter AFunc eine anonyme Funktion wie folgt nutzen:

Delphi-Quellcode:

...
begin
  Foo(function (Item: TListItem): Boolean
    begin
      //do something
    end
  );  
end;

Doch das gibt den Fehler:
E2010 Inkompatible Typen: 'TMyFunc' und 'Procedure'

Was ist zu tun?