Answer the question
In order to leave comments, you need to log in
How to restart TChromium?
the component starts like this, everything works
program SimpleBrowser;
///////////////////////////////////////
begin
GlobalCEFApp := TCefApplication.Create;
GlobalCEFApp.cache := 'cef\cache';
GlobalCEFApp.cookies := 'cef\cookies';
GlobalCEFApp.UserDataPath := 'cef\User Data';
}
////////////////////////////////////////////////////////
if GlobalCEFApp.StartMainProcess then
begin
Application.Initialize;
{$IFDEF DELPHI11_UP}
Application.MainFormOnTaskbar := True;
{$ENDIF}
Application.CreateForm(TForm1, Form1);
Application.Run;
end;
GlobalCEFApp.Free;
end.
procedure TForm1.Button1Click(Sender: TObject);
begin
GlobalCEFApp.Free;
GlobalCEFApp := TCefApplication.Create;
GlobalCEFApp.cache := 'cef\cache';
GlobalCEFApp.cookies := 'cef\cookies';
GlobalCEFApp.UserDataPath := 'cef\User Data';
GlobalCEFApp.StartMainProcess
end;
Answer the question
In order to leave comments, you need to log in
Didn't find what you were looking for?
Ask your questionAsk a Question
731 491 924 answers to any question