11 replies to this topic

[felipe]

Me gustaria saber como puedo pasarle a otra aplicacion un valor para que esta la muestre...

[seoane]

Necesito mas datos para darte una respuesta:

• ¿La segunda aplicación la ejecutas desde tu programa o ya esta abierta?
• ¿El valor es numérico o es un String?

[felipe]

Necesito mas datos para darte una respuesta:

• ¿La segunda aplicación la ejecutas desde tu programa o ya esta abierta?
• ¿El valor es numérico o es un String?

Creo que en el momento de publicar la pregunta me podia mas el cansancio  ...

La otra aplicacion la llamaria desde mi programa mediante el ShellExecute, el valor con el que quiero hacer la prueba es un String, estuve consultando con la ayuda de Delphi la funcion SendMessage pero con lo poco que entendi no sabría como la otra aplicacion deberia leer los valores  :^)...

[seoane]

La función ShellExecute tiene un parámetro llamado "Parameters" donde le puedes indicar los parámetros que se deben pasar a la aplicación que se va a ejecutar. Luego desde la segunda aplicación puedes leer esos parámetros usando la función ParamStr y ParamCount.

[Caral]

Hola

La función ShellExecute tiene un parámetro llamado "Parameters" donde le puedes indicar los parámetros que se deben pasar a la aplicación que se va a ejecutar. Luego desde la segunda aplicación puedes leer esos parámetros usando la función ParamStr y ParamCount.

En algún programa he implementado esa función, pero no me acuerdo como lo hice y tampoco encuentro el programa.
Podrías darnos un ejemplo sencillo de como pasar esos datos?.
Saludos

[felipe]

La función ShellExecute tiene un parámetro llamado "Parameters" donde le puedes indicar los parámetros que se deben pasar a la aplicación que se va a ejecutar. Luego desde la segunda aplicación puedes leer esos parámetros usando la función ParamStr y ParamCount.

Correcto amigo, entiendo lo que dices... planteo el siguiente ejemplo: Quieres abrir Word desde Delphi y que al hacerlo este contenga un mensaje que escribes desde tu aplicación.
Aclaro: Expongo este ejemplo solo como indicacion de lo que quiero hacer, ya que si realmente tuviera que hacer eso usaria el WordApplication 

[seoane]

Un momento, si la aplicación a la que queremos enviar los parámetros no es nuestra la cosa cambia. Entonces tendrás que usar el método que hayan pensado los programadores de la misma, si han pensado en alguno.

En cambio si la aplicación es tuya pues simplemente ejecutala con el parámetro "Hola mundo" y en el evento OnCreate pon esto:

delphi

Label1.caption:= ParamStr(1);

[felipe]

Un momento, si la aplicación a la que queremos enviar los parámetros no es nuestra la cosa cambia. Entonces tendrás que usar el método que hayan pensado los programadores de la misma, si han pensado en alguno.

He ahí el dilema  ... de todas formas, tomaré un poco de tiempo para hacer algunas pruebas, ya que es claro que en Windows podemos mantener mensajes como si se tratara del "porta papeles"... pero ¿como saber si la otra aplicación lo espera? ó ¿de que manera lo hace? :^)... espero poder postear algún resultado, igual sigo abierto a recomendaciones  ...

Saludos

[Caral]

Hola
Revisando La función ShellExecute y la forma de adquirir el dato realice un ejemplo pero solo me recibe un dato.
Como podria enviar mas de uno.
Me explico con lo que hice:
En el primer programa coloco un edit y un boton:
En el evento del boton:

delphi

procedure TForm1.Button1Click(Sender: TObject);
var
 dato: PChar;
begin
  Dato:= PChar(Edit1.Text);
  ShellExecute(Form1.Handle, nil, 'C:\Program Files\Borland\Delphi6\Projects\Pasar dato a otro programa\Project2.exe',dato, nil, SW_SHOWNORMAL);
end;

Paso el valor del edit al pchar.

En el otro programa que recibe el dato pongo un edit y en el evento oncreate esto:

delphi

Edit1.Text:= ParamStr(1);

Bueno el dato se recibe, pero solo la primera palabra, si es una frase no.
Como se puede enviar una frase??
Saludos

[felipe]

Hola Caral... espero no sea tarde para una respuesta 

Si quieres pasar valores entre dos aplicaciones (Creadas por ti), este es un buen ejemplo que te servirá 

http://delphiallimit...ciones-sin.html

[Caral]

Hola
Muy interesante amigo.
Muchas gracias.
Saludos

[felipe]

De nada...  ojala te sirva de guia