TWasmWebsocket

type TWasmWebsocket = class(TComponent)

protected

  procedure CheckWebsocketRes();

  procedure DoOpen(); virtual;

  procedure DoClose(); virtual;

  procedure HandleError; virtual;

  procedure HandleOpen; virtual;

  procedure HandleMessage(); virtual;

  procedure HandleClose(); virtual;

  procedure ReleaseAllData;

  procedure KeepData();

public

  constructor create(); override;

  destructor Destroy; override;

  procedure Open();

  procedure Close();

  procedure SendMessage();

  function ReleaseData();

  property WebSocketID: TWasmWebsocketID; [r]

  property OnError: TWasmWebsocketErrorEvent; [rw]

  property OnMessage: TWasmWebsocketMessageEvent; [rw]

  property OnClose: TWasmWebsocketCloseEvent; [rw]

  property OnOpen: TWasmWebsocketOpenEvent; [rw]

  property URL: string; [r]

  property Protocols: string; [r]

  property KeepDataAlive: Boolean; [rw]

end;

TWasmWebsocket

TObject