Um nochmal auf das Problem zurückzukommen, ich würde es sogar mit einer
for in
-Schleife machen, da man hier ja nur lesezugriff braucht. Wäre noch etwas schneller und einfacher:
Delphi-Quellcode:
function AssertArray(AArray: TArray<Boolean>): Boolean;
begin
for Result in AArray do
begin
if not Result then
begin
Exit;
end;
end;
end;
Das wäre sicherlich die Eleganteste Lösung.