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

Update to CEF 3.3497.1827.ga4f7e36

Browse Source 
- Added option to load PDF files in the MiniBrowser demo.
- Now the ResponseFilterBrowser replaces the logo with an external PNG file.
This commit is contained in:
Salvador Díaz Fau
2018-09-07 11:53:31 +02:00
parent e5bb0cd561
commit 7e270aa8ca
9 changed files with 59 additions and 15416 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
demos/MiniBrowser/uMiniBrowser.pas
View File

@ -892,7 +892,7 @@ begin
try
try
OpenDialog1.Filter := 'HTML files (*.html)|*.HTML;*.HTM';
OpenDialog1.Filter := 'HTML files (*.html)|*.HTML;*.HTM|PDF files (*.pdf)|*.PDF';
if OpenDialog1.Execute then
begin
@ -900,7 +900,11 @@ begin
TempFile := TMemoryStream.Create;
TempFile.LoadFromFile(OpenDialog1.FileName);
TempDATA := 'data:text/html;charset=utf-8;base64,' + CefBase64Encode(TempFile.Memory, TempFile.Size);
if (OpenDialog1.FilterIndex = 0) then
TempDATA := 'data:text/html;charset=utf-8;base64,' + CefBase64Encode(TempFile.Memory, TempFile.Size)
else
TempDATA := 'data:application/pdf;charset=utf-8;base64,' + CefBase64Encode(TempFile.Memory, TempFile.Size);
Chromium1.LoadURL(TempDATA);
end;
except