Как можно реализовать смену кэша при загрузке страницы через 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;