DCEF3 падает с CefShutDown
Если я установил переключатель CEF_MULTI_THREADED_MESSAGE_LOOP
а также CefSingleProcess := True
приложение будет зависать каждый раз CefShutDown
называется. Может кто-нибудь объяснить, почему это происходит? Он падает со сборками после 15xx.
unit test;
interface
uses
Winapi.Windows,
Winapi.Messages,
System.SysUtils,
System.Variants,
System.Classes,
Vcl.Graphics,
Vcl.Controls,
Vcl.Forms,
Vcl.Dialogs,
WACefVCL,
WACefLib;
type
TForm2 = class(TForm)
WAChromium1: TWAChromium;
procedure FormCreate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
WAChromium: TWAChromium;
implementation
{$R *.dfm}
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
WAChromium.Free;
CefShutDown; // crash on build 1650/1673/1916 works on build 1547
end;
procedure TForm2.FormCreate(Sender: TObject);
begin
CefSingleProcess := True;
CefLoadLibDefault;
//WAChromium1
WAChromium := TWAChromium.Create(nil);
//WAChromium1
WAChromium.Parent := Self;
WAChromium.Left := 0;
WAChromium.Top := 0;
WAChromium.Width := 1024;
WAChromium.Height := 768;
WAChromium.DefaultUrl := 'about:blank';
WAChromium.TabOrder := 0;
WAChromium.Load('www.google.com');
end;
end.