Foros Club Delphi - Copiar archivo de una carpeta a otra

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)

- - Copiar archivo de una carpeta a otra (https://www.clubdelphi.com/foros/showthread.php?t=65681)

Copiar archivo de una carpeta a otra

Hola Amigos, estoy creando un sistema para copiar archivos de una carpeta a otra, pero los nombres de los archivos son sacados de un ListBox, el sistema saca el primer nombre que hay en el list bos y lo copia en otra carpeta, el problema es que me sale un error y no se como hacer funcionar el programa, este es la parte del codigo que no me funciona:

Código PHP:


		
			
AnsiString a = "C:\\" + ListBox1->Items->Strings[0];

        CopyFile( a , "D:\\", TRUE);

        Label1->Caption = a;

De paso queria preguntarles como hacer para que el archivo que cree en D:\\xxxxxx.xxx mandar a que se ejecute despues de hacer la copia.
De antemano muchas gracias por su ayuda

Cita:

Empezado por diego007 (Mensaje 350111)

Código PHP:


		
			
AnsiString a = "C:\\" + ListBox1->Items->Strings[0];
        CopyFile( a , "D:\\", TRUE);
        Label1->Caption = a;

De paso queria preguntarles como hacer para que el archivo que cree en D:\\xxxxxx.xxx mandar a que se ejecute despues de hacer la copia.
De antemano muchas gracias por su ayuda

No aclaras bien cual es el error, pero observa esto:

Siempre y cuando en tu ListBox guardes los nombres y sólo los nombres (sin ruta) de tus archivos el código funcionaría así:

Código PHP:


		
			
AnsiString S = "C:\\" + ListBox1->Items->Strings[0];
AnsiString D = "D:\\" + ListBox1->Items->Strings[0];
CopyFile(S, D, TRUE);

Si en tu ListBox Guardas nombres completos (con ruta), deberás extraer el nombre de archivo previamente para poder copiarlos a otra carpeta, y no asignarles delante ninguna ruta en el nombre de la fuente... Vigila este punto.

Para ejecutar:

Código PHP:


		
			
ShellExecute(0, 0, ExeName, Parametros, 0, SW_SHOWNORMAL);

Saludos.