[rastafarey]

Código Delphi [-]
With TForma.Create(Self{o nil}) Do Try
   //Aqui asignas lo que tengas que asignar
  Show; 
  //ShowModal;
Finally
  Free;
End;

Con la misma llamada puedes crear 50.000 formas.

Si quieres verstilidad haslo en un procedimiento teniendo por parametro los valores que quieres asignar a los controles.