Discussion :

[Chriss]

Au § 3.6.6 de la FAQ (Le composant TWebBrowser), une sous-rubrique est intitulée "Comment appeler la boîte de dialogue Enregistrer sous". L'utilisation du code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

webbrowser1.ExecWB(OLECMDID_SAVEAS ,OLECMDEXECOPT_DODEFAULT);

fonctionne très bien.
J'aimerai savoir cependant comment accéder aux fonctionnalités de cet activeX de Microsoft, et en particulier comment renseigner automatiquement le champ correspondant au nom de fichier à sauvegardé et aussi comment simuler un clic sur le bouton OK, dans le but d'automatiser des enregistrements de fichiers sur disque.

Merci à toute personne suceptible de m'apporter des informations sur ce sujet.

[Pedro]

Salut
Tu peux encore plus automatiser par exemple, sans utiliser la boite de dialogue Avec TIdHTTP
Si tu fais:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
procedure SaveAs(FileName,URL:string);
var s:string;
      t:TStringList;
begin
  s:=IdHTTP1.Get(URL);
  t:=TStringList.Create;
  t.Text:=s;
  t.SaveToFile(FileName);
  t.Free;
end;

Ce code peut-être évidemment amélioré par exemple, en évitant d'utiliser un TStringList

[Chriss]

Merci pour avoir répondu si rapidement. Je connais le composant idHHTP. Cependant, il ne répond pas à mes besoins dans le cas d'une page web contenant plusieurs frames. C'est la raison pour laquelle je souhaitais mieux connaitre le fonctionnement de l'activeX TWebBrowser quand à la fonction SaveAS, qui agit comme quand on copie une page "à la main" dans IE, avec les sous-répertoires contenant toutes les ressources pour les liens.
Mon soucis est donc d'utiliser cette fonction en remplissant automatiquement le nom du fichier à sauvegarder et en simulant le clic sur OK, l'idéal étant une utilisation en mode hidden, mais cela n'est peut-être pas possible.

Merci encore.