Bonjour,

je suis actuellement en train de faire des recherches sur les websocket, car j'ai besoin de réaliser une application serveur en delphi communicant avec un client léger en html5.

lors de test sous Delphi2010, j'ai tenter un petit server avec un TwSocketServer (ICS), mais je n'arrive pas a comprendre le fonctionnement.

mon client fait ouvre une connexion:

var socket = new WebSocket("ws://127.0.0.1:81/");
mais le statuts de ma socket ne passe jamais a open

socket.onopen = function(){
//traitement...
}
socket.onmessage = function(msg){
//traitement...
}

du coté serveur, je fait juste un MyWSocketServer.Listen;

Je capte bien les évènements onclientconnect et onclientdisconnect.

et je récupère le message de handshake, puis j’édite la réponse que j'envoi:

s := 'HTTP/1.1 101 Switching Protocols' + #13#10
+ 'Upgrade: WebSocket' + #13#10
+ 'Connection: Upgrade' + #13#10
+ 'Access-Control-Allow-Origin: ' + ConnectionClient.FOrigin + #13#10
+ 'Access-Control-Allow-Credentials: true' + #13#10
+ 'Sec-WebSocket-Accept: '+ ConnectionClient.FKeyHandShakeRep + #13#10
+ 'Sec-WebSocket-Protocol: test' + #13#10 ;

ConnectionClient.SendStr(s);
Mais le client ne semble rien recevoir, et l'etat de la connexion reste a 0

Merci