如何让子类不继承父类或者祖先的"某些"特性？也就是“不完全”继承呢？

Question

举个例子，Tmemo组件,double click的event里写这么一行：application.minimize;
运行时发现，代码虽然被执行了，但并没有最小化，只是seltext。
应该是继承了父类或者祖先的double click,可是为什么不响应application.minimize呢？
怎么样在这种情况下“不”继承，而只响应自定义的代码？

Answer 1

ShowWindow(Application.handle, SW_Minimize)呢？

Answer 2

测试了下！
可以的！procedure TForm1.Memo1DblClick(Sender: TObject);
begin
  //application.minimize;
  ShowWindow(Application.handle, SW_Minimize);
  Caption := TimeToStr(Now);
end;

Answer 3

ShowWindow(Application.handle, SW_Minimize);
即可

Answer 4

g961681，有空再请看看这个问题，先谢了！
http://community.csdn.net/Expert/TopicView.asp?id=4447994