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:

Código Delphi [-]
copyFile(pchar(‘c:\imagen.bmp’),pchar(‘imagen.bmp’),true);

y funciona!

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

Código Delphi [-]
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:

Código Delphi [-]
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.