碰到个郁闷的事,主窗体重载WNDPROC想截获WM_KEYDOWN消息如何截获不了

碰到个郁闷的事,主窗体重载WNDPROC想截获WM_KEYDOWN消息怎么截获不了?
procedure   TFmain.WndProc(var   Msg:   TMessage);
begin
    inherited;
    if   (Msg.Msg   =   WM_KEYDOWN)   and   (Msg.wParam   =   VK_ESCAPE)   then
    begin
        ShowMessage( '截获了 ');
    end;
end;

KEYDOWN事件截获不了?我尝试别的WINDOWS消息,都能正常截获,为什么这个就截获不了,帮忙~~~~~~~~~~~~~~~~~

------解决方案--------------------
if Msg.Msg=CN_KEYDOWN then
begin
if Msg.CharCode=VK_RETURN then
ShowMessage( 'OK ');
end;