Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#11

Re: Funktion in übergeordneter Klasse aufrufen

  Alt 4. Mär 2006, 00:43
dann würde ich die Kindklasse wie folgt ändern:
Delphi-Quellcode:
  TKindKlasse = class(TObject)
  private
    fParent: TObject;
  public
    constructor Create(AElternKlasse: TObject);
  end;
[...]
implementation

uses
  UnitDerElternklasse;
[...]
constructor TKindKlasse.Create(AElternKlasse: TObject);
begin
  [...]
  fParent := AElternKlasse;
  TElternKlasse(fParent).MachIrgendwas;
end;
Es wäre jedoch sinnvoller in der Elternklasse die Unit der Kindklasse erst unter Implementation in den Uses aufzuführen weil ja bei der Elternklasse im Declarationsabschnitt nur TList gebraucht wird und erst im Implementationsteil wo das Kind erzeugt wird benötigst du die TKindKlasse.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat