OOP: Vererbung von Konstruktoren

[Nonsense]

Hi,

mal eine kleine Frage zu Konstruktoren.
Ich habe eine Basisklasse:

Delphi-Quellcode:

  TBase = class(TObject)
  private
    FX    : Integer;
    FY    : Integer;
    constructor Create(X, Y: Integer);
  public
    property X: Integer read FX;
    property Y: Integer read FY;
  end;

(Der Konstruktor ist private, da die Klasse nur für Ableitungen ist und keine Instanz gebildet werden soll.)

Meine Frage ist jetzt:
Wenn ich weitere Klassen von TBase ableiten will, wie muss ich deren Konstruktoren gestalten?

Delphi-Quellcode:

  TSecond = class(TBase)
  private
  public
    constructor Create(X, Y: Integer);
  end;

  constructor TSecond.Create(X, Y: Integer);
  begin
    inherited Create(X, Y: Integer):
  end;

Oder wie muss ich mir das vorstellen? Wenn ich keinen eigenen Konstruktor definiere, wird dann der von TBase genommen?

Ihr könnt mir sicher helfen (davon bin ich überzeugt...) :zwinker:

Danke im Voraus.

[Luckie]

Ja du solltest ihn auf alle Fälle aufrufen. Und auch in TBase solltest du inherited aufrufen, damit der Konstruktor von TObject aufgerufen wird.

[Nonsense]

Zitat:

Zitat von Luckie

Ja du solltest ihn auf alle Fälle aufrufen.

D.h. es gibt primär keine "bessere" Lösung, als meine aufgezeigte?

Zitat:

Und auch in TBase solltest du inherited aufrufen, damit der Konstruktor von TObject aufgerufen wird.

Ist ja logisch, hab ich jetzt nur wegrationalisiert (was für ein hässliches Wort).

Hier stand absoluter Blödsinn. Ich sollte schlafen gehen.

[Luckie]

Wie so besser? Das ist nun mal so. da gibt es kein besser oder schlechter. Wenn ich mit dem Auto fahren will, dann müssen sich die Räder auch drehen.

[Nonsense]

Zitat:

Zitat von Luckie

Wie so besser? Das ist nun mal so. da gibt es kein besser oder schlechter. Wenn ich mit dem Auto fahren will, dann müssen sich die Räder auch drehen.

Was für ein Vergleich. Aber Du hast schon recht, meine Formulierung war nur etwas unglücklich.

Edit: Danke. Frage beantwortet. :thumb:

[Robert_G]

Sollte der Constructor in TBase nicht protected sein?
Private Felder/Methoden sind doch für abgeleitete Klassen nicht sichtbar. IMHO würde das inherited deshalb nicht den Constructor aus TBase sondern von TObject nehmen.
Ich bin mir da aber nicht so sicher. (arbeite nur sporadisch mit Delphi)

[Nonsense]

Zitat:

Zitat von Robert_G

Sollte der Constructor in TBase nicht protected sein?
Private Felder/Methoden sind doch für abgeleitete Klassen nicht sichtbar. IMHO würde das inherited deshalb nicht den Constructor aus TBase sondern von TObject nehmen.
Ich bin mir da aber nicht so sicher. (arbeite nur sporadisch mit Delphi)

Hui, da muss ich mal kurz nachlesen.
Edit: Ja, Du hast recht. Danke.

[Robert_G]

Du kannst aber mit protected ins nächste offene Messer laufen...
Die (etwas schlampige) Implementierung von protected in Delphi ähnelt ein wenig dem internal aus c#.
Alle protected Felder/Methoden sind für alle Klassen innerhalb der Unit sichtbar!

[Nonsense]

Zitat:

Zitat von Robert_G

Du kannst aber mit protected ins nächste offene Messer laufen...
Die (etwas schlampige) Implementierung von protected in Delphi ähnelt ein wenig dem internal aus c#.
Alle protected Felder/Methoden sind für alle Klassen innerhalb der Unit sichtbar!

Da fällt mir doch glatt noch eine Frage ein:
Warum kann ich die Privaten Felder einer Klasse (z.B. FBitmap: TBitmap) bei der Code-Vervollständigung sehen obwohl es entsprechende property-Elemente gibt?

D.h. wenn ich auf MeineKlasse.Bitmap zugreifen will, zeigt er mir auch FBitmap an, obwohl als private deklariert.

[Luckie]

Befindest du dich in der gleichen Unit? Innerhalb der gleichen Unit sind auch private Felder einer Klasse für andere sichtbar.