.

 

 

.

 

 

.

 

运行结果:

Delphi 设计模式:《HeadFirst设计模式》Delphi7代码---门面模式之HomeTheater