TObject = Object ?

[Neutral General]

Delphi-Quellcode:

Gebaeude = Object
   Flaeche: Integer;
   procedure Bauen;
  end;

  Haus = Object(Gebaeude)
   NeNeueVar: String;
   procedure Bauen;
  end;

1. Flaeche existiert auch in der Klasse Haus.
2. Man kann entweder "Bauen" so "überschreiben":

Delphi-Quellcode:

procedure Haus.Bauen;
begin
  Form1.Caption := 'Haus bauen!';
end;

oder/und die Methode einfach vererben:

Delphi-Quellcode:

procedure Haus.Bauen;
begin
  inherited;
  // eventuell weiterer Quelltext
end;