anchor.diff:  {***************************************************************************}
   Unit psc_reg;
   
  +{$MODE Delphi}
  +
   Interface
   {$I psc_defines.inc}
   
  
positive.code:   public
      Procedure GetValueList(const List: IPSCStrings); override;
    End;
  
    TPSCCustomSectionEditor = class(TComponentEditor)
    private
      FSlot: TPSCGraphicItem;
  
negative.code: {----------------------------------------------------------}
  
  Implementation
  
  {$R *.dcr}
  
  Uses
    psc_listbox,
  