Ver Mensaje Individual
  #4  
Antiguo 02-01-2016
juank1971 juank1971 is offline
Miembro
 
Registrado: feb 2008
Posts: 230
Reputación: 17
juank1971 Va por buen camino
eso sería lo ideal casimiro pero es que estoy muy lejos de los clientes y el ancho de banda no es el mejor, además hay que hacer muchas modificaciones mínimas muy seguido, y quiero quitarme de arriba el problema de actualizar y poder hacerlo muy rapido, mando un correo que actualizen y con un botón se baja solamente el ejecutable nuevo.

A propósito de eso la forma que logre hacer cambiar el mismo ejecutable que uso la encontré en este foro pero no estaba incompleta , hay colegas que ponen solo parte del código y lo que faltaba era más difícil de lograr al menos en mi caso.


Este código funciona perfecto para reescribir el propio ejecutable y reiniciar la aplicación abriendo el ejecutable nuevo suponiendo que el nuevo es D:\miexe.exe:
Código Delphi [-]
  MoveFile(PChar(ParamStr(0)), 'temporal.tmp');
  MoveFile('D:\miexe.exe', PChar(ParamStr(0)));
  ShellExecute(Handle,nil,('miexe.exe'),'','',SW_Shownormal);
 Application.Terminate;


con eso reescribo el exe y ya esta todo lo grado solo me falta poder buscar todos los ficheros necesarios para ejecutar la aplicacion y meterla en un instalador
gracias juank
Responder Con Cita