打开APP
userphoto
未登录

开通VIP,畅享免费电子书等14项超值服

开通VIP
CEF4Delphi 常用设置 CefSettings设置
userphoto

2023.05.06 湖南

关注

CEF4Delphi 是由 SalvadorDíazFau 创建的一个开源项目,用于在基于Delphi的应用程序中嵌入基于Chromium的浏览器。

CEF4Delphi 基于Henri Gourvest 的 DCEF3。DCEF3的原始许可证仍适用于CEF4Delphi。阅读任何* .pas文件的第一行中的许可条款。

CEF4Delphi 使用CEF 3.3325.1756.g6d8faa4,其中包 Chromium 65.0.3325.181。CEF4Delphi使用的CEF3二进制文件可以在spotify下载:

32bit -> http://opensource.spotify.com/cefbuilds/cef_binary_3.3325.1756.g6d8faa4_windows32.tar.bz2

64bit -> http://opensource.spotify.com/cefbuilds/cef_binary_3.3325.1756.g6d8faa4_windows64.tar.bz2

CEF4Delphi是在Delphi 10.2 Tokyo上开发和测试的,已经在Delphi 7,Delphi XE和Delphi 10中测试过了。

有关CEF4Delphi的更多信息,请访问: https://www.briskbard.com/index.php?lang=en&pageid=cef

论坛:https://www.briskbard.com/forum

最新的组件支持 Windows 7, 8, 8.1, 10 或者更新版本.。如果需要在 Windows XP 和 Vista 中使用,请使用老版本: OldCEF4Delphi : https://github.com/salvadordf/OldCEF4Delphi

 下面的代码是一些常用的设置, 包括将DLL文件放到一个单独的目录下面,以及让 cef 使用内置的 flash:

function CefLibPath: string;begin{$IFDEF CPUX64}
  Result := 'CEF_3.3239.1709\Core64';{$ELSE}
  Result := 'CEF_3.3239.1709\Core';{$ENDIF}end;function PpapiFlashFileName: string;begin{$IFDEF CPUX64}
  Result := CefLibPath + '\plugins\pepflashplayer64.dll'{$ELSE}
  Result := CefLibPath + '\plugins\pepflashplayer32.dll'{$ENDIF}end;begin
  GlobalCEFApp := TCefApplication.Create;  // In case you want to use custom directories for the CEF3 binaries, cache, cookies and user data.
  // If you don't set a cache directory the browser will use in-memory cache.
  GlobalCEFApp.FrameworkDirPath := CefLibPath;
  GlobalCEFApp.ResourcesDirPath := CefLibPath;
  GlobalCEFApp.LocalesDirPath   := CefLibPath + '\locales';
  GlobalCEFApp.Cache            := CefLibPath + '\cache';
  GlobalCEFApp.Cookies          := CefLibPath + '\cookies';
  GlobalCEFApp.UserDataPath     := CefLibPath + '\User Data';
  GlobalCEFApp.AcceptLanguageList:= 'zh-CN';
  GlobalCEFApp.LocalesRequired := 'zh-CN';  GlobalCEFApp.Locale          := 'zh-CN';
  GlobalCEFApp.FlashEnabled    := False;
  GlobalCEFApp.EnableGPU       := True; // Enable hardware acceleration
  GlobalCEFApp.DisableGPUCache := True; // Disable the creation of a 'GPUCache' directory in the hard drive.
  GlobalCEFApp.AddCustomCommandLine('--ppapi-flash-path', PpapiFlashFileName);  // You *MUST* call GlobalCEFApp.StartMainProcess in a if..then clause
  // with the Application initialization inside the begin..end.
  // Read this https://www.briskbard.com/index.php?lang=en&pageid=cef

  if GlobalCEFApp.StartMainProcess then
  begin
    Application.Initialize;{$IFDEF DELPHI11_UP}
    Application.MainFormOnTaskbar := True;{$ENDIF}
    Application.CreateForm(TForm1, Form1);
    Application.Run;  end;

  GlobalCEFApp.Free;end.

本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报
打开APP,阅读全文并永久保存 查看更多类似文章
猜你喜欢
类似文章
VCL Fix Pack 1.4
delphi 获得外部程序焦点
Delphi显示确认框
Delphi中Create(nil),Create(self),Create(Application)区别
delphi中登录界面关闭直接现实主界面是怎么回事?
CherryPy Basics
更多类似文章 >>
生活服务
热点新闻
分享 收藏 导长图 关注 下载文章
绑定账号成功
后续可登录账号畅享VIP特权!
如果VIP功能使用有故障,
可点击这里联系客服!

联系客服