Скачать: CL | DM;

Скрыть каретку в richedit НАПРОЧЬ   Найти похожие ветки 

← →
=BuckLr= ©   (2008-05-11 10:35) [0]

Не могу скрыть каретку ПОЛНОСТЬЮ в richedit. Пробовал все известные мне способы, но ни один из них не работает так, как в VCL. В лучшем случае, каретка скрывается, но, при нажатии левой мыши, курсор на мгновение появляется. Как убить курсор так, чтобы его вовсе не было видно?

---

← →
Compiler ©   (2008-05-11 22:20) [1]

Имеется в виду мигающий символ "|"?
Может

function TForm1.RichEdit1Message(var Msg: tagMSG;
 var Rslt: Integer): Boolean;
begin
result:=False;
if msg.message=WM_SETFOCUS then
 Result:=True;
end;

---

← →
mdw ©   (2008-05-12 10:51) [2]

Или так:
WM_SETFOCUS:
  begin
   HideCaret(re.Handle);
   Result := true;
  end;

---

← →
=BuckLr= ©   (2008-05-12 14:32) [3]

Это всё хорошо, ребята. Да, работает. Но вот если нажать на тексте мышью, каретка на мгновение появится. Попробуйте. В vcl такого не происходит. Как оно это делает?

---

← →
Compiler ©   (2008-05-12 22:46) [4]

Может тогда еще WM_LBUTTONDOWN, WM_LBUTTONUP запретить?

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.006 c