du kannst auch die Klassenvariable erstmal als "private" deklarieren und dann ihre Sichtbarkeit ändern.
z.B.:
bei Funktionen und Properties kann man das leicht die Sichtbarkeit erhöhen (sichtbarer machen ... nur Erniedrigen geht nicht)
Delphi-Quellcode:
interface
// öffentlich
type
Txyz = Class
private
_Direct3D: Tirgendwas;
proberty Direct3D: Tirgendwas read Direct3D write Direct3D;
end;
implementation
// privat
type
TxyzPrivat = Class(Txyz)
public
proberty Direct3D;
end;
oder man definiert sich nur intern eine höhere Sichtbarkeitsstufe:
Delphi-Quellcode:
interface
// öffentlich
type
Txyz = Class
private
_Direct3D: Tirgendwas;
end;
implementation
// privat
type
TxyzPrivat = Class(Txyz)
public
proberty Direct3D: Tirgendwas read Direct3D write Direct3D;
end;