InterpolationUnit
type TScreenObjectSectionStorage = class(TObject)
ScreenObject: TScreenObject;
SectionIndex: integer;