Zitat von
Hansa:
[...]denn ich brauche nur einen Platzhalter, der nach Bedarf besetzt wird und dann könnte ich die "ErmittleDaten" Prozedur allgemein halten und nur das jeweilige Dataset verwenden.
Warum machst du das nicht über Eigenschaften?
Delphi-Quellcode:
type
TVorfahre = class
private
FDataset: TDataSet;
protected
procedure ErmittleDaten; virtual; abstract;
procedure ZeigeKopf; virtual; abstract;
procedure ZeigePositionen; virtual; abstract;
procedure ZeigeFuss; virtual; abstract;
property Dataset: TDataSet read FDataset write FDataset;
end;
Delphi-Quellcode:
type
TNachkomme = class(TVorfahre)
...
public
...
property Dataset;
end;