Einzelnen Beitrag anzeigen

Marco Steinebach

Registriert seit: 4. Aug 2006
502 Beiträge
 
Delphi 5 Enterprise
 
#1

Vererbung, Create und co

  Alt 16. Feb 2018, 19:31
Hallo zusammen,
irgendwas essenzielles hab ich offensichtlich nicht verstanden.
Ich habe eine Basisklasse, von der weitere Formulare abgeleitet werden.

Code:
type
  TBaseClass = Class (TForm)
    constructor create (aOwner: TComponent); override;
  protected
    test: integer;
  end;

constructor TBaseClass.create (aOwner: TComponent);
begin
  inherited create (aOwner);
  test := -1;
end;
Nun habe ich in der von TBaseClass abgeleiteten Klasse ein onCreate definiert:
Code:
type
  TMainClass = Class (TBaseClass)
    procedure FormCreate (Sender: TObject);
end;

procedure TMainClass.formCreate (Sender: TObject);
begin
  // ausgabe von test??? sollte -1 sein
end;
Ich hätte gedacht, dass, vom Compiler, TMainClass.create aufgerufen wird, und das ruft, automatisch, TBaseClass.create auf, ist aber nicht so.
Wo liegt mein Denkfehler?

Viele Grüße
Marco
Marco Steinebach
  Mit Zitat antworten Zitat