@bernau wie
inherited
darf nicht aufgerufen werden ...
Delphi-Quellcode:
procedure TMyOtherDict.Assign(Source:TObject);
begin
if Source is TFoo then
begin
...
end
else
inherited;
end;
klar, nicht einfach blind aufrufen, aber durchaus konditional aufrufbar