Frage zu Rezeptsammlung-> Suchfunktion durch Array funktioniert nicht

[Delphi.Narium]

Anstelle der Zeile mit IfThen eventuell:

Delphi-Quellcode:

  case Gefunden of
    true : Label9.Caption := 'Das Rezept ist in der Rezeptsammlung vorhanden!';
    false: Label9.Caption := 'Das Rezept ist nicht in der Rezeptsammlung vorhanden!';
  end;

Mein Delphi kommt mit dem IfThen zurecht.

Im Original steht nicht

Delphi-Quellcode:

Label9.Caption:=('Das Rezept ist in der Rezeptsammlung vorhanden!');
[IfThen(Gefunden,'','nicht ')]);

sondern Label9.Caption:=Format('Das Rezept ist in der Rezeptsammlung vorhanden!',[IfThen(Gefunden,'','nicht ')]); Format ist eine Funktion, die zur parametrisierten Ausgabe von Zeichenfolgen dient.

IfThen ist eine Funktion, die abhängig vom Wahrheitsgehalt des ersten Parameters den zweiten oder dritten Parameter ausgibt.

IfThen('ist dieses hier wahr','gebe diese aus','ansonsten jenes');
IfThen(1 = 2,'richtig','falsch');
IfThen(Gefunden,'','nicht ');
Wenn also in der vorherigen Schleife nichts gefunden wurde, so ist Gefunden = false und es wird nicht ausgegeben. Wurde etwas gefunden, so wird nur ein Leerstring (also '') ausgegeben.