[prev in list] [next in list] [prev in thread] [next in thread] 

List:       twsocket
Subject:    Re: [twsocket] DoRecv and RealSend
From:       Orson Wang <orson () aitc ! com ! tw>
Date:       2002-03-27 13:59:43
[Download RAW message or body]


Well, I found an interest thing.

This  WSocket.pas  comes with MIDWARE's latest beta but not included in latest
ICS beta.

So, this should not be a problem here.

> I have a simple socket server written in Delphi 6 using WSocketServer.
> It runs perfectly before I apply the latest beta.
> After client connected to server, If I have set Banner string at server side.
> Server  will  try  to  send  the  Banner  string to client, it will trigger an
> exception at TCustomWsocket.RealSend at the server program.
> AT Line 2657 of WSocket.pas. : Write('S', Moulin[MoulinCnt], #13);
> if I clear the server banner, when client want to send data to server, it will
> trigger an exception at TCustomWsocket.DoRecv at server program.
> Still, at line 2526 of WSocket.pas : Write('R', Moulin[MoulinCnt], #13);

> Is there any thing new I have to do first?

> BTW, I have test sample program "TcpSrv", it will cause same exception.


> I have check WSocket.pas(Feb 24, 2002 V4.38) with older one (Sep 08, 2001, V4.34)
> at new version of both function two lines were added :
> DoRecv :
>   MoulinCnt := (MoulinCnt + 1) and 3;
>   Write('R', Moulin[MoulinCnt], #13);

> RealSend :
>   MoulinCnt := (MoulinCnt + 1) and 3;
>   Write('S', Moulin[MoulinCnt], #13);


> _______________________________________________
> To unsubscribe or change your settings for TWSocket mailing list
> please goto http://www.elists.org/mailman/listinfo/twsocket
> Visit our website at http://www.overbyte.be


_______________________________________________
To unsubscribe or change your settings for TWSocket mailing list
please goto http://www.elists.org/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be
[prev in list] [next in list] [prev in thread] [next in thread]