Swagger API service problem when using HTTPS URL - XData SwaggerUI - XDataServerModule

wlandgraf · September 13, 2021, 6:00pm

Here is an example:

procedure TForm7.XDataServer1ModuleCreate(Sender: TObject; Module: TXDataServerModule);
begin
  Module.OnGetAbsoluteUrl :=
    procedure(const Schema, Authority, Path, RelativeUrl: string; var Url: string)
    begin
      Url := StringReplace(Url, 'http://', 'https://', []);
    end;
end;