TMemo; Wort an aktueller Cursorposition auslesen

[pelzig]

memo.SelText := 'Kein Denkfehler!';