5,402
社区成员
发帖
与我相关
我的任务
分享
procedure RegisterSchemes(const registrar: ICefSchemeRegistrar);
begin
registrar.AddCustomScheme('local', True, True, False);
end;
begin
CefCache := 'cache';
CefOnRegisterCustomSchemes := RegisterSchemes;
CefSingleProcess := False;
if not CefLoadLibDefault then
Exit;
CefRegisterSchemeHandlerFactory('local', '', TFileScheme);
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
注意:是“Application.Initialize;”这句之前的部分