Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.29;
Скачать: CL | DM;

Вниз

перехватывание сообщений   Найти похожие ветки 

 
Digi   (2002-07-17 04:15) [0]

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


 
Song ©   (2002-07-17 12:12) [1]

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


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


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


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


 
Игорь Шевченко ©   (2002-07-17 15:01) [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;

С уважением,



 
Song ©   (2002-07-17 15:04) [4]

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


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


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


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



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

Текущий архив: 2002.07.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
1-95401
Балков Евгений
2002-07-16 11:12
2002.07.29
Как запретить разворачивание и сворачивание окна


6-95471
aaZ
2002-05-19 23:33
2002.07.29
ServerSocket


3-95234
Akhmadey
2002-07-08 21:04
2002.07.29
EhLib


3-95180
Fissher
2002-07-04 14:04
2002.07.29
Создание отчета в формате Excel


1-95387
AM
2002-07-16 09:17
2002.07.29
компонент ComboBox