Break / Exit - Grundsatzfrage

[burn]

Hallo,

habe mal eine eine grundsätzliche Frage.

Oft genug habe ich jetzt schon in der DP gelesen, daß
die Benutzung von Break und Exit schlechter Programmier-Stil ist.

Aber wie löse ich dann z.B. folgendes Problem:

Ich habe eine Liste bzw. Array mit Strings und möchte prüfen
ob ein String schon in der Liste vorhanden ist.

Ich mach das immer so:

Delphi-Quellcode:

function InListeVorhanden(SuchString: string): Boolean;
begin
  Result := False;
  for i := 0 to List.Count-1 do
  begin
    if SuchString = List[i] then 
    begin
     Result := True;
     Exit;
    end;
  end;
end;

Setze ich ja hier das Exit nicht, rattert die Funktion ja durch die ganze Liste was
ja durchaus langsamer kein kann, wenn der Suchstring beim Index 5 gefunden
wird und z.B. 10000 Einträge vorhanden sind.

Wie sollte man es sonst machen, wenn man "guten" Programmier-Stil verwenden will.

MfG Burn...