In order to transplant some old code to the existing inheritance level, it is necessary to consider the backward compatibility of the code, so it is intended to join a series of attributes in the new class, accessing new members - give new members from the individual name ,like this
SomeComponent: TsomeComponent
.......
Property Oldcomponent: Read SomeComponent;
Procedure somefunc;
Write a good declaration, then you want to generate somefunc code with Ctrl Shift C, who knows Delphi to generate a method called SomeComponent, I am dizzy! Actually use such simple rules: FXXXX generated member variables, other all-in-generation methods. It's better to smart ... Hey!