Commit fc68d88d by Michael Brachmann

bug

parent 5a9f2cbe
...@@ -72,7 +72,7 @@ begin ...@@ -72,7 +72,7 @@ begin
case Msg.MessageType of case Msg.MessageType of
TWebSocketMessageType.Text: TWebSocketMessageType.Text:
begin begin
MsgStr := Msg.AsText; MsgStr := TEncoding.Default.GetString(Msg.Data);
Logger.Log(1, 'Web Socket Message: ' + MsgStr); Logger.Log(1, 'Web Socket Message: ' + MsgStr);
end; end;
//TODO: HERE we need to create a map to store connections for later //TODO: HERE we need to create a map to store connections for later
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment