Public Variable einer Klasse in Unterklasse verbergen

[Neutral General]

Eine weitere Möglichkeit wäre sowas wie:

Delphi-Quellcode:

TBase = class

end;

TVarBase = class(TBase)
  VarState: Integer;
end;

Dann können deine Unterklassen entweder von der Basis mit- oder ohne VarState ableiten.
Deine neue Unterklasse würde dann eben von TBase ableiten, der Rest von TVarBase.