Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.26;
Скачать: CL | DM;

Вниз

Как узнать прокрученность Memo?   Найти похожие ветки 

 
noclip ©   (2006-01-03 22:38) [0]

Извините за ламерский вопрос.
Сабж - имеется в виду как узнать на сколько прокручен Memo по обеим осям.
Мне надо это, чтобы определить позицию текстового курсора в моноширинном тексте относительно координат компонента.
Относительно текста - использую Memo1.CaretPos, а надо еще учесть прокрутку.

...Просто хочу в редакторе сделать autocomplete (а-ля сам delphi) через вот это и PopupMenu. Глупо, я понимаю... Но хочется именно так.


 
begin...end ©   (2006-01-04 11:08) [1]

> noclip ©   (03.01.06 22:38)

> Мне надо это, чтобы определить позицию текстового курсора
> в моноширинном тексте относительно координат компонента.

Сообщение EM_POSFROMCHAR предназначено для определения "клиентских" координат символа с заданным номером. Поэтому можно определить номер символа, возле которого находится курсор (свойство SelStart), а потом послать EM_POSFROMCHAR:

var
 P: TSmallPoint;
begin
 P := TSmallPoint(Memo.Perform(EM_POSFROMCHAR, Memo.SelStart, 0))
end

Только не забывайте проверять, не превышают ли полученные координаты размеров клиентской области -- такое может случиться, если курсор из-за прокрутки не виден.


 
noclip ©   (2006-01-04 22:00) [2]

THX



Страницы: 1 вся ветка

Текущий архив: 2006.03.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.032 c
2-1142236665
Gleb
2006-03-13 10:57
2006.03.26
Вот дано: memo1 и []-Checkbox1..7(Как спомощью CheckBox1..7 мен)


2-1141915164
dest81
2006-03-09 17:39
2006.03.26
BDE


15-1141674936
Piter
2006-03-06 22:55
2006.03.26
Поиск подстроки в в JavaScript


4-1136631724
Igor_thief
2006-01-07 14:02
2006.03.26
Системный курсор


1-1140510419
Гость101
2006-02-21 11:26
2006.03.26
TWebBrowser поиск