@BotAmi

Как поменять кэш во время работы TChromium?

Как можно реализовать смену кэша при загрузке страницы через TChromium,
Задача такая у меня 2 кнопки нажимаю на одну загружается страница с 1 кэшом, нажимаю 2 кнопку, другая с другим кэшом, в теорий можно накидать разные tchromium и разные CEFWindowParent, но это не очень, возможно это как-то реализовать в одном компоненте?
Ниже код работает, но кэш меняется только после перезагрузки программы.
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
  TempContext : ICefRequestContext;
TempCache:string;
begin
 TempCache := GlobalCEFApp.RootCache + '\root_cache\user1'
 TempContext := TCefRequestContextRef.New(TempCache, 
                      '', '', False, False, False, Chromium1.ReqContextHandler);
 Chromium1.loadURL ('https://vk.com');
 Chromium1.CreateBrowser(CEFWindowParent1, '', TempContext);
end;
procedure TForm1.Button2Click(Sender: TObject);
var
  i: Integer;
  TempContext : ICefRequestContext;
TempCache:string;
begin
 TempCache := GlobalCEFApp.RootCache + '\root_cache\user2'
 TempContext := TCefRequestContextRef.New(TempCache, 
               '', '', False, False, False, Chromium1.ReqContextHandler);
 Chromium1.loadURL ('https://vk.com');
  Chromium1.CreateBrowser(CEFWindowParent1, '', TempContext);
end;
  • Вопрос задан
  • 78 просмотров
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Похожие вопросы