Delphi, Como clonar um Form

http://informaticode.blogspot.com.br/search/label/Delphi



*Primeiro você monta seu form normalmente.
*Depois de pronto você vai adicionar um button ou um image e colocar o código no evento OnClick:
var
  Ms : TMemoryStream;
  NewForm : TForm1;
begin
  Ms := TMemoryStream.Create;
Try
  Ms.WriteComponent(Form1);
  NewForm := TForm1.CreateNew(Application);
  Ms.Position := 0;
  Ms.ReadComponent(NewForm);
  NewForm.Show;
  ShowMessage('Mova o form para ver o primeiro ')
Finally
  Ms.Free;
end;




 NÃO ESQUEÇA DE DEIXAR SEU COMENTÁRIO E DE COMPARTILHAR.
INFORMATICODE 2014