Вставка в мемо

← →
фыва (2007-10-15 17:43) [0]

Всем привет!
Мне нужно узнать номер какой строки выделен в одном мемо и, в зависимости от этого, ввести в другой мемо строку, в положение курсора. Как это сделать?
Заранее благодарен.

← →
Palladin © (2007-10-15 17:53) [1]

Ну если WordWrap=False тогда TMemo.CaretPos

← →
фыва (2007-10-15 18:12) [2]

> Ну если WordWrap=False тогда TMemo.CaretPos

а)В общем в первом мемо нужно найти на какой строке выделение - как это сделать? CaretPos даст координаты в пикселах, а как их перевести в строки?
Ну, и во-втором так же.
б)А как вставить текст?

> фыва (15.10.07 18:12) [2]

> а)В общем в первом мемо нужно найти на какой строке выделение

var
Linenum, Charnum: Integer;
..
Linenum := Memo1.Perform(EM_LINEFROMCHAR, -1, 0);
Charnum := Memo1.Perform(EM_LINEINDEX, Linenum, 0);

> б)А как вставить текст?

Seltext := ".."

--
Regards, LVT.

Вставка в мемо Найти похожие ветки