Получаем номер текущей строки в Memo
Найти в Memo, номер текущей строки, можно следующим образом:
1) Кидаем на форме 1 — Memo, 1 — Label и 1 — Button;
2) Создаем обработчик событий OnClick на кнопке, где записываем следующее…
|
1 2 3 4 5 6 |
var FindLine: integer; begin FindLine:= SendMessage(Memo1.Handle, EM_LINEFROMCHAR, word(-1), 0); Label1.Caption:=IntToStr(FindLine); end; |
3) Запускаем проект и если все введено четко, то после помещения курсора на любую строку, после нажатия кнопки, наш Label высветит ее номер.
Не забываем, что нумерация строк в Memo начинается с нуля.