Смена интерфейса формы

{$reference 'System.Windows.Forms.dll'}
{$reference 'System.Drawing.dll'}
 
uses 
  System, System.Windows.Forms;
var win:= new Form;
  next:= new Button;
  procedure nextphase(sender: object; args: eventargs);
  begin
  //процедура смены интерфейса
  end;
begin
 next.Text:='Вперед';
 win.FormBorderStyle:=FormBorderStyle.None;
 win.StartPosition:=formstartposition.CenterScreen;
 win.Controls.Add(next);
 next.Dock:=dockstyle.Bottom;
 next.Click+=nextphase;
  Application.Run(Win);
end.

{$reference System.Windows.Forms.dll}
{$reference System.Drawing.dll}
 
// Если без этого работало приложение с формами - не значит что оно и дальше будет работать
// Как минимум окна открытия файлов - точно без него сыпятся
{$apptype windows}
 
uses System;
uses System.Windows.Forms;
 
type
  Phase1Container = sealed class(ContainerControl)
    
    next := new Button;
    
    constructor;
    begin
      self.Dock := DockStyle.Fill;
      
      self.Controls.Add(next);
      next.Dock := DockStyle.Bottom;
      next.Text := 'Вперёд';
      
    end;
    
  end;
  
  Phase2Container = sealed class(ContainerControl)
    
    b1 := new Button;
    
    constructor;
    begin
      self.Dock := DockStyle.Fill;
      
      self.Controls.Add(b1);
      b1.Text := 'Другая кнопка';
      
    end;
    
  end;
  
  MyForm = sealed class(Form)
    p1 := new Phase1Container;
    p2 := new Phase2Container;
    
    constructor;
    begin
      self.FormBorderStyle := System.Windows.Forms.FormBorderStyle.None;
      self.StartPosition := FormStartPosition.CenterScreen;
      
      Controls.Add(p1);
      Controls.Add(p2);
      p2.Visible := false;
      
      p1.next.Click += (o,e)->
      begin
        
        // это почти моментальное переключение, для него я и взял контейнеры
        p2.Visible := true;
        p1.Visible := false;
        
        // если фаза 1 больше нигде не будет использоваться - можно удалить её, а для этого надо избавится от всех ссылок
        self.Controls.Remove(p1);
        p1 := nil;
        
      end;
      
    end;
    
  end;
  
begin
  Application.Run(new MyForm); // инициализацию элементов управления лучше класть в конструктор, вместо того чтоб пихать всё вместе в begin-end.
end.