-----------------------------------------------------------------
procedure DefWndProc(var Msg: TMessage); virtual;
Вызывает используемую по умолчанию процедуру окна, выполня- ющую обработку поступающих сообщений Windows. Результат этого вы- зова сохраняется в поле Result записи сообщения Msg.