ScrollBar в TRichEdit

← →
Grebenkin Rodion (2003-04-04 11:24) [0]

Hi, All

Потерял уже два часа, подскажите pls как отловить исчезновение
веpтикального ScrollBar в TRichEdit (HideScrollBars = True)?

← →
MBo © (2003-04-04 12:32) [1]

в OnResizeRequest проверяй WS_VSCROLL

← →
Diamond Cat © (2003-04-04 15:31) [2]

Не с wm_vscroll скорей всего ничего не получиться, скорей всего тут поможет перехват sbm_get/setscrollinfo либо WM_CTLCOLORSCROLLBAR хотя последнее врядли поможет

← →
MBo © (2003-04-04 16:01) [3]

>Diamond Cat
W S_VSCROLL

← →
RGrebenkin © (2003-04-04 17:06) [4]

Pls, а как проверить WS_WScroll (для тех, кто в танке)

← →
MBo © (2003-04-04 17:11) [5]

if (GetWindowLong(RichEdit1.Handle, gwl_style) and WS_VSCROLL)>0

← →
Diamond Cat © (2003-04-04 17:17) [6]

> MBo ©

пардон, невнимательно прочитал

← →
RGrebenkin © (2003-04-04 17:20) [7]

Не работает :(

← →
MBo © (2003-04-04 17:21) [8]

У меня работает.

← →
MBo © (2003-04-04 17:22) [9]

Кстати, как, по-твоему, это должно работать?

← →
RGrebenkin © (2003-04-04 17:22) [10]

Pls, отправь проект на RGrebenkin@Ibs.Ru

Работать долно примерно так :

WordWrap:=True;
ScrollBars:=[ssHorizontal];
HideScrollBars:=True;

Как только набираемый текст доходит до конца окна и появляется скроллинг - выкидываем сообщение, и наоборот как только текст стираем и скроллинг убирается - выкидываем сообщение.

>Pls, отправь проект
???????

>ScrollBars:=[ssHorizontal];
А вначале о вертикальном скроллбаре говорил

I"m sorry, уже крыша едет. Суть дела то не меняется :)))

Все заработало ! Большое СПАСИБО Б.Новгородову !!!

ScrollBar в TRichEdit Найти похожие ветки