Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Internet
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Colaboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-03-2008
oscjae oscjae is offline
Miembro
 
Registrado: may 2005
Posts: 70
Poder: 20
oscjae Va por buen camino
Como actualizar tu propio EXE

Wenas a to2, he estado buscando por el foro y no he encontrado nada al respecto, tampoco se si este es el mejor sitio para poner este hilo.

Estoy intentando hacer un auto actualizador de mi propia aplicacion, no hay problema en el caso de bajar el archivo EXE cuando tenga que bajarlo y demas, pero el problema esta cuando tengo que sustituirlo, he leido algo sobre el tema, pero no se muy bien que es lo que tendria que hacer, o mejor dicho, que es lo que se suele hacer.
He leido sobre hacer una aplicacion aparte, meterla en el fichero de recursos y extraerla cuando la necesite, para poder cerrar la aplicacion y sustituirla por el archivo que se ha bajado, y luego ejecutarla de nuevo, tambien he leido algo de que en el registro de windows se puede dejar como una notificacion de que cuando se vuelva a ejecutar el programa, antes de nada realice un proceso, que podria ser lo de sustituirlo, pero tampoco se muy bien como va.

Si pudierais ayudarme os lo agradeceria.

Salu2 a to2.
Responder Con Cita
  #2  
Antiguo 12-03-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 21
cHackAll Va por buen camino
Hola oscjae, efectivamente éste no es el sub-foro adecuado, el espacio más neutral para los temas "mixtos" es el sub-foro Varios.

La forma en que actualices tu aplicación es meramente el producto de tu capacidad, imaginación y experiencia, tan solo te doy un ejemplo.

Tu aplicacion verifica via Web las actualizaciones, una vez encontrada la descarga en un archivo temporal. Terminada la descarga procede a auto-renombrarse a un nombre dummy.tmp y renombra el archivo temporal al nombre original de la aplicación. Hasta allí el reemplazo ha sido exitoso. Ahora debe marcar al archivo dummy.tmp para eliminación o eliminarlo al arrancar la nueva versión.

Código Delphi [-]
// download...
 MoveFile(PChar(ParamStr(0)), 'dummy.tmp');
 MoveFile('c:\downloaded.tmp', PChar(ParamStr(0)));
 CreateProcess(nil, PChar(ParamStr(0)), ...
 Halt;
 
// Y la nueva version solamente;
 Sleep(1000);
 DeleteFile('dummy.tmp');

El anterior código es solo una pequeña muestra, y como ya te comentaba los métodos para realizar lo que quieres dependen de la habilidad del programador.

Saludos

Última edición por cHackAll fecha: 12-03-2008 a las 16:23:11.
Responder Con Cita
  #3  
Antiguo 12-03-2008
oscjae oscjae is offline
Miembro
 
Registrado: may 2005
Posts: 70
Poder: 20
oscjae Va por buen camino
Gracias por la respuesta, no pensaba que pudiera renombrar el archivo mientras se estaba ejecutando.

Salu2.
Responder Con Cita
  #4  
Antiguo 12-03-2008
Avatar de axesys
axesys axesys is offline
Miembro
 
Registrado: ene 2007
Ubicación: Los Mochis Sinaloa
Posts: 208
Poder: 18
axesys Va por buen camino
Otra alternativa mas sencilla puede ser usar un componente como el mxWebUpdate de MaxComponents o el AutoUpgrader de appcontrols
Responder Con Cita
  #5  
Antiguo 12-03-2008
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.549
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Busca de nuevo, hemos hablado varias veces sobre el tema e incluso recuerdo que se han subido códigos de ejemplo.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #6  
Antiguo 12-03-2008
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Poder: 24
seoane Va por buen camino
No lo he probado pero, chackall ¿esto funciona?
Código Delphi [-]
MoveFile(PChar(ParamStr(0)), 'dummy.tmp');
MoveFile('c:\downloaded.tmp', PChar(ParamStr(0)));
Responder Con Cita
  #7  
Antiguo 12-03-2008
Avatar de eduarcol
[eduarcol] eduarcol is offline
Miembro Premium
 
Registrado: ago 2003
Ubicación: En los estados Zulia y Merida de Venezuela
Posts: 4.151
Poder: 26
eduarcol Va por buen camino
yo subi un ejemplo que hace lo que quieres, apoyado en codigo de seoane, pero estaba en mi subdominio, no se si emilio lo puede publicar en algun chance que tenga..., voy a preguntarle
__________________
...Yo naci en esta ribera del arauca vibr@d0r
Soy hermano de la espuma,
de la garza, de la rosa y del sol...
Viva Venezuela
Responder Con Cita
  #8  
Antiguo 12-03-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 21
cHackAll Va por buen camino
Cita:
Empezado por seoane Ver Mensaje
chackall ¿esto funciona?
      
si
Responder Con Cita
  #9  
Antiguo 12-03-2008
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Poder: 24
seoane Va por buen camino
Pues me dejas sorprendido chackall

Siempre había creído que un programa era intocable mientras se estaba ejecutando, es decir, que no se podía borrar, mover, ni renombrar, pero estaba equivocado acabo de comprobar que si se puede mover

Es mas, en la lista de procesos sigue manteniéndose el nombre viejo

¿Soy el único al que esto le parece peligroso?
Responder Con Cita
  #10  
Antiguo 12-03-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 21
cHackAll Va por buen camino
Cita:
Empezado por seoane Ver Mensaje
...¿Soy el único al que esto le parece peligroso?
Más peligroso me parece hacer notar a los niños que tienen juguete nuevo.

TIPs; no se puede mover el archivo entre unidades diferentes y tampoco cuando esta siendo utilizado (ZwCreateFile) por otro proceso.

Saludos
Responder Con Cita
  #11  
Antiguo 12-03-2008
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.549
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por seoane Ver Mensaje
¿Soy el único al que esto le parece peligroso?
Yo también había dudado de su correcto funcionamiento; No acabo de ver claro (la 2ª linea) que se pueda sobreescribir el propio fichero.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #12  
Antiguo 13-03-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 21
cHackAll Va por buen camino
Cita:
Empezado por Neftali Ver Mensaje
No acabo de ver claro (la 2ª linea) que se pueda sobreescribir el propio fichero.
Puesto que el archivo ha sido movido (renombrado), no existe la sobre escritura.
Responder Con Cita
  #13  
Antiguo 14-03-2008
FrancisR FrancisR is offline
Miembro
 
Registrado: ene 2008
Posts: 11
Poder: 0
FrancisR Va por buen camino
Fantastico truco ChackAll

Oye gracias por este truco, es sencillo y tiene todo el sentido. Lo acabo de probar y funciona a la perfección. Lo deberían de poner en la sección de trucos.
Responder Con Cita
  #14  
Antiguo 21-03-2008
jhonalone jhonalone is offline
Miembro
 
Registrado: sep 2007
Ubicación: Madrid
Posts: 549
Poder: 18
jhonalone Va por buen camino
Auto Renombrar Aplicación

SI pero NO. Funciona y no funciona. Me explico.

Yo lo llevo haciendolo hace más de un año y medio. Se baja el fichero, se renombra el EXE, se renombra el fichero bajado al EXE y después se elimina el antiguo EXE renombrado. Yo, para evitar problemas, le obligo al usuario a reiniciar la aplicación.

Bien. Eso lo he probado con XP y con Vista y funciona. Pero el otro día alguien me llamó diciendo que daba un problema: "File Access denied". Bueno he comprobado que en ME da este error: mientras se está ejecutando la aplicación no te deja renombrar el fichero.

Así que Seoane y cHacAll los dos tenéis razón.

A mí, ahora, se me plantea el reto de hacerlo en ME, burlando la vigilancia del SO. Pero no sé cómo hacerlo. He probado con una utilidad de Seoane para aplazar el proceso hasta el próximo reinicio del equipo, pero esta rutina no funciona en ME. He probado ha hacerlo desde MS-DOS y da el mismo error.

Si alguien tiene alguna idea, os lo agradecería. Seguiré investigando.

Un Saludo.
Responder Con Cita
  #15  
Antiguo 24-03-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 21
cHackAll Va por buen camino
Pues en el caso de ME, lo que se debe usar es la API MoveFileEx, con el parámetro MOVEFILE_DELAY_UNTIL_REBOOT, sin embargo (me dirán que) dicho parámetro solo es compatible con tecnología NT, CIERTO, pero revisando un poco la ayuda de la API tenemos:
Cita:
Empezado por (F1) MoveFileEx
Windows 95:
The MOVEFILE_DELAY_UNTIL_REBOOT flag is not supported. To rename or delete a file at reboot on a Windows 95 system, place an entry in the WININIT.INI file in the Windows directory.

For example, on Windows 95, the following code fragment creates WININIT.INI entries that delete szDstFile and rename szSrcFile to be szDstFile at reboot:

GetWindowsDirectory(szWinInitFile, uSize);
lstrcat(szWinInitFile, "\\WININIT.INI");
WritePrivateProfileString("Rename", "NUL", szDstFile, szWinInitFile);
WritePrivateProfileString("Rename", szDstFile, szSrcFile, szWinInitFile);
y allí tenemos la solución, crear %SystemRoot%\wininit.ini y definir que archivos van a ser renombrados al reiniciar el S.O.

Saludos
Responder Con Cita
  #16  
Antiguo 24-03-2008
jhonalone jhonalone is offline
Miembro
 
Registrado: sep 2007
Ubicación: Madrid
Posts: 549
Poder: 18
jhonalone Va por buen camino
Muchas gracias cHackAll.
He tardado en responderte, porque me has pilllado cenando.
Investigando por ahí, encontré esa solución y ya tengo hecho una función que estuve comprobando y funciona en mi aplicación. Me falta comprobar si funciona en XP, que creo que si. No obstante te agradezco enormemente la molestia que te has tomado. Conozco tu labor en el foro por muchas otras soluciones que nos das a los "torpes".
No he colgado la solución en un post, porque tiene un pero, (como no).
Esta tarde he colgado un post en el foro de Api de Windows con el nombre "¿Como obtener nombres de ficheros MS-DOS"? donde explico el "pero" que tiene la cuestión. Pues antes de poner las instrucciones en el fichero WinInit.ini, que tambien tiene XP, hay que asegurarse de que la ruta es correcta.

Gracias de nuevo.
Todos te debemos mucho.
Un saludo.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Abrir archivo propio desde Windows....en programa propio darkphantom Varios 12 22-02-2007 05:46:49
Como salvar desde un programa en delphi con tu propio icono. Dragon Varios 3 14-04-2006 01:13:50
Como hacer mi propio Correo automatico? Luis Alberto Varios 4 24-11-2005 12:51:02
Como referencio un objeto desde un procedure propio? alehillebrand OOP 3 13-07-2005 17:31:48
Mi propio instalador. Como aparecer en Agregar o Quitar programas jealousy Varios 3 10-10-2003 10:46:54


La franja horaria es GMT +2. Ahora son las 02:38:58.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi