Can you give a Sample for CallDevToolsProtocolMethodForSession, Thank you.
Code: Select all
procedure TMainForm.WVBrowser1AfterCreated(Sender: TObject);
...
WVBrowser1.CallDevToolsProtocolMethodForSession('', 'Network.getResponseBody', '{}', 0)
procedure TMainForm.WVBrowser1CallDevToolsProtocolMethodCompleted
(Sender: TObject; aErrorCode: HRESULT; const aReturnObjectAsJson: wvstring;
aExecutionID: Integer);
...
WVBrowser1.SubscribeToDevToolsProtocolEvent('Network.responseReceived', aExecutionID + 1);