Schalte in den Projektoptionen die Bereichsprüfung an.
Delphi-Quellcode:
schlange : array [1..10] of person;
constructor tschlange.create;
begin
next :=0;
max := 10;
end;
function tschlange.einfuegen(x:person):boolean;
begin
schlange[next] := x;
Auf was wird "next" wohl stehen, beim Einfügen?
PS: Wozu hast du dir "max" nochmals gespeichert? (das kann man ja aus dem Array auslesen)
Mit einem dynamischen Array oder einer Liste würde man sich nicht speichern müssen, wo man grade ist, da man dort einfach immer die letzte Position als die Aktuelle ansehn könnte.
Eine Liste währe für einen Queue/FiFo (
first in first out) eh besser geeignet, da er Möglichkeiten bietet, um die Lsite zu bearbeiten (Einfügen und Löschen).
Ein Array ist mehr für einen Stack/FiLo (
first in last out) geeignet.