Código Delphi [-]CopyFile(PChar('directorioactual'), PChar ('directorionuevo'+ edit1.Text), false);
CopyFile(PChar('directorioactual'), PChar ('directorionuevo'+ edit1.Text), false);