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?
Lukas Erlacher
Suche Grafiktablett. Spenden/Gebrauchtangebote willkommen.
Gotteskrieger gesucht!
For it is the chief characteristic of the religion of science that it works. - Isaac Asimov, Foundation I, Buch 1