Prozedur einer Variablen zuweisen

[a.def]

Danke für die bisherigen Antworten. Leider kommt keine der Lösungen in Frage, da meine Prozeduren im Unit-Kopf deklariert sind und nicht "lose" rumliegen.

Kleine aber wichtige Info: meine Prozeduren sind im Unit-Kopf in einer Klasse deklariert.

Delphi-Quellcode:

unit uTest;

interface

uses ... ;

type
 TFunc = procedure(Parameter ...);

type
 TWorkerThread = class(TThread)
 private
  aFunc: TFunc;
  procedure meineProzedur1(Parameter ...);
  procedure meineProzedur2(Parameter ...);
  procedure meineProzedur3(Parameter ...);
 // ...
end;

implementation

procedure TWorkerThread.meineProzedur1(Parameter ...);
begin
end;

procedure TWorkerThread.meineProzedur2(Parameter ...);
begin
end;

procedure TWorkerThread.meineProzedur3(Parameter ...);
begin
end;

procedure TWorkerThread.Execute;
begin
 aFunc := TWorkerThread.meineProzedur2; // <= geht nicht
end;