problema con CopyFile....

[rojo raton]

Hola. Tengo un problemilla con la funcion CopyFile. Resulta que deseo copiar un archivo, en este caso imágenes(bmp) al directorio en donde se encuentra el ejecutable de mi aplicación delphi(se encuentra en un pendrive), he intentado lo siguiente:

copyFile(pchar(‘c:\imagen.bmp’),pchar(‘imagen.bmp’),true); y funciona!

Pero si lo intento desde un subdirectorio del raiz como por ejemplo:

copyFile(pchar(‘c:\documents and settings\imagen.bmp’),pchar(‘cosa.bmp’),true);

esto me copia la imagen en el mismo directorio de origen, osea que ambos archivos, imagen y cosa se quedan en “c:\documents and settings”.

Me pregunto q error estoy cometiendo o si existe alguna otra función q resulte más eficaz para copiar archivos. saludos

[ecfisa]

Hola.


Resulta que deseo copiar un archivo, en este caso imágenes(bmp) al directorio en donde se encuentra el ejecutable de mi aplicación delphi


Probá de este modo:

var
Origen, Destino: string;
begin
Origen:= 'c:\imagen.bmp';
Destino:= 'imagen.bmp';
CopyFile(PChar(Origen), PChar(ExtractFilePath(Application.ExeName) + Destino), True)
end;

Las variables Origen y Destino son para dar más legibilidad, pero podés prescindir de ellas.

Un saludo.

[rojo raton]

Gracias Ecfisa! otraves me salvaste las papas! ese consejo que me diste funcionó. Saludos.