Frage zu Rezeptsammlung-> Suchfunktion durch Array funktioniert nicht

[hoika]

Hallo,
auch mit dem break ist der Code nicht so schön lesbar.

Delphi-Quellcode:

var
  bGefunden: Boolean;
begin
  bGefunden:= False;
  for do
  begin
    if bla then
    begin
      bGefunden := True;
      break;
    end;
  end;

  if bGefunden
    then Label9.Caption := 'gefunden'
    else Label9.Caption := 'nicht gefunden';