Находит текст под курсором. Только для Delphi