Delphi - viditelnosť vlastností
unit Unit1;
interface
type
TClass1 = class
private
FAttrib1: string;
protected
property Property1: string read FAttrib1 write FAttrib1;
end;
TClass2 = class(TClass1)
public
property Property1;
end;
TClass3 = class(TClass2)
protected
property Property1;
end;
implementation
end.
Program Test;
uses Dialogs, Unit1;
var
Class3: TClass3;
begin
Class3 := TClass3.Create;
Class3.Property1 := 'Test';
ShowMessage(Class3.Property1);
end.
Programujem už pomerne dlho ale toto som si všimol až teraz. Ako je možné že po premiestnení vlastnosti "Property1" zdedenej z public časti "TClass2" do chránenej časti triedy "TClass3" môžem nadelej meniť hodnotu atribútu FAttrib1?
Ako mám skryť vlastnosť ktorá je v rodičovskej triede verejná?