*** Documento en elaboración *** v128
El código que se incluye a continuación muestra como, mediante las facilidades normales de Remoting de M&P,
es posible implementar un Sistema de Broadcasting e Intercambio de Mensajes
elemental con menos de 10 líneas de código.
El código permite a cualquier usuario publicar un mensaje que será recibido
por otros usuarios que estén operando la aplicación y pueden a su vez responder
publicando nuevos mensajes.
| Ente mecanismo, en su esencia, es análogo al
utilizado por los sistemas de Broadcasting de Mensajes y
Chating tales como el MS Messenger. También en la implementación
del Pattern Remote-MVC. |
El código utiliza el método de Suscripción a Eventos Remotos
ServerEvtSusc de la interface IBChannelB2S.
IBChannelB2S IBChannelB2S = ....
IBChannelB2S.ServerEvtSusc("DemoEvt1", DemoEvt1_BSL);
.......
private void DemoEvt1_BSL(ENV Env, BSX bsx)
{
// Ejecuta en la UI Thread
GCB.page.Dispatcher.BeginInvoke(delegate()
{
MessageBox.Show(bsx.Text);
});
return OB.T;
}
Operación
En MPe desplegar la Consola BScript. Hacer:
1. "Start" ->
"CONSOLE"
2. Selecciónar "SVR" en la Consola
3. Evaluar la expresión:
(obPE "DemoEvt1" "User A" 345)
Esta expresión publica el Evento "DemoEvt1" en el Server
con dos argumentos: "User A" y 345.
A todos los usuarios que estén operando la aplicación les
aparecerá el mensaje:
@to_do cambiar imagen consola
|
