类和接口的问题
unit Unit3;
interface
uses SysUtils;
type
carMove = interface
function SpeedDown(): string; //减速
function ShutDown(): string; //停止
function Start(): string; //启动
function carspeedUp(): string;
function StartBrake: string; //启动刹车
end;
{父类:汽车类}
Tcar = class(TObject)
private
name: string;
Fwheel: Twheel;
Fbrake: Tbrake;
Fengine: Tengine;
Fcarbody: Tcarbody;
public
function CarPackage(s: string): string; virtual; //组装汽车
end;
TAodiQ7 = class(TCar, carMove)
private
protected
// interface carMove
function SpeedDown(): string; //减速
function ShutDown(): string; //停止
function Start(): string; //启动
function carspeedUp(): string;
function StartBrake: string; //启动刹车
public
function CarPackage(s: string): string; override;
end;
implementation
{ TAodiQ7 }
function TAodiQ7.CarPackage(s: string): string;
begin
end;
function TAodiQ7.carspeedUp: string;
begin
end;
function TAodiQ7.ShutDown: string;
begin
end;
function TAodiQ7.SpeedDown: string;
begin
end;
function TAodiQ7.Start: string;
begin
end;
function TAodiQ7.StartBrake: string;
begin
end;
{ Tcar }
function Tcar.CarPackage(s: string): string;
begin
end;
end.
接口carMove 声明的 SpeedDown() ShutDown() Start() carspeedUp() StartBrake这几个函数和方法在子类TAodiQ7又重新申明了,我不明白的是既然又重新申明为什么还要在接口申明不是多此一举吗,没分了请大家不要见怪