Habs getestet mit
Delphi-Quellcode:
TOpa = class
public
alter : integer;
procedure tuwas;
end;
procedure TOpa.tuwas;
begin
showmessage('Großvater '+inttostr(self.alter));
end;
Opa, Vater und Kind haben ein Unterschiedliches Alter. Wenn Alter eine Konstante ist geht es. Wenn nicht, dann ist Alter = 0. Das ist mir klar. Und natürlich die Limitation an dem ganzen. Wird ja nirgendwo zugewiesen. Und wenn dann würde es auch nix bringen, weil man ja auf die KLasse und nicht auf das Objekt zugreift. Hab ich das richtig verstanden?
PS: Bin mal für einige Zeit weg...