![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
![]() Pues no he podido mandar un writeln del servidor al cliente, lo que quiero hacer es al dar de alta un registro en el Servidor, este registro mandarlo a otra tabla que se encuentra en el Cliente, pero no se como mandarlos ya que el componente no tiene ninguna Propiedad AContext con la cual enviar el mensaje al cliente y este la reciba.
Espero k me puedan ayudar. |
#2
|
|||
|
|||
![]() Hola Buenas tardes...
Anexo el código en C++ Builder, para hacerlo en Delphi cambia el (->) por (.) //------------------------------------------------------------------------ bool Enviar_CNT(AnsiString IP,AnsiString Mensaje) { bool Envio = false; int Cont; TList *Listado = new TList(); Listado = IdTCPServer1->Threads->LockList(); TIdPeerThread* Temp; try { for (Cont = 0; Cont < Listado->Count; Cont++) { Temp = (TIdPeerThread*)Listado->Items[Cont]; if (Temp->Connection->Socket->Binding->PeerIP == IP) { Temp->Connection->Write(Mensaje); Envio = true; break; } } } __except(1) { Temp->Stop(); IdTCPServer1->Threads->UnlockList(); } IdTCPServer1->Threads->UnlockList(); return Envio; } //------------------------------------------------------------------------ |
#3
|
|||
|
|||
![]() Lo probare y te dire como me fue, muchas gracias por la respuesta.
|
#4
|
|||
|
|||
Estoy usando INDY10
Ya estuve intentando con el codigo, pero no son las mismas funciones para indy 10, creo k estas usando indy 9, seguire intentando pasarlo a las 10, pero si hay alguin k me pueda ayudar se los agradeceria.
|
![]() |
|
|
![]() |
|