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

Вниз

Невидимый текстовый курсор в RichEdit   Найти похожие ветки 

 
mao ©   (2003-06-17 08:26) [0]

Кто-нибудь знает, как сделать невидимым текстовый курсор в RichEdit? Но нужно, чтобы он там был, т.к. хотелось бы чтобы тестовое окно имело фокус, в нем действовало выделение текста и т.д. Нужно сделать из этого окна просто отображающее текст окно.


 
Anatoly Podgoretsky ©   (2003-06-17 09:17) [1]

Поставь режим ReadOnly и не обращай внимания на курсор.


 
Song ©   (2003-06-17 09:25) [2]

HideCaret()


 
ghg ©   (2003-06-17 09:46) [3]

hidecaret не поможет
надо hidedestroy или destroyhide не помню
и при каждой передаче фокуса этому контролу заново делать destroy

у меня все работает


 
ghg ©   (2003-06-17 09:47) [4]

тьфу черт
не hide а caretdestroy


 
mao ©   (2003-06-17 10:29) [5]

А как использовать этот caretdestroy?


 
ghg ©   (2003-06-17 10:55) [6]

2mao © (17.06.03 10:29)
Вот так. Тока вместо TEdit, соответственно RichEdit. Должно работать.


Tedit_focus = class (Tedit)
public
procedure Focus(var a : TWMSetFocus); message wm_SETFOCUS;
end;
{-------------------------------------------------------------------------------------------------------}
procedure Tedit_focus.Focus(var a : TWMSetFocus);
begin
inherited;
DestroyCaret;
a.Result:=0;
end;


 
mao ©   (2003-06-24 15:59) [7]

ghg © (17.06.03 10:55)
Когда поросто делаю DestroyCaret на каком-нибудь событии RichEdit, то курсор пропадает.
Но не получается вызвать Tedit_focus.Focus(). :( Что нужно передать ей в качестве параметра?



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

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

Наверх




Память: 0.48 MB
Время: 0.011 c
1-20109
Goga
2003-06-24 10:41
2003.07.07
Подскажите, как реализовать обратный вызов от MIDAS сервера


14-20303
leonidus
2003-06-18 21:44
2003.07.07
Накручивалка баннеров


3-19988
nv-vetal
2003-06-13 14:28
2003.07.07
dbExpress->MySQL.Как подключиться, и что для этого...


11-20027
Alexander
2002-10-31 13:55
2003.07.07
Вопрос по KOLLabel: у меня она лежит на панели с выравниванием


7-20333
chernoruk
2003-04-23 20:39
2003.07.07
Как же наконец программно звук убить?