edit Feld auf ein bestimmtes Wort untersuchen

[Popov]

Wobei ich dir für den Vergleich von Texten SameText(Text1, Text2) empfehlen würde. Denn das normale

if 'Text' = 'Text' then ... klappt zwar, aber

if 'Text' = 'text' then ... würde nicht klappen. SameText beachten Groß- und Kleinschreibung nicht. Also

if SameText('Text', 'text') then Oder in deinem Fall

if SameText(edit1.text, 'Weil') and SameText(edit1.text, 'Und') then label1.caption := 'Sehr Gut!' ;