Как в runtime скрыть/показать скроллбар в TKOLMemo?

← →
Моторокер (2006-10-24 08:50) [0]

Нужно во время работы показывать скроллбар в зависимости от объёма текста. В designtime свойства настраиваются нормально, однако в runtime скрыть/показать скроллбар в KOLMemo не получается.
KOLRichEdit сам справляется с подобной функцией, но мне не нужен доп. функционал.

← →
Grom PE © (2006-10-24 12:57) [1]

Смотри функцию ShowScrollBar в WinAPI =)

← →
MTsv DN © (2006-10-24 19:39) [2]

> Смотри функцию ShowScrollBar в WinAPI =)
Лучше не так... Лучше так. В обработчике OnMessage:
if (Msg.message = WM_NCCALCSIZE) then begin style := getWindowLong( Memo1.Handle, GWL_STYLE ); If (style and WS_VSCROLL) <> 0 Then SetWindowLong( Memo1.Handle, GWL_STYLE, style and not WS_VSCROLL ); If (style and WS_HSCROLL) <> 0 Then SetWindowLong( Memo1.Handle, GWL_STYLE, style and not WS_HSCROLL ); inherited; end;

Как в runtime скрыть/показать скроллбар в TKOLMemo? Найти похожие ветки