Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---工厂模式之简单工厂[转]

    简单工厂：工厂依据传进的参数创建相应的产品。

end.

end.

end.

end.

运行结果：

 

 

 

    简单工厂：工厂依据传进的参数创建相应的产品。

end.

end.

end.

end.

运行结果：