Alice - künstliche Intelligenz

[Progman]

Found := (Pos(Txt, Str) >= -1); Das ist nicht ganz korrekt. Pos gibt die Position des ersten Vorkommens zurück, die (in Delphi-Strings) mit 1 beginnt.
Wurde nichts gefunden, wird 0 zurückgegeben. Also würde die ja immer True zurrückliefern.
richtig ist:
Found := Pos(Txt, Str) > 0;