Ich habe nun die Idee von Samso übernommen, aber festgestellt, dass ich durch Erweiterungen des Programms nun auch Parameter an die Funktionen übergeben muss.
Delphi-Quellcode:
function A(var x1: String; x2: integer; x3: String; x4: String; var x5: String): Boolean;
begin
Result := True;
end;
function B(var x1: String; x2: integer; x3: String; x4: String; var x5: String): Boolean;
begin
Result := True;
end;
type
TMyFunction = function(var x1: String; x2: integer; x3: String; x4: String; var x5: String): Boolean;
var
Steps: array of TMyFunction;
Step: Integer;
res: Integer;
begin
SetLength(Steps, 2);
Steps[0] := A; <-- wie muss ich die Funktion hier schreiben, da sie Parameter hat?
Steps[1] := B;
for Step := 0 to High(Steps) do
res := Steps[Step];
end.