Problema con TAdTerminal de los Async 4 Prof.

[AGAG4]

http://sourceforge.net/projects/tpapro/
Uso D7

Buen día estoy haciendo un pequeño programa que recibira las llamadas tomadas por un conmutador, tome el ejemplo que vienen junto con los Apro y funciona muy bien, el programa recibe todas las llamadas, pero el problema que tengo es que no encuentro como guardar en un archivo de texto las llamadas recibidas, en la propiedad CaptureFile le pongo c:\Recibe.ap ó c:\Recibe.txt y al abrirlo no hay nada, y probe con la propiedad Capture los siguientes valores (cmAppend,cmOn,cmOff)

Agradezco cualquier comentario al respecto

[[egostar]]

Prueba con este código

Código Delphi [-]
procedure TForm1.FormShow(Sender: TObject);
begin
  ApdComPort1.Open    := True;
  AdTerminal1.Capture  := cmAppend; // Importante
  AdTerminal1.Active    := True;
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  AdTerminal1.Active := False;
  ApdComPort1.Open   := False;
end;

El problema que le veo es que solo podrás abrirlo hasta que cierras la AdTerminal, ya que abre el archivo de forma no compartida.

Debes de asignar la propiedad Capture en cmAppend de otra forma cada vez que abras la AdTerminal te va a crear un nuevo archivo y esto lo debes hacer por código no en tiempo de diseño.

Salud OS.

[AGAG4]

Gracias EgoStar por su pronta respuesta, voy a probarlo.
Que tengas buen día.

[AGAG4]

Ya hice la prueba EgoStar asi como me la planteo por codigo le meti las lineas

Código Delphi [-]
Capture := cmAppend ;

Y no puedo abrir el archivo que crea cuando recibe la llamada, tengo que cerrar el programa para poder ver el contenido del archivo, de plano no se puede abrir el archivo, porque lo que quiero es leer el archivo grabar los datos de la llamada(s) en una Base de datos firebird y borrar el contenido del archivo, no hay otro componente igual que el TapdTerminal pero que deje accesar el archivo ????

[[Al González]]

¡Hola Alfredo!

Gusto en saludarte. Me parece muy interesante tu caso. No me sorprende que Eliseo sepa de esos componentes.

En lo personal, me tocó manejar un par de componentes de TurboPower Async Professional hace tiempo. Aún recuerdo el día en que un contacto en el mensajero me lanzó la noticia "¿Qué crees? ¡Han liberado los TurboPower!" (yo ni los conocía entonces ). Empezaba la cultura del Open Source.

Bueno, pero la razón principal de mi intervención es sugerirte una solución que podría ser viable. No sin antes preguntarte si te sirvió cerrar temporalmente el TAdTerminal en tiempo de ejecución cada vez que deseas leer el archivo, como de alguna manera ya lo sugiere Eliseo.

La alternativa: En algún lugar del código fuente, estará seguramente la sentencia o grupo de sentencias que se encargan de guardar cada una de las llamadas en el archivo. Creo que podrías echarte un clavado en dicho código fuente para ver de qué manera puedes interceptar ese momento. Quizá haya un evento o método virtual que puedas aprovechar, o ya de plano modificar el código fuente del componente.

Inténtalo por ese lado y si tienes alguna dificultad, no dejes de comentarnos.

Un abrazo conmutado.

Al González.

[AGAG4]

Gracias Alberto, tambien es un gusto saludarlo por este rumbo, ya lo había pensado en cerrar la terminal y volverla abrir, pero mi temor es que cuando este cerrada la terminal y en el comutador envia otra llamada se pierda dicha llamada, espero que no pase eso, porque por lo que he leido el que se encarga de recibir la llamada es el componente ApdComPort y de mostrarla es el TAdTerminal, ya si no es por alli, a espurgar el fuente de los APRO , bueno voy a continuar con las pruebas, yo les platico como me fue.

Gracias por su respuesta Al.

[[egostar]]

Empezado por Al González

Gusto en saludarte. Me parece muy interesante tu caso. No me sorprende que Eliseo sepa de esos componentes.

Hola Al.

Todo se lo debo a mi manager.....

Salud OS históricos, como lo dirías tú.