HTTPRio.HTTPWebNode.OnBeforePost изменен в Delphi 10.3, потерян параметр Data - PullRequest
3 голосов
/ 24 июня 2019

У меня есть компонент, который использует HTTPRio.HTTPWebNode.OnBeforePost, который ранее использовал параметр data, но в версии 10.3 Delphi этот параметр был заменен.

До Delphi 10.3:

procedure TNotaBlu.BeforePostHTTPRequest(const HTTPReqResp: THTTPReqResp; Client: THTTPClient);
var
  Certificado:  ICertificate2;
  CertContext:  ICertContext;
  PCertContext: Pointer;
begin
try
    Certificado := VCertificadoDigital.GetCertificate.DefaultInterface;
    CertContext := Certificado as ICertContext;
    CertContext.Get_CertContext(Integer(PCertContext));

    if  (not InternetSetOption(Data, INTERNET_OPTION_CLIENT_CERT_CONTEXT, PCertContext, 100)) then

В этом коде я использую internetsetoption, как мне теперь действовать в Delphi 10.3?Как получить параметр data?

...