Скачать: CL | DM;

Как в 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;

---

← →
Grom PE ©   (2006-10-25 03:55) [3]

MTsv DN ©   (24.10.06 19:39) [2]

Хм.. Буду иметь ввиду. Спасибо.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.028 c