Undeklarierte Prozeduren aufrufen

**Doofy**

Hallo!

Habe die Aufgabe bekommen, die

Sierpinski-Kurve beliebiger Ordnung rekursiv (auf ein Canvas) zu zeichnen. Dazu habe ich zwar Hilfen bekommen (durch die ich noch durchsteigen muss), möchte allerdings erst einmal die auf Wikipedia angegebene Methode auf Delphi übertragen. Das Problem, das sich mir jetzt stellt, ist das, dass Prozeduren aufgerufen werden, die erst später deklariert werden können, da diese 4 Prozeduren sich untereinander aufrufen.

Bisher habe ich Folgendes:

zusammenfalten · markieren

Delphi-Quellcode:

			 private

    { Private-Deklarationen }

    procedure sierpA (level:integer);

    procedure sierpB (level:integer);

    procedure sierpC (level:integer);

    procedure sierpD (level:integer);[

[...]

procedure sierpA (level:integer);

begin

  if level > 0 then

  begin

    sierpA (level-1); forwdNW (dist);

    sierpB (level-1); forwdN (dist*2); // Zeile 60

    sierpD (level-1); forwdSO (dist);

    sierpA (level-1);

  end;

end;

procedure sierpB (level:integer);

[usw]

Die Frage ist nun also, ob man das irgendwie biegen kann, dass keine Fehlermeldungen mehr à la "[Fehler] Unit1.pas(60): Undefinierter Bezeichner: 'sierpB'" mehr bekomme und ich das Programm kompilieren kann.
Bei Java scheint das zu klappen, bei Delphi allerdings nicht.

Bin für Antworten aller Art dankbar.

Undeklarierte Prozeduren aufrufen

Undeklarierte Prozeduren aufrufen

Forumregeln