Wie kann ich die benutzen oder beheben Probleme mit visual form inheritance in Delphi?

Arbeite ich an einem Projekt in Delphi 7, wo ich wollte, um Formen zu haben, Erben die Komponenten von anderen Formen. Ich war in der Lage, diese arbeiten, kam aber über folgende Probleme (und werde ich die Lösungen poste, um hoffentlich anderen zu helfen in der Zukunft):

  1. In der .pas-Datei von einer form, die ich ändern würde die form der Vererbung von einer anderen form, aber es würde nicht die Komponenten aus der Vorgänger-Formular.
  2. Für bestimmte Nachkomme Formen, würde ich die folgende Fehlermeldung beim öffnen der form zur design-Zeit: "Fehler beim erstellen der form: Vorfahr für 'TAncestorForm' nicht gefunden." Ich würde zuerst manuell öffnen Sie die Vorfahr-Formular, und dann konnte ich öffnen Sie die untergeordneten form.

InformationsquelleAutor Liron Yahdav | 2008-10-10

  1. 27

    Erste, für diejenigen, die nicht wissen, wie Sie Erben die form visuell erstellen Sie die Vorfahr-Formular wie gewohnt. Dann gehen Sie auf Datei > Neu > Anderen. Wählen Sie die Registerkarte mit dem Namen des aktuellen Projekts, und wählen Sie die form, die Sie wollen, um zu Erben. Wenn Sie wollen, um zu Erben von einer form, die nicht Teil des aktuellen Projekts, öffnen Sie das Formular, klicken Sie rechts und wählen Sie Add to Repository. Dann werden Sie in der Lage, gehen Sie auf Datei > Neu - > Sonstige, und wählen Sie das Formular aus der entsprechenden Registerkarte.

    Da, ich stieß auf Probleme, da einige der untergeordneten Formen wurden bereits erstellt, so konnte ich nicht Folgen Sie den oben beschriebenen Vorgang. Auch ich habe einige änderungen an Formen aus der standard-code Delphi erstellt. Ich war in der Lage, alle Probleme zu lösen mit visual form inheritance mithilfe der folgenden Richtlinien:

    • .pas-Datei der Nachkomme form muss die form - Klasse erbt von der richtigen Vorfahren-Klasse, z.B.:

      type TMyForm = class(TAncestorForm)
    • Die erste Zeile in die .dfm-der Nachkomme form muss das Wort inherited statt object, z.B.:

      inherited MyForm: TMyForm
    • EDIT: Nach der doppelten Kontrolle, das folgende ist NICHT erforderlich: Die .pas-Datei der übergeordneten form muss dem standard der globalen variable, die Delphi erzeugt, z.B.:

      var AncestorForm: TAncestorForm;
    • Die uses Abschnitt .dpr Datei des Projektes müssen die gleiche Globale variable als Kommentar, nachdem das Gerät die Datei einen Namen, z.B.:

      unAncestor in 'unAncestor.pas' {AncestorForm}

    Hinweise/Tipps:

    • Sowohl die Vorfahren der form und der Nachkomme form sind erlaubt, werden nicht automatisch erstellt, wenn Sie möchten (Eingestellt in Projekt - > Optionen > Formulare > Auto-Formulare erstellen).
    • Zum zurücksetzen einer Eigenschaft auf ein Nachfahre form der Vorfahr-Formular den Wert, der rechten Maustaste auf die Eigenschaft im Objekt-Inspektor und wählen Sie auf geerbt Zurücksetzen.
    • Wiederherstellen, werden alle Eigenschaftswerte einer Komponente auf die Vorfahren, die Werte der rechten Maustaste auf die Komponente und wählen Sie auf geerbt Zurücksetzen.
    Die Globale var ist nicht erforderlich.
    Die Globale variable ist nur erforderlich, wenn Sie lassen Sie Delphi "Auto-create" - Formular (Sie können diese Einstellung in den Projekt-Optionen-dialog).
    Sie Jungs sind richtig. Ich nur doppelt überprüft. Ich werde den Beitrag editieren, danke.
    Siehe auch diese beiden blog-Beiträge, die erklären, Rahmen und DataModule Vererbung: wiert.wordpress.com/2009/07/22/... und wiert.wordpress.com/2009/08/20/... Diese Artikel enthalten Bilder von guten und schlechten Situationen.
    Für die C++Builder-Menschen können Sie so ziemlich die gleichen Anweisungen. Die einzige Einschränkung die ich habe ist, dass TAncestorForm nicht in einem eigenen Namensraum (D. H. Sie dürfen sich im globalen namespace). Zumindest war das meine Erkenntnis.

    InformationsquelleAutor Liron Yahdav

  2. 1

    Der DPR-scheint ein wenig komplizierter als das. In meinem Fall habe ich einen Vorfahren abgeleitet von TFrame. Ich habe dann aus mehreren frames aus TAncestorFrame. Mein DPR die uses-Klausel sah dann wie:

    uses
  Forms,
  ancestorFrame in 'ancestorFrame.pas' {AncestorFrame : TFrame},
  frame1Unit in 'frame1Unit.pas' {frame1:TFrame},
  frame2Unit in 'frame2Unit .pas' {frame2:TFrame},

    Die DPROJ-Datei sollte wie folgt Aussehen:

    <DCCReference include="frame1Unit.pas">
  <Form>frame1</Form>
  <DesignClass>TFrame</DesignClass>
</DCCReference>

    Abgeleitet Frames Aussehen sollte:

    TFrame1 = class(TAncestorFrame)

    Abgeleitet Und Frames .DFM-Dateien sollten sagen:

    inherited Frame1:TFrame1

    InformationsquelleAutor Unknown Coder

Schreibe einen Kommentar