anchor.diff:    with btnQuit do
     begin
       Name := 'btnQuit';
  -    SetPosition(296, 520, 75, 24);
  +    SetPosition(296, 540, 75, 24);
       Anchors := [anRight,anBottom];
       Text := 'Quit';
       FontDesc := '#Label1';
  
positive.code: 
  procedure TMainForm.chbShowHintChange(Sender: TObject);
  begin
    if chbShowHint.Checked then
    begin
      edtText.ShowHint := True;
      edtInteger.ShowHint := True;
      edtFloat.ShowHint := True;
      edtCurrency.ShowHint := True;
    end
    else
    begin
      edtText.ShowHint := False;
      edtInteger.ShowHint := False;
      edtFloat.ShowHint := False;
      edtCurrency.ShowHint := False;
    end;
  end;
  
  procedure TMainForm.rb_border_1Change(Sender: TObject);
  
negative.code: begin
    {@VFD_BODY_BEGIN: MainForm}
    Name := 'MainForm';
    SetPosition(376, 202, 392, 570);
    WindowTitle := 'Edit components';
    WindowPosition := wpScreenCenter;
  
  