Copiar archivo de una carpeta a otra

[diego007]

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

[[escafandra]]

Empezado por diego007

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

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.