anchor.diff:      procedure MemoDragDrop(Sender, Source: TObject; X, Y: integer; AData: variant);
       function ConvertImage(const AFileName: string): string;
       procedure btnClearClicked(Sender: TObject);
  +    procedure btnConvertClicked(Sender: TObject);
     public
       procedure AfterCreate; override;
     end;
  
positive.code:   memImages.Text := '';
  end;
  
  procedure TMainForm.AfterCreate;
  begin
    {%region 'Auto-generated GUI code' -fold}
  
negative.code:   begin
      Name := 'Button1';
      SetPosition(396, 44, 80, 24);
      Text := 'Convert';
      FontDesc := '#Label1';
      Hint := '';
      ImageName := '';
      TabOrder := 4;
      OnClick := @btnConvertClicked;
    end;
  
    pmFile := TfpgPopupMenu.Create(self);
  