delphi中如何定义类？如何继承类？
delphi中如何定义类？如何继承类？
[解决办法]
来个最简单的
TBudded = class
funtion GetName: String; virtual;
end;
TBuddedSon = class(TBudded)
funtion GetName: String; override;
end;
funtion TBudded.GetName: String;
begin
Result := 'Budded';
end;
funtion TBuddedSon.GetName: String;
begin
Result := 'Budded''s Son!';
end;
你还是找本书好好的看看，现在这情况，BBS救不了你
