如何在Delphi 7中实现组件方法的覆盖？

本文共计339个文字，预计阅读时间需要2分钟。

基于this回答回复我试图在Delphi 7中覆盖TOleContainer的OnShowWindow方法。