schlange : array [1..10] of person;
... next:=0;
schlange[next] := x;
Das wird wohl 'n Fehler geben.
Ich pers würde ein dyn. Array oder eine TList nutzen.
So , auf dem Formular habe ich erstmal GARNIX.
Muss man ja auch nicht unbedingt.
Und ich weiß auch nicht mehr weiter , bei der function einfuegen(x:person):boolean
.
Kriege ich hier einen Tipp , wie ich eine Person jetzt einfügen kann ?
Na, mach dir ein Editfeld und einen butten auf das Formular. Im Button
XClick -Ereignis machst du deine Einfügen function erin und erhöst den Zähler der Warteschlange.