Zitat von
Urba:
Delphi-Quellcode:
for I := 1 to cMAX_KLASSE1 do begin
if aKlasse1[I] = nil then break;
aKlasse1[I] := nil;
end;
Wemn die erste Klasse
nil ist werden die restlichen nich mehr freigegeben, da
break die Schleife verlässt. Was du benutzen musst ist
Continue. Und wie schon angemerkt wurde, gibt das Setzen auf
nil nichts frei. Nutze
FreeAndNil, um deine Klasse freizugeben.