Saber cuando un programa externo genera un .ini

[ManuelPerez]

Hola uso Delphi 7 y necesito saber como puedo hacer los siguiente: con mi programa genero un archivo ini y ejecuto un programa externo que lo lee y genera un proceso, al terminar el proceso de dicho programa me genera un archivo ini (respuesta)en el cual yo lo tengo que leer para hacer x cosa. El tema es que no se cuando como saber que dicho programa me genero el archivo ini, es decir, generar yo el archivo ini y llamar al programa externo, esto ya esta echo, tambien se como leerlo. Pero lo que no se es como saber cuando me genera el archivo el programa externo.

Dicho archivo(respuesta) me lo genera en la misma carpeta que mi ejecutable, lo que me gustaria hacer es borrar siempre ese archivo de respuesta y ejecutar el programa externo y preguntar si ya se genero ese archivo de respuesta. Pero no se como hacerlo, espero que haya sido claro.

Ayuda

Gracias

[[rretamar]]

Hola.
Hay mejores formas de comunicar dos aplicaciones entre sí. Hay funciones de la API justamente para eso y sin tantas complicaciones. También hay componentes para DDE en la misma paleta de Delphi.

Aquí hay un ejemplo de uno de estos métodos:
http://delphiallimite.blogspot.com/2...iones-sin.html

Si aún así querés hacerlo mediante archivos, podés usar componentes como el Filemonitor de las Jedi, que puede detectar cambios en directorios (por ejemplo la creación de un archivo).

Saludos !

[[ElKurgan]]

Empezado por rretamar

Hola.
Hay mejores formas de comunicar dos aplicaciones entre sí...

Claro, siempre que las dos aplicaciones las controles tu... Pero por si alguna es de otro desarrollador y no tienes fuentes, este truco de la amada y nunca bien ponderada "Trucomania" te puede servir

Saludos

[ManuelPerez]

Gracias ElKurgan muy buen truco... la otra aplicación es de otro desarrollador que usa otro lenguaje.

Saludos

[rgstuamigo]

Bueno tambien podrias comprobar la existencia del archivo haciendo esto:

Código Delphi [-]
if FileExists('C:\MyArchivo.ini') then
 begin
   ShowMessage('El archivo ya existe');
 end

Eso lo podrias poner en el evento OnTimer de un TTimer mas o menos asi:

Código Delphi [-]
procedure TForm1.Timer1Timer(Sender: TObject);
begin
 if FileExists('C:\MyArchivo.ini') then
  begin
   ShowMessage('El archivo ya existe');
   //hago lo que tengo que hacer con el archivo
    ...
    ...
    DeleteFile('C:\MyArchivo.ini');//borro el archivo
    Timer1.Enabled:=False;//deshabilito el timer para que ya no siga ejecutandose
  end
end;

Saludos...