Как отследить номер строки при вводе символов в Memo в Delphi


Получить номер строки при вводе символов в Memo в Delphi

Для этого нужно: 

1) Поместить на форму компонент Memo;

2) В свойстве Lines компонента убрать весь текст, чтоб окошко было чистым; //Можно в принципе и не убирать;

3) В событии OnChange на Memo прописать следующее:

4) В событии OnShow на форме прописать то же самое:

5) Запускаем проект;

Теперь при перемещении курсора вниз по строкам, в свойстве Caption формы, будет определяться номер текущей строки.