tsdima писал(а):
А что такое CM_EXECPROC и кто его посылает?Дык цитата несколькими постами выше уже была
Ну и определение там же есть
CM_EXECPROC = $8FFF;
tsdima писал(а):
И потом, где гарантия, что оно не через fExMsgProc уходит?Гарантии дать не сложно: контекстный поиск по fExMsgProc в KOL.pas дает
...
...
fExMsgProc: function( Applet: PControl; var Msg: TMsg ): Boolean;
{* Additional message handler called directly from Applet.ProcessMessage.
Used to call TranslateMDISysAccel API function for MDI application. }
...
...
//[function NewMDIClient]
function NewMDIClient( AParent: PControl; WindowMenu: THandle ): PControl;
...
Applet.fExMsgProc := ProcMDIAccel;
...
...
function TControl.ProcessMessage: Boolean;
...
if not(Assigned( fExMsgProc ) and fExMsgProc( @Self, Msg )) then
...
...