Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
Delphi 12 Athens
|
AW: Eigenschaften von erzeugten Komponenten
10. Aug 2011, 10:29
Willst du jetzt sowas wie Defaultwerte haben, welche beim nächsten Erstellen genommen werden?
Entweder du machst das über eine externe Funktion/Ersteller-Klasse oder du fügst es direkt in die Komponenten ein.
- von TLabeledEdit ableiten
- als class var
/ class property
die Defaultwerte hinzufügen
- den Constructor überschreiben und dort die (eventuell vorher gesetzten) Defaultwerte den entsprechenden Property zuweisen
- dann nur noch die fehlenden Werte zuweisen
Den Constructor kann man dann noch um die Parameter erweitern, für diejenigen Eigenschaften, welche sich immer ändern, wie z.B. die Position.
In deinem Fall würde ich grp1 als OwnerAndParent-Parameter gemeinsam dem Constructor übergeben und dazu noch Rect (TRect) oder Left, Top und Width, sowie die Caption.
Dazu dann noch Font-Name und Font-Size als Defaultwerte über Class-Property.
$2B or not $2B
Geändert von himitsu (10. Aug 2011 um 10:35 Uhr)
|