Hi
I have an application which uses the sslWSocketServer component. (based on the
example Simple SSL Server in the component package). ICS version
"OverbytesV7Gold"
I can send messages to the server successfully with 2 caveats:
Message Length
The length of the message is not being dealt with correctly in the
ClientDataAvailable procedure.
{* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *}
procedure TSimpleSslServerForm.ClientDataAvailable(Sender : TObject; Error :
Word);
begin
with Sender as TTcpSrvClient do
begin
{ We use line mode. We will receive complete lines }
RcvdLine := ReceiveStr;
{ Remove trailing CR/LF }
while (Length(RcvdLine) > 0) and
IsCharInSysCharSet(RcvdLine[Length(RcvdLine)], [#13, #10]) do
RcvdLine := Copy(RcvdLine, 1, Length(RcvdLine) - 1);
Display(GetPeerAddr + ' Message ==> ');
Display(RcvdLine);
end;
end;
When I send a sequence of messages as a null terminated string of length <500
bytes, if I do not close the socket on each occasion the above "ReceiveStr"
method tries to receive all the messages at once causing a "Line limit exceed"
error. (LineLimit is set to 32000).
I should see each message individually in the DisplayMemo without error.
Pocessing Error?
Also, even if I close the client socket on each occasion, I am always missing
information.
This can only be rectified by putting in a time wait of 500 ms between messages.
I assume these two issues are related?
Thanks for any help/suggestions.
I would like to be able to open the SSL socket only once then send x messages
ad then close the socket, not open/send/close
[Cilasoft]<http://www.cilasoft.com/?utm_source=signature&utm_medium=e-mail&utm_campaign=signature-email-gcox>
Geoff Cox
Software Engineer - g...@cilasoft.com<mailto:g...@cilasoft.com>
ZI les Iles, 190 route des Sarves - 74370 Metz Tessy - France
Tel : +33 4 50 69 45 98 - Fax : +33 4 50 69 45 99 -
www.cilasoft.com<http://www.cilasoft.com/?utm_source=signature&utm_medium=e-mail&utm_campaign=signature-email-gcox>
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be
