pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-12-13 21:45:55 +02:00
Code Issues Actions Releases Activity

New function OutputDebugMessage in TCEFApplication to log messages replacing OutputDebugString

Browse Source
This commit is contained in:
Salvador Diaz Fau
2017-02-12 19:53:06 +01:00
parent c954cdf86c
commit 1ce14d8796
12 changed files with 347 additions and 392 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
source/uCEFRequestHandler.pas
View File

@@ -108,7 +108,8 @@ uses
Windows, SysUtils,
{$ENDIF}
uCEFMiscFunctions, uCEFLibFunctions, uCEFBrowser, uCEFFrame, uCEFRequest, uCEFRequestCallback,
uCEFResponse, uCEFAuthCallback, uCEFSslInfo, uCEFSelectClientCertificateCallback, uCEFX509Certificate;
uCEFResponse, uCEFAuthCallback, uCEFSslInfo, uCEFSelectClientCertificateCallback, uCEFX509Certificate,
uCEFApplication;
function cef_request_handler_on_before_browse(self: PCefRequestHandler; browser: PCefBrowser;
frame: PCefFrame; request: PCefRequest; isRedirect: Integer): Integer; stdcall;
@@ -296,11 +297,8 @@ begin
end;
except
on e : exception do
begin
{$IFDEF DEBUG}
OutputDebugString(PWideChar('cef_request_handler_on_select_client_certificate error: ' + e.Message + chr(0)));
{$ENDIF}
end;
if (GlobalCEFApp <> nil) then
GlobalCEFApp.OutputDebugMessage('cef_request_handler_on_select_client_certificate error: ' + e.Message);
end;
finally
if (TempCertArray <> nil) then