anchor.diff:  
   uses
     Classes, SysUtils, Graphics, Controls, StdCtrls, ExtCtrls, Forms,
  -  CheckLst, Spin,
  +  CheckLst, Spin, ComCtrls,
     LclProc, LclType,
     ATStringProc;
   
  
positive.code:       if SValue='checklistbox' then
          Ctl:= TCheckListBox.Create(AForm);
  
        if Assigned(Ctl) then
          Ctl.Parent:= AForm;
        Continue;
  
negative.code: 
    if C is TSpinEdit then
      Result:= IntToStr((C as TSpinEdit).Value);
  
    if C is TListView then
      Result:= IntToStr((C as TListView).ItemIndex);
  end;
  
  
  