Como adicionar um novo form a outro com Botões

[MadeiraJunior]

Gente, estou com uma pequena dificuldade aqui, estou com um sistema, preciso que ao cliclar em um botão para fechar uma venda ele me exiba um form pedindo o numero do pedido, como posso fazer isto, alguém me ajuda?

[Jhonas]

Essa é uma das maneiras possiveis:

procedure TForm1.Button1Click(Sender: TObject);
var
  value : string;
begin
  repeat
    value := InputBox('Favor Digitar', 'Numero do Pedido:', '0');
  until value <> '';

  ShowMessage('O Numero é '+value);
end;

abraço