![]() OnMessageBefore Example |
![]() ![]() ![]() |
acFormHook component.
|
type
|
TacWndProcMessageAfterEvent = procedure(Sender: TObject; var Message: TMessage) of object;
|
|
property OnMessageAfter: TacWndProcMessageAfterEvent;
|
The OnMessageAfter event occurs after processing of window message by default procedure handler.
|
|
Write the OnMessageAfter event handler to hook all windows messages (WM_xxx) sent to this form, after their processing by default message handler (CallWindowProc API routine).
|
![]() |