![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вставка в мемо
фыва © (2007-10-15 17:43:00)Всем привет!
Мне нужно узнать номер какой строки выделен в одном мемо и, в зависимости от этого, ввести в другой мемо строку, в положение курсора. Как это сделать?
Заранее благодарен.
Leonid Troyanovsky (2007-10-15 19:12:00) [1]
> фыва (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.
фыва (2007-10-15 18:12:00) [2]
> Ну если WordWrap=False тогда TMemo.CaretPos
а)В общем в первом мемо нужно найти на какой строке выделение - как это сделать? CaretPos даст координаты в пикселах, а как их перевести в строки?
Ну, и во-втором так же.
б)А как вставить текст?
Palladin (2007-10-15 17:53:00) [3]Ну если WordWrap=False тогда TMemo.CaretPos