Anonymous User
  Sunday, 09 February 2025
  1 Replies
  65 Visits
  Subscribe
I'm using TsgcWSServer_HTTPAPI_WebBrokerBridge to implment a webserver using Web Sockets.

Headers are not making it to my WebMobule, and I've worked out why.

The routine:

function TsgcWebRequestHTTPAPI.GetHeaderValue(const aName: String): String;
var
oHeaders: TStringList;
begin
Result := '';

oHeaders := TStringList.Create;
Try
oHeaders.Text := String(FRequest.Headers);
if oHeaders.IndexOf(aName) > -1 then
Result := oHeaders.Values[aName];
Finally
sgcFree(oHeaders);
End;
end;

Looks for the header name expecting headers to be Name=Value, when in fact - they are Name: Value.

I've been using this setup for a while, but now I need to send a header through.

Is that a bug? Or am I doing something wrong.

Christopher Burke
Programmer at Finchcorp Systems