静态方法举例-调用静态方法-Delphi程序设计教程—面向对象程序基础与理论

静态方法举例-调用静态方法var Figure: TFigure; Rectangle: TRectangle; begin Figure := TFigure.Create; Figure.Draw; //调用TFigure.Draw Figure.Destroy; //将Figure对象析构Figure := TRectangle.Create; Figure.Draw; //调用TFigure.Draw,因为Figure声明为TFigure类型TRectangle(Figure).Draw; //调用TRectangle.Draw,因为Figure被强制转为TRectangle类型Figure.Destroy; Rectangle := TRectangle.Create; Rectangle.Draw; //调用TRectangle.Draw Rectangle.Destroy; end;
ppt 文件大小:409KB