Serveur WebSocket Delphi
TsgcWebSocketHTTPServer — un composant serveur WebSocket et HTTP multithread avec prise en charge IOCP/EPOLL, SSL/TLS, authentification et service de fichiers statiques.
TsgcWebSocketHTTPServer — un composant serveur WebSocket et HTTP multithread avec prise en charge IOCP/EPOLL, SSL/TLS, authentification et service de fichiers statiques.
Serveur HTTP + WebSocket — sert les poignées de main wss://, diffuse des messages et embarque TLS, authentification, enregistrement auprès d'un équilibreur de charge et HTTP/2.
TsgcWebSocketHTTPServer
WebSocket — RFC 6455
Windows, macOS, Linux, iOS, Android
Professional / Enterprise
Dépose un TsgcWebSocketHTTPServer, définis Port et SSL, branche OnMessage et le serveur est en ligne.
uses
sgcWebSocket, sgcWebSocket_Server, sgcWebSocket_Classes;
var
WSServer: TsgcWebSocketHTTPServer;
begin
WSServer := TsgcWebSocketHTTPServer.Create(nil);
WSServer.Port := 80;
WSServer.OnConnect := WSServerConnect;
WSServer.OnMessage := WSServerMessage;
WSServer.OnDisconnect := WSServerDisconnect;
WSServer.OnError := WSServerError;
WSServer.OnAuthentication := WSServerAuthentication;
WSServer.Active := True;
end;
procedure TForm1.WSServerMessage(Connection: TsgcWSConnection;
const Text: string);
begin
// Broadcast to every connected client
WSServer.WriteData(Text);
end;
procedure TForm1.WSServerAuthentication(Connection: TsgcWSConnection;
aUser, aPassword: string; var Authenticated: Boolean);
begin
Authenticated := (aUser = 'admin') and (aPassword = 's3cret');
end;
// uses: sgcWebSocket, sgcWebSocket_Server
TsgcWebSocketHTTPServer *WSServer = new TsgcWebSocketHTTPServer(this);
WSServer->Port = 80;
WSServer->OnConnect = WSServerConnect;
WSServer->OnMessage = WSServerMessage;
WSServer->OnDisconnect = WSServerDisconnect;
WSServer->OnError = WSServerError;
WSServer->OnAuthentication = WSServerAuthentication;
WSServer->Active = true;
void __fastcall TForm1::WSServerMessage(TsgcWSConnection *Connection,
const UnicodeString Text)
{
WSServer->WriteData(Text);
}
using esegece.sgcWebSockets;
var server = new TsgcWebSocketHTTPServer();
server.Port = 80;
server.OnConnect += (conn) => Console.WriteLine("#connected: " + conn.IP);
server.OnMessage += (conn, text) => server.WriteData(text); // broadcast
server.OnDisconnect += (conn, code) => Console.WriteLine("#disconnected: " + code);
server.OnAuthentication += (conn, user, pass, ref ok) => { ok = (user == "admin" && pass == "s3cret"); };
server.Active = true;
27 propriétés publiées, 7 méthodes, 22 événements — issus de la référence du composant.
Propriétés publiées : Active, Port, Bindings.
Méthodes : Broadcast, WriteData, Ping.
Propriétés publiées : HeartBeat, WatchDog, LoadBalancer.
Propriétés publiées : Authentication, SSL, SSLOptions.
Événements : OnStartup, OnShutdown, OnTCPConnect.
Événements : OnMessage, OnBinary, OnFragmented.
Lien direct vers la référence du composant, récupère le projet de démo prêt à l'emploi et télécharge l'essai.
| Aide en ligne — TsgcWebSocketServer Référence complète des propriétés, méthodes et événements de ce composant. | Ouvrir | |
| Projet de démo — 01.WebSocket\02.Server Projet d'exemple prêt à l'emploi. Livré avec le paquet sgcWebSockets — télécharge l'essai ci-dessous. | Ouvrir | |
| Document technique (PDF) Fonctionnalités, démarrage rapide, exemples de code pour Delphi, C++ Builder et .NET, et références de sources primaires — ce composant uniquement. | Ouvrir | |
| Manuel utilisateur (PDF) Manuel complet couvrant chaque composant de la bibliothèque. | Ouvrir |