Rekursive Programmierung - Käsewürfel

[MrSpock]

Hallo LordDave,

zunächst einmal herzlich willkommen im Delphi-PRAXIS Forum.

Hier einmal ein paar erste Kommentare zu deinem Code:

In der Methode CheckWay setzt du zunächst waterfilled auf True und prüfst erst dann, ob es überhaupt ein Luftwürfel ist. Ein käsegefüllter Teilwürfel kann aber nicht waterfilled sein. Ist aber wohl nur ein Schönheitsfehler.

Ich würde nicht mit CheckWay(x, y, z) = True arbeiten, es genügt:

if CheckWay(x, y, z) then ... und bei negativ Abfrage sieht es einfach besser aus, wenn du schreibst:

if Not Cell[x, y, z].waterfilled then...