kann man einer Procedure als Parameter eine andere Procedure übergeben, o.ä.?

[Bernhard Geyer]

Da geht:

Delphi-Quellcode:

type
  TMyCheckFunction = function(...): Boolean;

procedure Machwas(MyCheckFunction: TMyCheckFunction);
begin
  ...
  if MyCheckFunction(...) ...
end;


function CheckImpl1(...): Boolean;

function CheckImpl2(...): Boolean;


procedure DoIt;
begin
  Machwas(CheckImpl1);
  
  Machwas(CheckImpl2);
end;