TChromium:如何使会话保持活动状态
TChromium : How to keep session alive
使用 DCEF3 TChromium 时,如何保持会话活动?
例如,如果我访问一个网站并登录,当我关闭我的应用程序并再次打开它时,我需要再次登录。我想让会话保持活动状态,就像我使用 Google Chrome.
一样
我尝试在我的应用程序 'uses' 子句中添加 'CefLib' 并像下面的代码一样设置 'CefCache',但是尽管我可以看到文件存储在 'cookies' 文件夹中, 保持会话活动似乎没有什么区别:
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
ceflib in 'C:\app\dcef\src\ceflib.pas';
{$R *.res}
begin
CefCache := 'cookies';
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
提前致谢。
官方DCEF3论坛的一个人提供了以下解决方案,经过测试并通过!
CookieManager: ICefCookieManager;
FormCreate:
begin
CookiesPath := ExtractFilePath(Application.ExeName) + 'cookies';
CookieManager := TCefCookieManagerRef.Global(nil);
CookieManager.SetStoragePath(CookiesPath, True, nil);
end;
FormClose:
begin
CookieManager.FlushStore(nil);
end
使用 DCEF3 TChromium 时,如何保持会话活动?
例如,如果我访问一个网站并登录,当我关闭我的应用程序并再次打开它时,我需要再次登录。我想让会话保持活动状态,就像我使用 Google Chrome.
一样我尝试在我的应用程序 'uses' 子句中添加 'CefLib' 并像下面的代码一样设置 'CefCache',但是尽管我可以看到文件存储在 'cookies' 文件夹中, 保持会话活动似乎没有什么区别:
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
ceflib in 'C:\app\dcef\src\ceflib.pas';
{$R *.res}
begin
CefCache := 'cookies';
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
提前致谢。
官方DCEF3论坛的一个人提供了以下解决方案,经过测试并通过!
CookieManager: ICefCookieManager;
FormCreate:
begin
CookiesPath := ExtractFilePath(Application.ExeName) + 'cookies';
CookieManager := TCefCookieManagerRef.Global(nil);
CookieManager.SetStoragePath(CookiesPath, True, nil);
end;
FormClose:
begin
CookieManager.FlushStore(nil);
end