procedure an Mutter Klasse übergeben

[Christian18]

Hallo,

kann man ganze proceduren an die Mutter Klasse übergeben?

Delphi-Quellcode:

procedure TProgramm.Entscheide(p1, p2, p3 : TProcedure);
begin
  case i of
    1 : p1; // Procedure 1 ausführen 
    2 : p2; // Procedure 2 ausführen 
    3 : p3; // Procedure 3 ausführen 
  end;
end;

so in etwa?? funktioniert aber leider nicht.

MFG Christian18