Er hat da etwas mit SetLength und der Schleife durcheinander gebracht.
Es ist nicht das SetLength sondern die Schleife bei welcher -1 geschrieben werden muss.
Denn was würde denn logischerweise das hier ergeben
Delphi-Quellcode:
AnzahlPatienten := 1;
SetLength(Feld, AnzahlPatienten - 1);