Abrir un programa desde un form de otro

[jafera]

Buenos dias a todos.

Ya se que posiblemente el título no sea el mejor, pero mi duda es saber si se puede hacer esto:

Tengo una aplicacion funcionando en su directorio C:\Aplicacion1, en la que hay un formulario de datos de unas carreras de bicicletas.
Tengo otra aplicacion C:\Aplicacion2 que tiene los recibos generados por dichas carreras.
Ambas aplicaciones son completamente independientes y las dos funcionan con Firebird 1.5.6 sin problemas bajo güindous XP, 7 y 8.

Y el kit de la cuestion es saber si desde la aplicacion1 y concretamente desde uno de sus forms, si le doy doble click en un campo determinado puedo hacer que abra la otra aplicacion y localizar el registro necesario.

Si alguien me puede orientar un poco pues agradecido como siempre por vuestro tiempo.

Posiblemente podria rehacer el código de las dos aplicaciones y crear una sola de nueva pero esto tendria más miga y de momento no tengo tiempo para esto aunque lo estoy replanteando.

Saludos

Josep

[Neftali [Germán.Estévez]]

Para abrir una aplicación desde otra, puedes usar ShellExecute o WinExec. Si buscas en los foros sobre esas dos palabras encontrarás muchos ejemplos y mensajes al respecto (código incluído).

Si necesitas pasarle información al segundo programa, por ejemplo el id del registro o cualquier otra cosa, deberás hacerlo utilizando parámetros en la llamada (con los 2 comandos anteriores puedes hacerlo sin problemas).

Una vez que abras el segundo programa, para recuperar la información de los parámetros (los que te ha pasado el primer programa) puedes buscar en la ayuda de delphi (o en el foro) sobre ParamCount y ParamStr.

Un saludo.

[jafera]

Gracias por la respuesta.

Voy a mirar estas acciones.

Si no tengo mal entendido en versiones superiores de Firebird se puede acceder a diferentes bases de datos desde el mismo ejecutable, es correcto?

Saludos

Josep

[radenf]

Estimado jafera:

Yo utilizo esta función que realiza lo que tú necesitas (No recuerdo de dónde la obtuve):

function Ejecutar(Programa:String;Esperar:Boolean=True):Boolean;
var
ProcInfo:TProcessInformation;
Info:TStartupInfo;
begin
FillChar(Info,SizeOF(Info),0);
Info.cb:=SizeOf(Info);
Info.dwFlags:=STARTF_USESHOWWINDOW;
Info.wShowWindow:=SW_SHOWNORMAL;
Result:=CreateProcess(nil,PChar(Programa),nil,nil,False,0,nil,nil,Info,ProcInfo);
if Esperar then
while WaitForSingleObject(ProcInfo.hProcess,100)=Wait_TimeOut do
begin
Application.ProcessMessages;
if Application.Terminated then Break;
end;
end;

Ejemplo para llamar el programa, que en este caso es un grabador de CD alojado en una carpeta del ejecutable:

begin
with TRegistry.Create do
try
RootKey:= HKEY_CURRENT_USER;
OpenKey('Software\SoftMedica\Nemesis WorkStation', True);
WriteString('DBEditDir.Text',DBEditDir.Text);
WriteString('DBText1.Caption',DBText1.Caption);
Ejecutar(ExtractFilePath(Application.ExeName) + 'Grabador\CDBurner.exe', False);
finally
Free;

Yo le paso algunos parámetros de ejecución, guardándolos en el registro de Windows, a los que accede el grabador al crearse.
Espero que te pueda servir.
Saludos

[jafera]

Gracias Radenf, lo reviso en cuanto tenga un momento.

Saludos

Josep

[jafera]

Buenas.

A ver si consigo otro empujoncito más.

Con doble click en el campo de la aplicación1, abro aplicacion2.
Esta aplicación2 esta protegida por pasword, me lo pide y hace el proceso normal de arranque, pero se queda en el form principal.

Por favor, si me podeis dar una pista de como debo abrir un form determinado que será al que le pasaré el parámetro Id para que localice el registro.

Saludos

Josep

[duilioisola]

Podrías llamar al ejecutable con un parámetro.
Por ejemplo 'Notepad.exe texto.txt'
En la aplicación destino deberías mirar si lleva parámetros y actuar en consecuencia

// Si se llama a la aplicación con parámetros (MiAplicacion.exe /posicionar 1234)
if (FindCmdLineSwitch('posicionar', ['/'], True)) then
begin
if (ParamCount > 1) then
begin
Identificador := StrToIntDef(ParamStr(2), 0);
...
end;

[Neftali [Germán.Estévez]]

Con doble click en el campo de la aplicación1, abro aplicacion2.
Esta aplicación2 esta protegida por pasword, me lo pide y hace el proceso normal de arranque, pero se queda en el form principal.

Por favor, si me podeis dar una pista de como debo abrir un form determinado que será al que le pasaré el parámetro Id para que localice el registro.


¿La aplicación2 es tuya? ¿Puedes modificarla?
Si es que sí, debes usar parámetros y modificar la aplicación2 para que cambie el funcionamiento cuando reciba determinado parámetro (el id). En ese caso debe ir al form que necesitas.

Si no puedes modificarla la cosa se complica.