Einzelnen Beitrag anzeigen

CCRDude

Registriert seit: 9. Jun 2011
678 Beiträge
 
FreePascal / Lazarus
 
#9

AW: TForm - ist es möglich diese Klasse zu vererben und zu erweitern ...

  Alt 25. Nov 2018, 16:10
Ich mache das auch in Lazarus häufig. Allerdings nur mit "unsichtbaren" Erweiterungen, da dann einfach:

1. Eigene Unit einbinden.
2. Ableitung von = class(TFrom) auf class(TMeineFormAusUnit) abändern.

Damit erledige ich Krams wie einen automatisch in's Systemmenü eingebundes About-Fenster, ein neues Event das erst nach Anzeigen der Form getriggert wird, Zugriff auf XP/Vista/Win7/Win10-Erweiterungen, die in Delphi noch nicht Einzug gehalten hatten, als ich zuletzt damit gearbeitet habe (z.B. Progress Bar im Taskbar-Icon).

Templates sind in meinen Augen etwas anderes, da von Templates kopiert statt ererbt wird. Templates gibt es auch in Lazarus.

Um in Lazarus auch visuelle Form-Teile zu übernehmen, müsstest Du die eigene Form vermutlich in ein Package packen und registrieren. Oder halt dynamisch erzeugen und zur Designzeit darauf verzichten.
  Mit Zitat antworten Zitat