Anonymous methods lets you write methods
within other methods that do not have a name.
type
TDemoAnonMethod = reference to function (n: Integer) :
integer;
procedure
DisplayModifiedValue(n : integer; AnonMethod:
TDemoAnonMethod);
begin
Display(AnonMethod(n));
end;
procedure
TForm1.Button1Click(Sender: TObject);
begin
DisplayModifiedValue(5, function (n : integer) :
integer
begin
Result := n * n;
end
);
// displays 25
end;
General
