pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-06-12 22:07:39 +02:00
Code Issues Actions Releases Activity

Added error message boxes in CheckCEFLibrary

Browse Source
This commit is contained in:
Salvador Diaz Fau
2017-03-29 10:55:39 +02:00
parent ca6a214a3d
commit 9fa109af16
1 changed files with 8 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
source/uCEFApplication.pas
View File

@ -483,10 +483,16 @@ begin
CEF_SUPPORTED_VERSION_BUILD) then CEF_SUPPORTED_VERSION_BUILD) then
Result := True Result := True
else else
begin
OutputDebugMessage('TCefApplication.CheckCEFLibrary error: Unsupported CEF version !'); OutputDebugMessage('TCefApplication.CheckCEFLibrary error: Unsupported CEF version !');
MessageBox(0, PWideChar('Unsupported CEF version !'), PWideChar('CEF4Delphi error'), MB_ICONERROR or MB_OK or MB_TOPMOST);
end;
end end
else else
begin
OutputDebugMessage('TCefApplication.CheckCEFLibrary error: CEF binaries missing !'); OutputDebugMessage('TCefApplication.CheckCEFLibrary error: CEF binaries missing !');
MessageBox(0, PWideChar('CEF binaries missing !'), PWideChar('CEF4Delphi error'), MB_ICONERROR or MB_OK or MB_TOPMOST);
end;
end; end;
function TCefApplication.StartMainProcess : boolean; function TCefApplication.StartMainProcess : boolean;