Default-Wert in Vererbung ändern

[stahli]

Ich habe eine Ableitung von einem Panel und möchte dort Alignment standardmäßig auf taLeftJustify ändern:
Im Constructor würde ich Alignment entsprechend auch so setzen.

Delphi-Quellcode:

  TMyPanel = class(TPanel)
  public
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
  published
    property Alignment: TAlignment {read GetAlignment? write SetAlignment?} default taLeftJustify;
  end;

Lässt sich das machen? Der Compiler verlangt Getter und Setter. Diese sind jedoch nicht virtuell und FAlignment ist privat.
Gibt es dafür einen Weg?

[guinnes]

Setz das Alignment einfach in deinem Konstruktor.

[Deep-Sea]

1. Du darfst bei so etwas auch den Typ nicht mit angeben, dann sollte es gehen: property Alignment default taLeftJustify;
2. Bedenke, dass das setzen eines Default-Wertes bei einer Property den Werte NICHT ändert, sondern nur für die Anzeige im OI und der bedingten Speicherung eventueller Änderungen in der dfm dient.

[himitsu]

Delphi-Quellcode:

published
  property Alignment default taLeftJustify;
end;

[add/edit]
Wird eine Property verschoben (z.B. von protected nach public) oder werden eigenschaften verändert, dann gibt man den Typen nicht mehr an (den Typen kann man eh nicht mehr ändern).

Und wo kommt denn der Post auf einmal her?
@2: Jupp, das wird nur dafür genutzt, ob der Wert im IO fett dargestellt wird und ob das Property z.B. in der DFM gespeichert wird.
Ist aktueller Wert = Default, dann ist der dünngeschrieben und wird nicht gespeichert.

Den Startwert, welcher zu deinem neuen Default paßt, wirst du eventuell im Constructor setzen müssen.

[SirThornberry]

Ihr habt aber schon den ersten Beitrag gelesen oder? Dort steht doch das er im Constructor den Wert auch entsprechend ändert.

Zitat:

Im Constructor würde ich Alignment entsprechend auch so setzen.

[stahli]

Ok, vielen Dank! Ohne Eigenschaftstyp funktioniert es perfekt.
Die IDE hatte vorher immer meine (händischen) Einstellungen zurückgesetzt.

[SirThornberry]

zurückgesetzt ist etwas falsch ausgedrückt. Durch den abweichenden Defaultwert wurde der gesetzte Wert einfach nicht gespeichert.