Einzelnen Beitrag anzeigen

Andreas L.

Registriert seit: 23. Mai 2011
Ort: Furth im Wald
308 Beiträge
 
Delphi 11 Alexandria
 
#10

AW: Properties bei Ableitung verschieben

  Alt 7. Mär 2019, 16:24
Bei manchen Eigenschaften kannst du die Sichtbarkeit verringern.

Delphi-Quellcode:
type
  TMyControl = class(TCustomPanel)
  protected
    // Ist nicht mehr im Object-Inspector zu sehen:
    property ParentFont;
    // Ist weiterhin im Object-Inspector zu sehen:
    property Left;
  end;
Nun ja
- TCustomPanel.ParentFont ist protected (deklariert in TControl.ParentFont )
- TCustomPanel.Left ist published (deklariert in TControl.Left )
Das wundert mich also nicht und damit stimmt die Aussage weiterhin, dass man die Sichtbarkeit nicht verringern kann.
Im Code habe ich aus versehen TCustomPanel statt TPanel geschrieben. In TPanel ist ParentFont published. Mit folgendem Code wird sie protected:

Delphi-Quellcode:
type
  TMyControl = class(TPanel)
  protected
    // Ist nicht mehr im Object-Inspector zu sehen:
    property ParentFont;
    // Ist weiterhin im Object-Inspector zu sehen:
    property Left;
  end;
Andreas Lauß
Blog
  Mit Zitat antworten Zitat