Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Problema con ShellExecute (https://www.clubdelphi.com/foros/showthread.php?t=24069)

hector_etv 07-08-2005 03:27:33

Problema con ShellExecute (Solución)
 
Hola amigos!

otra ves estoy con problemas :( ahora necesito ejecutar un archivo de instalación desde mi formulario de delphi, como mencioné en un post anterior estoy desarrollando un autorun... por ello no puedo especificar la Unidad donde se aloja el setup, ya que no siempre se ejecutará en D: que es generalmente la Unidad de CD :confused:

El código sería + o - asi:

ShellExecute(Handle, 'open', '\Fisica\Nivel2\setup.exe', nil, nil, SW_SHOWNORMAL); {Ejecuta el Instalador}

pero obviamente no funciona porque no se especifica la ruta completa...

ese es el problema.

EDIT:

La solución salió de mis recuerdos sobre MS-DOS... en concreto, la instrucción queda como sigue:

ShellExecute(Handle, 'open', '.\Fisica\Nivel2\setup.exe', nil, nil, SW_SHOWNORMAL); {Ejecuta el Instalador}

Donde el punto asume el directorio actual donde se ejecuta el EXE como el raiz del path :D

bueno, es bueno dejar con respuestas cada consulta que salga para seguir apoyendo a otros que tengan las mismas dudas!!!

;)

... y gracias por vuestra ayuda!

:)

subzero 07-08-2005 04:11:47

Hola:

Bueno te aconsejo que utilices un instalados donde controles esto, prueba con el inno setup, es gratis y puedes mandar tus mensajes en español y controlar lo que se instala y desde donde se instala. :)

Por otro lado prueba este código en el ShellExecute.

Código:

ShellExecute(0,nil,PChar(ExtractFilePath(Application.ExeName) + '\Fisica\Nivel2\setup.exe'),'','',SW_SHOWNORMAL);

PChar(ExtractFilePath(Application.ExeName) Este señor verifica desde donde se esta ejecutando la aplicación y quizas te pueda controlar eso.

Suerte.


La franja horaria es GMT +2. Ahora son las 09:35:26.

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