У меня есть компонент, который использует 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
?