Карта сайта Kansoftware
НОВОСТИУСЛУГИРЕШЕНИЯКОНТАКТЫ
Разработка программного обеспечения
KANSoftWare

Обнаружение прокрутки TMemo

Delphi , Компоненты и Классы , TMemo и TRichEdit

Обнаружение прокрутки TMemo

Автор: Xavier Pacheco

Создайте потомок TMemo, перехватывающий сообщения WM_HSCROLL и WM_VSCROLL:


TSMemo = class(TMemo)

procedure WM_HScroll(var Msg: TWMHScroll); message WM_HSCROLL;
procedure WM_VScroll(var Msg: TWMVScroll); message WM_VSCROLL;
end;

...

procedure TSMemo.WM_HScroll(var Msg: TWMHScroll);
begin
  ShowMessage('HScroll');
end;

procedure TSMemo.WM_VScroll(var Msg: TWMVScroll);
begin
  ShowMessage('VScroll');
end;

Статья Обнаружение прокрутки TMemo раздела Компоненты и Классы TMemo и TRichEdit может быть полезна для разработчиков на Delphi и FreePascal.


Комментарии и вопросы


Ваше мнение или вопрос к статье в виде простого текста (Tag <a href=... Disabled). Все комментарии модерируются, модератор оставляет за собой право удалить непонравившейся ему комментарий.

заголовок

e-mail

Ваше имя

Сообщение

Введите код




Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.



:: Главная :: TMemo и TRichEdit ::


реклама

::


©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007
Top.Mail.Ru Rambler's Top100
20.10.2021 00:43:16/0.031566858291626/2