You are not logged in.
Pages: 1
I created TWebSocketServer server and TWebSocketProtocolChat. When I connect it with JS it is fast.
But when I connect with below code it takes 5 second to upgrade.
var
ClientWS : THttpClientWebSockets;
lProto : TWebSocketProtocolEcho;
begin
lProto := TWebSocketProtocolEcho.Create('meow','');
lProto.OnIncomingFrame := EchoFrame;
ClientWS := THttpClientWebSockets.Create;
ClientWS.Open('127.0.0.1', '8383');
ClientWS.WebSocketsUpgrade('', '', false, [], lProto, '');
Offline
I accidentally changed the position of a line and the problem was solved. But why should this happen?
var
ClientWS : THttpClientWebSockets;
lProto : TWebSocketProtocolEcho;
begin
lProto := TWebSocketProtocolEcho.Create('meow','');
ClientWS := THttpClientWebSockets.Create;
ClientWS.Open('127.0.0.1', '12346');
ClientWS.WebSocketsUpgrade('', '', false, [], lProto, '');
lProto.OnIncomingFrame := EchoFrame; //this line moved here
Last edited by anouri (Today 06:12:46)
Offline
Is this bug or abnormal behaviour?
Last edited by anouri (Today 06:55:06)
Offline
Pages: 1