Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #13  
Antiguo 03-07-2021
Avatar de mRoman
mRoman mRoman is offline
Miembro
 
Registrado: nov 2003
Posts: 646
Poder: 23
mRoman Va por buen camino
Solucionado

Hola...

Continuando con este hilo...

En el evento del IBEvent (OnEvenAlert), lo registré asi.

Código Delphi [-]
procedure TfrmMesasAbiertas2.IBEvents1EventAlert(Sender: TObject;
  EventName: String; EventCount: Integer; var CancelAlerts: Boolean);
begin
     if EventName='NEW_COMANDA' then
     begin
        RefreshComandero();
     end;
end;

Lo que hice al final fue configurar una PC como terminal donde los MESEROS capturan las comandas y al momento de CERRAR LA CUENTA, se debe actualizar el COMANDERO -el cual esta en la caja (Servidor)-, previo a esto, estuve haciendo pruebas de otra cosa como la comunicación entre equipos dentro de la RED, lo cual al principio no se veían las PC entre ellas, lo anterior derivado del Firewall, lo desactive momentáneamente y fue así como las PC se vieron entre si -haciendo ping-.

Pues asi deje esta configuración del Firewall y empecé a terminar el proceso que había iniciado con las Alertas para q el comandero se actualizará cuando el MESERO cerrara la cuenta....YA LO HACE, YA ACTUALIZA EL COMANDERO!!., por lo tanto CREO que esto estaba intefiriendo con las alertas....ahora lo realiza sin problemas.

Esto hace el procedimiento "RefreshComandero()"
Código Delphi [-]
procedure TfrmMesasAbiertas2.RefreshComandero;
begin
    qryComandero.Close;
    qryComandero.Open;
end;

Que es ejecutado cada vez que un MESERO cierra la cuenta de un COMENSAL.

Sin duda habrá alguien mas que sea mas preciso en lo que he descrito y nos comente si lo del firewal tuvo algo que ver....

Saludos.
__________________
Miguel Román

Afectuoso saludo desde tierras mexicanas....un aguachile?, con unas "cetaseas" bien "muertas"?, VENTE PUES !!
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
missing operator or semicolon MarcosDG95 Varios 3 07-08-2019 03:40:18
Missing dataset property liito16 Conexión con bases de datos 2 23-02-2011 23:36:53
Missing DataSet Property foxito Providers 2 07-11-2008 13:14:25
Missing DriverName property identsoft Conexión con bases de datos 0 26-05-2008 09:28:20
Missing right quote luisny Firebird e Interbase 6 19-03-2004 14:29:47


La franja horaria es GMT +2. Ahora son las 01:21:32.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi