Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus-es / 2011-05

Sobre Lnet

1 message · 1 person ·

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Abraham

Hola amigos.

espero me puedan ayudar en un problema que tengo con Lnet.

Estoy haciendo una peque�a aplicaci�n con 2 formularios para este ejemplo usemos los siguientes nombres frmPrincipal y frmLogin.

en el frmprincipal tengo el Lnet, cuando el proyecto es ejecutado entra al evento create y crea el formulario frmLogin y luego este es mostrado, cuando el usuario ingresa su usuario y contrase�a al presionar la tecla enter, el formulario de login se cierra y env�a los datos ingresados al frmPrincipal, donde este hace un lnet.sendmessage(datosm,tsock); por parte de mi aplicaci�n servidor decepciona el mensaje y valida si el usuario y contrase�a son los correctos y env�a un mensaje a frmprincipal.

aqu� es la parte de mi problema. Siguiendo en el evento create como puedo recuperar los datos enviados por mi aplicaci�n servidor. Estoy haciendo lo siguiente( todo esto dentro del evento create)

   Sent:=TL_CMD.GetMessage(TMSG,sock);
   If Sent>0 then showmessage(TMSG);

pero no me muestra los datos que env�a la aplicaci�n servidor, si pongo el showmessage antes del if, me muestra el mensaje pero sin ning�n dato.

tambi�n intente colocar en el evento Receive del Lnet la siguiente linea

TL_CMD.GetMessage(TMSG);

pero la variable TMSG no contiene ning�n valor al momento que llega al showmessage.

si alguien tiene una idea estar� atento a escucharlas.

Les agradesco por su tiempo y ayuda.

Saludos.

-------------------
Abraham Monta�o
abraham.montano en gmail.com
Chiclayo - Per�
Tel: 074-214324
Cel: 074-979622851
RPM: #014990
---------------------
------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20110526/48844d4b/attachment-0001.html>

Reply by email