hello, with TMSFNCWebBrowser I can do this process below?
procedure TForm1.webbrowserBeforeDownload(Sender: TObject; const browser: ICefBrowser;
const downloadItem: ICefDownloadItem; const suggestedName: ustring; const callback: ICefBeforeDownloadCallback);
begin
callback.Cont(ExtractFilePath(ParamStr(0)) + 'DOWNLOADEDFILES' + suggestedName, True);
end;
procedure TForm1.webbrowserDownloadUpdated(Sender: TObject; const browser: ICefBrowser;
const downloadItem: ICefDownloadItem; const callback: ICefDownloadItemCallback);
begin
StatusBar1.Panels[3].Text := downloadItem.FullPath;
if downloadItem.IsComplete then
begin
if FileExists(downloadItem.FullPath) then
begin
loadcurrentFile(downloadItem.FullPath);
PageControl1.ActivePageIndex := 1;
end;
end;
end;
basically it would be: fix a default folder for download, and identify the end of the process and open the downloaded file
there are no properties, BeforeDownload and DownloadUpdated