Ich würde eine Schleife vorschlagen und die Vergleichstexte in ein Array schreiben.
Denn eine Erweiterung kommt bald
Code:
aSuch[0]:= 'Finde';
aSuch[1]:= 'mich';
aSuch[2]:= 'im';
aSuch[3]:= 'String';
found:= false;
For local_i:= 0 to High (aSuch) do
If ContainsText(eingangsString, aSuch[i]) then found:= true;
// oder if Pos(aSuch[i], eingangsString) > 0 then found:= true;
Hätte noch den Vorteil, dass Du rausfinden kannst, welcher Eintrag/ welche Einträge gefunden wurde(n) bzw. deren Position feststellen.