Hatte ich noch vergessen zu erwähnen: Die Namensgebung ist etwas verwirrend.
Delphi-Quellcode:
type
TColKaoPfand = class( TsngColumnDescription)
protected
function GetSngColumnsOwner: TkaoPfandColumnDescription; reintroduce;
public
class function this: TColKaoPfand; reintroduce;
property CD: TkaoPfandColumnDescription read GetSngColumnsOwner;
end;
Die Begriffe
Description und
Owner werden hier ziemlich durcheinander gewürfelt.