anchor.diff:  var
     x, y: integer;
   begin
  -  StringGrid := TStringGrid.Create(self);
  +  StringGrid := TFStringGrid.Create(self);
     StringGrid.ColCount := 10;
     StringGrid.RowCount := 15;
     for y := 0 to StringGrid.RowCount - 1 do
  
positive.code: 
  procedure TWidgetDemoForm.CreateStyleCombo;
  begin
    topStyleComboLayout := TBoxLayout.Create(self);
  
    lblStyle := TLabel.Create('Style:', self);
  
    cbStyle := TComboBox.Create(self);
    cbStyle.CanExpandWidth := True;
    gStyleManager.AssignStyleTypes(cbStyle.Items);
    cbStyle.OnChange := @cbStyleChanged;
  
negative.code: 
  procedure TWidgetDemoForm.CreateTopLeftGroupBox;
  begin
    topLeftGroupBox := TFGroupBox.Create('Group Box 1', self);
    topLeftGroupBox.CanExpandWidth   := True;
  
    topLeftGroupBoxLayout := TFBoxLayout.Create(self);
    topLeftGroupBoxLayout.Orientation := Vertical;
  
    Radio1 := TFRadioButton.Create('Radio button 1', self);
    Radio1.Checked          := True;
    Radio1.CanExpandWidth   := True;
    Radio1.OnClick          := @Radio1Click;
  
    Radio2 := TFRadioButton.Create('Radio button 2', self);
    Radio2.CanExpandWidth   := True;
    Radio2.OnClick          := @Radio2Click;
  
    Radio3 := TFRadioButton.Create('Radio button 3', self);
    Radio3.CanExpandWidth   := True;
  
    topLeftGroupBox.InsertChild(topLeftGroupBoxLayout);
  