Abstrakter Fehler

[DGL-luke]

Delphi-Quellcode:

type TBitOPer = class(TObject)
   BoolMap: TBoolMap;
   constructor Create(InitMap:TBoolMap);
   destructor Destroy; override;
 public
   procedure Add(map: TBoolMap);
   function  Get: TBoolMap;
 protected
   function  Perform(a,b:boolean):boolean; virtual; abstract;
end;

type TXORer = class(TBitOPer)
  private
    function Perform(a,b:boolean):boolean; inline;
end;

type TORer = class(TBitOPer)
  private
    function Perform(a,b:boolean):boolean; inline;
end;

Ich hab hier eine abstrakte Basisklasse, in den beiden Nachfahren wird dann perform() implementiert.
Rufe ich das jedoch in einer Instanz auf (add ruft perform auf), bekomme ich einen "abstrakten Fehler". was muss ich ändern? Kann ich das inline halten?

[mirage228]

Hi,

Da fehlt das override hinter der Deklaration von perform() in den Ableitungen.

Du wirst auch wahrscheinlich eine Warnung erhalten, weil perform() in den Unterklassen eine geringere Sichtbarkeit hat - solltest die Prozedur demnach also auch nach "protected" packen.

mfG
mirage228

[DGL-luke]

OK. override verbietet aber inline

Und wieso ist public eine gernigere Sichtbarkeit als protected? protected heisst doch "nur von Nachfahren sichtbar" und public "von allen sichtbar"?!

[mirage228]

Zitat von DGL-luke:

Und wieso ist public eine gernigere Sichtbarkeit als protected? protected heisst doch "nur von Nachfahren sichtbar" und public "von allen sichtbar"?!

Delphi-Quellcode:

type TXORer = class(TBitOPer) 
  private 
    function Perform(a,b:boolean):boolean; inline; 
end; 

type TORer = class(TBitOPer) 
  private 
    function Perform(a,b:boolean):boolean; inline; 
end;

Also ich lese da "private"

mfG
mirage228

[Der_Unwissende]

Zudem ist inline seit mindestens Delphi 7 als veraltet markiert. Du solltest lieber in der Methode asm benutzen.

Was die Sichtbarkeit angeht, so muss die Überschriebene Funktion mindestens Protected sein, da du die Sichtbarkeit (soweit ich weiß auch in Delphi) nicht vermindern kannst! Also musst du gleiche oder höhere Sichtbarkeit zulassen. private ist aber weniger als protected

Gruß Der Unwissende

[mirage228]

Zitat von Der_Unwissende:

Zudem ist inline seit mindestens Delphi 7 als veraltet markiert. Du solltest lieber in der Methode asm benutzen.

Hi,

seit Delphi 2005 kann "inline" für Funktions-inlining benutzt werden, das heisst, dass die Funktion nicht mehr aufgerufen, sondern direkt an die Stelle des aufrufs gesetzt wird. Das spart den Aufruf.

inline-Direktive

Zitat von OH:

Beim Delphi-Compiler ermöglicht zur Verbesserung der Leistung, Funktionen und Prozeduren mit der Direktive inline zu versehen. Wenn eine Funktion oder Prozedur bestimmten Kriterien entspricht, fügt der Compiler Code direkt ein anstatt einen Aufruf zu generieren. Das Ergebnis dieser Leistungsoptimierung ist schnellerer Code, der jedoch mehr Speicherplatz in Anspruch nimmt. Der Compiler produziert dabei eine größere Binärdatei. Die Direktive inline wird in Funktions- und Prozedurdeklarationen und -definitionen, genau wie andere Direktiven, verwendet.

Also die Direktive ist keineswegs veraltet...

mfG
mirage228

[DGL-luke]

ach so... äh ja....

[Robert_G]

Ist das denn wirklich sooo schwer zu verstehen?
Kiek mal hier, das sollte zusammen mit Davids nett gemeintem OH Copy'nWaste eigentlich alles sagen...

[Der_Unwissende]

Sorry, dann bin ich wohl etwas zu wenig davon ausgegangen, dass Borland Tags wiederbelebt. Finde ich aber auch etwas ungewöhnlich, aber gut.
Ok, schau mir das nächste mal wohl lieber 2005 an, bevor ich hier etwas sage.

[Robert_G]

Zitat von Der_Unwissende:

Sorry, dann bin ich wohl etwas zu wenig davon ausgegangen, dass Borland Tags wiederbelebt. Finde ich aber auch etwas ungewöhnlich, aber gut.
Ok, schau mir das nächste mal wohl lieber 2005 an, bevor ich hier etwas sage.

Ich meinte doch gar nicht dich!

Ich verstehe nur ncht, wie man nach so langer Zeit mit Delphi nicht weiß was virtual und override machen und warum inline damit nicht klarkommen kann. (deterministischer statischer compile vs. dyn. gebundenem virtual call)