TCEFHtmlSnapshot - Exemples

uses Qubes, System.Info, CEFHtmlSnapshot;

function ConvertAuthentifiedToPdf(const url : String) : String;
begin
   var cef := TCEFHtmlSnapshot.Create;
   cef.CEFHtmlSnapshotPath := ExtractFilePath(ApplicationInfo.ExeName)+'..\cefHtmlSnapshot\cefHtmlSnapshot.exe';
   cef.Cookies := ['QuBESSession=' + QubesExpressCurrentSessionCookie];
   cef.PDFBackgrounds := True;
   Result := cef.SnapshotPDF(url);
end;

// Conversion d'une page web en PDF et enregistrement dans un fichier.
// NB : si la page web est soumise à authentification, pour qu'elle soit correctement convertie,
// ce script devra être exécuté côté serveur et utilisera le cookie de session de l'utilisateur courant.
SaveStringToFile('C:\Temp\conv.pdf', ConvertAuthentifiedToPdf('http://ServeurQubes/about.dws'));