ich setze in meiner Application schon Visual Form inheritance (VFI) ein:
Beispiel:
TForm -> TForm_Ftaste -> Lager, Adressen, Fakturierung
TForm -> TForm_simple -> Suchen, Drucken, auskunft
Ich möchte jetzt noch eine Abstraktions-/Vererbungsebene in diese Konstruktion einziehen:
Tform -> TForm_Basic -> TForm_Ftaste -> Lager, Adressen, Fakturierung
Tform -> TForm_Basic -> TForm_simple -> Suchen, Drucken, auskunft
Wie muss ich das tun?
Ich habe bereits das Formular TForm_Basic erstellt; meine Basiseinstellungen vorgenommen und die FormCreate Dinge hineingeschrieben. Im TForm_FTaste habe ich
geändert:
TForm_Ftaste = class(TForm) in TForm_Ftaste = class(TForm_Basic)
Syntaktisch ist alles korrekt (Compiler übersetzt); Die Kette der FormCreate Events wird auch sauber abgearbeitet.
Aber die Darstellung der visuellen Componenten, die Vererbung von Eigenschaften (z.B. Verschieben von Controls im Basis-Formular soll ja sofort in den abgeleiteten Forms zu sehen sein) etc. funktioniert nicht.
Die VFI funktionert weiterhin einwandfrei von meinen Basisklassen TForm_Ftaste und TForm_Simple zu den nachgelagerten Klassen.
Muss noch was in der
DFM geändert werden?
Oder wo kann es sonst noch klemmen?