[fpc-pascal] Skipping an the "inherited" of an ancestor
    Torsten Bonde Christiansen 
    tc at epidata.dk
       
    Fri Jan 14 20:38:33 CET 2011
    
    
  
Hi List.
Is it possible to jump a couple of levels in the inherited hierarchy 
when calling "inherited" on a method?
A small example of what i'm trying to achieve below (and don't mind the 
incomplete TB class implementation).
Kind regards,
Torsten Bonde Christiansen.
============================
TA = class
   procedure DoSomething; virtual;
end;
TB = class(TA)
   procedure DoSomething; override;
end;
TC = class(TB)
   procedure DoSomething; override;
end;
.....
procedure TA.DoSomething;
begin
   ...
end;
procedure TC.DoSomething;
begin
   inherited TA.DoSomething;  // This is not correct, but exemplifies 
what i'm trying to achieve.
end;
    
    
More information about the fpc-pascal
mailing list