Delphi 10.1 Berlin: SOAP Abstract Error

Question

I've migrated an ISAPI DLL SOAP from Delphi 10 Seattle to Delphi 10.1 Berlin Update 2.

After migration a runtime "Abstract Exception" is raised.

I notice that the class "TWebRequest" in "Web.HTTPApp.pas" requires

// Read count bytes from client
function ReadClient(var Buffer: TBytes; Offset: Integer; Count: Integer): Integer; overload; virtual; abstract;
function ReadClient(var Buffer; Count: Integer): Integer; overload; virtual; abstract;

But the "TISAPIRequest" in "Web.Win.IsapiHTTP" does not implement the first function.

So in "Web.Win.IsapiHTTP", I've copied 3 params ReadClient from 2 param function:

function TISAPIRequest.ReadClient(var Buffer: TBytes; Offset: Integer; Count: Integer): Integer;
begin
  Result := Count;
  if not ECB.ReadClient(ECB.ConnID, @Buffer, DWORD(Result)) then
    Result := -1;
end; 

"Abstract Error" exception disappear but "Stream read error" is raised.

Have you found a similar issue?

Is there any workaround?

Answer 1

It's another Delphi bug.

Solution can be found at this address

Simply replace 3 bugged functions with the correct ones.