>>350
TPanel::WndProcをオーバーライド

class TMyPanel : public TPanel {
 private:
  void WndProc(Message& msg);
};

void TMyPanel::WndProc(Message& msg) {
 switch(msg.Msg) { //略
 }
 TPanel::WndProc(msg);
};