Código Delphi [-]procedure TForm1.BitBtn2Click(Sender: TObject); begin Close; end;
procedure TForm1.BitBtn2Click(Sender: TObject); begin Close; end;