anchor.diff:            UseAutosize:= true;
             Ctl:= TButton.Create(AForm);
             (Ctl as TButton).ModalResult:= cButtonResultStart+AControlIndex;
  +        end;
  +      if SValue='radiogroup' then
  +        begin
  +          Ctl:= TRadioGroup.Create(AForm);
  +        end;
  +      if SValue='checkgroup' then
  +        begin
  +          Ctl:= TCheckGroup.Create(AForm);
           end;
   
         if Assigned(Ctl) then
  
positive.code:       if Ctl is TEdit then (Ctl as TEdit).Text:= SValue;
        if Ctl is TComboBox then (Ctl as TCombobox).ItemIndex:= StrToIntDef(SValue, 0);
        if Ctl is TListBox then (Ctl as TListBox).ItemIndex:= StrToIntDef(SValue, 0);
        Continue;
      end;
  
  
negative.code:         if Ctl is TListbox then (Ctl as TListbox).Items.Add(SListItem);
          if Ctl is TComboBox then (Ctl as TComboBox).Items.Add(SListItem);
          if Ctl is TMemo then (Ctl as TMemo).Lines.Add(SListItem);
          if Ctl is TCheckGroup then (Ctl as TCheckGroup).Items.Add(SListItem);
          if Ctl is TRadioGroup then (Ctl as TRadioGroup).Items.Add(SListItem);
        until false;
        Continue;
      end;
  