In Suche wird gefunden auf true gestellt, wenn das Element gefunden wurde.
Alternativ kann man hier auch einen Counter mitführen der halt auch true zurückgibt wenn man am Ende der Elementliste ist.
Allerdings ist die von Sanchez ist immer eine Endlosschleife:
Zitat von
Sanchez:
Delphi-Quellcode:
while NichtGefunden and (i < Count) do begin
if Gefunden then begin
NichtGefunden := false;
MachWasDraus;
i := i + 1;
end;
end;
Schliesslich macht die nix. Noch nichtmal den Counter erhöhen
