Reihenfolge der Prozeduren

[unclesam2000]

Hallo Liebe Delphi-Praxis-Gemeinde,
ich habe ein etwas komplexeres Problem (wie ich glaube )

Folgenden Code nehme ich als Grundlage:

Delphi-Quellcode:

procedure test;
begin
 if Bedingungen=true then
  Anweisungen
  weiter:=2;
end;

procedure test2;
begin
 if Bedingungen=true then
  Anweisungen
  weiter:=3;
end;

procedure test3;
begin
 if Bedingungen=true then
  Anweisungen
  weiter:=1;
end;

procedure zusammen;
begin
if weiter=1 then test
else if weiter=2 then test2
else if weiter=3 then test3;
end;


begin

zusammen;

end.

Das funktioniert soweit ganz gut. Jetzt möchte ich aber, wenn die Bedingung in test nicht erfüllt ist, dass er dann automatisch zu test2 geht. Leider geht es so, wie ich es habe nicht, da test2 ja HINTER test kommt.
Ich hoffe, ich konnte die Frage einigermaßen deutlich formulieren.

Viele Grüße
Unclesam2000