-
Не могу скрыть каретку ПОЛНОСТЬЮ в richedit. Пробовал все известные мне способы, но ни один из них не работает так, как в VCL. В лучшем случае, каретка скрывается, но, при нажатии левой мыши, курсор на мгновение появляется. Как убить курсор так, чтобы его вовсе не было видно?
-
Имеется в виду мигающий символ "|"? Может
function TForm1.RichEdit1Message(var Msg: tagMSG;
var Rslt: Integer): Boolean;
begin
result:=False;
if msg.message=WM_SETFOCUS then
Result:=True;
end;
-
Или так: WM_SETFOCUS: begin HideCaret(re.Handle); Result := true; end;
-
Это всё хорошо, ребята. Да, работает. Но вот если нажать на тексте мышью, каретка на мгновение появится. Попробуйте. В vcl такого не происходит. Как оно это делает?
-
Может тогда еще WM_LBUTTONDOWN, WM_LBUTTONUP запретить?
|