Скрыть каретку в 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 такого не происходит. Как оно это делает?

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

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