MustOverride?

[stahli]

Aber wenn Du von TDerivedClass ableitest, kannst Du auch vergessen, die InternalCleanUp zu überschreiben.
Meine Frage (oder wenn mal will auch Anregung) war, dass der Compiler in dem Fall warnt.

Delphi-Quellcode:

type
   TBaseClass = class
   private
     procedure CommonCleanup;
   protected
     procedure InternalCleanup; virtual; abstract;
   public
     procedure Cleanup;
   end;

   TDerivedClass = class(TBaseClass)
   protected
     procedure InternalCleanup; override;
   end;

   TDerivedSubClass = class(TTDerivedClassClass)
     procedure DoSub;
   end;

procedure TBaseClass.Cleanup;
begin
   CommonCleanup;
   InternalCleanup;
end;

[Uwe Raabe]

Zitat:

Zitat von stahli (Beitrag 1330302)

Aber wenn Du von TDerivedClass ableitest, kannst Du auch vergessen, die InternalCleanUp zu überschreiben.
Meine Frage (oder wenn mal will auch Anregung) war, dass der Compiler in dem Fall warnt.

Aber genau das tut doch der Compiler, wenn du die abgeleitete Klasse instanzierst: x1020: Instanz von '%s' mit abstrakter Methode '%s.%s' wird konstruiert (Delphi)

[Lemmy]

Zitat:

Zitat von stahli (Beitrag 1330302)

Aber wenn Du von TDerivedClass ableitest, kannst Du auch vergessen, die InternalCleanUp zu überschreiben.

warum muss in meiner abgeleiteten Klasse die Methode die aufräumt auch unbedingt InternalCleanUp heißen?

Das aufräumen zu vergessen ist immer ein Problem - auch wenn Du ein internalCleanUp hast kannst Du eine intern initialisierte Klasse vergessen. Ich kann nicht ganz nachvollziehen wie du das vermeiden willst.

[stahli]

@Uwe
Oh, ja, CommonCleanup ist ja nicht virtuell.
Merke ich mir mal vor. Jetzt habe ich schon von Hand aufgeräumt.

@Lemmy
Ich dachte, der Compiler kann mich direkt darauf aufmerksam machen.