Hilfe beim Algorithmus (Baumrekursion)

[Delphi-Noobie]

Naja das Prob is, dass ich da nich wirklich durchsehe, da ich mit diesen Komponenten und Befehlen nie gearbeitet habe. Das Ergebnis: naja.. wie gesagt gibt der Baum bei Person1- Person 2 und person 3 aus, das soll er aber nicht, sondern wie in dem Bsp. oben. Das prog soll so aussehen: ich habe 4 Editfelder und ein Button. In edit Feld 1 kommt die Personenanzahl rein und in edit2 die Nummer der Person nach der gefragt ist. Onbuttonclick lädt er ein array mit n Strings(Personen) und führt eine Function aus:
Function (getpersons(nr:integer,z:array of string):endFrauen // <- endFrauen war record. So endfrauen.frau1 soll die 1. Person sein, die "nr" informiert und endfrauen.frau2 soll die 2. sein, welche dann in edit3 und 4 ausgegeben werden. Also nur 1-2 Funktionen.

Könntest du es vielleicht in meiner Variante erklären?