Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

перехватывание сообщений [D6, Win95/98, WinME]


Digi ©   (2002-07-17 04:15:00) 

Доброй ночи!
Подскажите, плиз, как перехватить какое-нибудь сообщение посылаемое в стринггрид, который лежит на форме.
Сообщения, которые посылаются форме, я перехватить могу, а, которые посылается в стринггрид, не могу ... если не сложно, то привидите пример. Заранее спасибо.


Digi   (2002-07-17 16:25:00) [1]


> Игорь Шевченко ©


Большое спасибо!


Song   (2002-07-17 15:04:00) [2]

Можно и так :-)


Игорь Шевченко   (2002-07-17 15:01:00) [3]

Не надо ничего делать.

Описываете в форме
private
FOldGridWndProc : TWndMethod;
procedure GridWndProc (var Message : TMessage);
...
end;

В событии OnCreate формы пишете:

with StringGrid1 do begin
FOldGridWndProc := WindowProc;
WindowProc := GridWndProc;
end;

и, соответствено
procedure TForm1.GridWndProc(var Message: TMessage);
begin
if (Message.Msg = то, что надо) then begin
...
end;
FOldGridWndProc (Message);
end;

С уважением,


Digi   (2002-07-17 14:42:00) [4]


> Song © (17.07.02 12:12)
> Надо сделать наследника и описать для него процедуры с перехватываемыми
> сообщениями.


А как мне потом этот клас-наследник на форму положить? Его надо будет регистрировать как новый компонент?


Song   (2002-07-17 12:12:00) [5]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо