.

.

.

.

.

运行结果：

Delphi 设计模式：《HeadFirst设计模式》Delphi2007代码---组合模式之Menus

特别感谢：左保权 兄不惜晚上休息时间给小弟解答问题！~