edit Feld auf ein bestimmtes Wort untersuchen

[silver-moon-2000]

Zitat von Popov:

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

Hier widerspreche ich Dir einfach mal, denn das würde nie funktionieren. SameText untersucht ja den gesamten String und nicht einen Teilstring.
if (edit1.text = 'Weil') and (edit1.text = 'Und')... ist ja identisch (bis auf Groß/Kleinschreibung) und das liefert auch immer False.

Zitat von Delphi OH:

Compares two strings by ordinal value without case sensitivity.

SameText compares S1 and S2 and returns True if they are equal.

Du meinst vielleicht eher ContainsText oder ContainsStr ?

[edit]roter kasten, where art thou?