Einzelnen Beitrag anzeigen

romber

Registriert seit: 15. Apr 2004
Ort: Köln
1.166 Beiträge
 
Delphi 10 Seattle Professional
 
#1

Erweiterte Suche im Text???

  Alt 22. Nov 2004, 15:33
Hallo!

Ich möchte überprüfen, ob eine dynamisch vom Benutzer eingegebene Zeichenfolge in einem String vorhanden ist. Das geht doch ganz einfach mit pos:


Code:
...
if pos(LowerCase(Edit1.Text), LowerCase(Memo1.Text)) > 0 then
ShowMessage('String gefunden!')
Ok, funktioniert gut. Ich möchte es jetzt so machen, dass auch änliche Zeichenfolgen gefunden werden. Zum Beispiel man möchte prüffen, ob die Zeichenfolge 2 Zimmer Wohnung in einem Text vorhanden ist. Im Text ist diese vorhanden, aber mit Bindestrich 2-Zimmer Wohnung oder gar zusammengeschrieben 2 Zimmerwohnung. Diese müssen auch erkannt werden. Hat jemand schon so etwas gemacht? Wie mache ich das?

Danke!
  Mit Zitat antworten Zitat