Ejecutable desde servidor

[elrayo76]

Como te comente antes, intenta ver los permisos de los archivos a ver si es por eso que no hace lo correcto. Por mas que uses un usuario administrador puede que no te funcione.

Si los archivos se suben al servidor con un usuario puede que otro por mas que sea administrador no lo vea o la aplicación no los pueda usar correctamente. Esto puede pasar con los nombre de máquinas, segun este armado el esquema de permisos en los sorvidores.

saludos

[[AgustinOrtu]]

Asegurate de leer la documentación

La funcion CopyFile devuelve True o False segun la operación tuvo éxito o no

Tu error es que tu codigo sigue operando sin chequear el valor de retorno. Las funciones de la API de Windows no suelen elevar excepciones; es por esto que la mayoria retorna el Boolean

Luego, existe el método RaiseLastOSError definido en la unidad SysUtils que eleva una excepción con el mensaje y código de la última excepción que se generó al llamar una llamada a la API de Windows

Podrías refactorizar tu código de la siguiente manera:

Código Delphi [-]
  if not CopyFile(...) then
    RaiseLastOSError;

  // código que se ejecuta si el archivo fue copiado con éxito

Otra forma de hacerlo en mi opinión mas limpia es usando la funcion Win32Check, también de la unidad SysUtils

Win32Check chequea el valor de retorno de la función en cuestión, y si es False (hubo un error) invoca a RaiseLastOSError

Código Delphi [-]
  if Win32Check(CopyFile(...)) then
  begin
    // código que se ejecuta si el archivo fue copiado con éxito
  end;

[[AgustinOrtu]]

Por otra parte, que hace el metodo Dm.Bitacora

Has probado depurar la aplicacion? Podrias ir imprimiendo mensajes en pantalla o en un archivo para ver "hasta donde llega"

Es mejor trabajar con información real y no andar jugando a las adivinanzas

[Willo]

No cabe duda que aqui siempre hay oportunidad para aprender de los grandes...

Gracias chicos, incorporare sus sugerencias a mi codigo y espero que eso arroje luz a mi ceguera.