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

Вниз

Получить текст от символа < до ... над котрым находиться курсор   Найти похожие ветки 

 
Viola   (2005-01-06 14:35) [0]

Еще один вопрос:
Как мне получить текст из RichEdit над которым находиться курсор мыши. (текст от < до ...  )


 
KSergey ©   (2005-01-06 15:17) [1]

Вот прямо курсор мыши???

Что-то такое можно попробовать

sp: TSmallPoint;
p: TPoint;
n: Integer;

p := RichEdit.ScreenToCleint(Mouse.CursorPos);
sp.x := p.x;
sp.y := p.y;
n := RichEdit1.Perform (EM_CHARFROMPOS, 0, Integer(sp));
Inc(n);  // не красиво, ну на деле можно будет нормально сделать
if (n > 0) AND (Length(RichEdit1.Text) <= n) then
 RichEdit1.Text[n]  - вот тут по идее получаем символ где-то в районе мыши...



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

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

Наверх




Память: 0.46 MB
Время: 0.046 c
3-1103656778
Guitar
2004-12-21 22:19
2005.01.23
Какое событие происходит и как его обработать?


4-1102363223
z_man
2004-12-06 23:00
2005.01.23
Как поместить программу в автозагрузку?


1-1105606105
Leon1
2005-01-13 11:48
2005.01.23
Alignment


1-1105085136
Erik1
2005-01-07 11:05
2005.01.23
Непонимаю, чего ненравится компилятору?


14-1104592017
Просто Джо
2005-01-01 18:06
2005.01.23
Какая гадость эта ваша... (по выбору)