TWebBrowser - Hook receive event

Question

J'essaie de soumettre automatiquement un formulaire et de sauvegarder l'image résultante qui s'affiche dans l'objet TWebBrowser.

L'image se charge sur plusieurs enchaînées javascript ajax demandes(), jusqu'à ce qu'il apparaisse enfin dans le document.

Quel est le meilleur moyen d'obtenir cette image? Je pensais à accrochant la fonction de réception pour pouvoir voir la réponse http (qui serait fondamentalement mon image).

Une autre possibilité pourrait être de charge l'image du cache/mémoire ...

Je n'ai aucune idée comment faire pratiquement, j'espère que quelqu'un peut vous aider.

Merci.

Answer 1

Vous pouvez récupérer toutes les images d'URL à l'aide de la propriété images à partir de l'objet IHTMLDocument2.

voir cet exemple en utilisant l'événement OnDocumentComplete.

procedure TForm2.WebBrowser1DocumentComplete(ASender: TObject; const pDisp: IDispatch; var URL: OleVariant); 
var 
HTMLDocument2: IHTMLDocument2; 
i   : Integer; 
Item   : IHTMLElement; 
ImageUrl  : string; 
begin 
    HTMLDocument2 := (WebBrowser1.Document AS IHTMLDocument2); 
    for i := 0 to HTMLDocument2.images.length -1 do 
    begin 
    Item := HTMLDocument2.images.item(i, null) As IHTMLElement; 
    ImageUrl:=item.getAttribute('src',0); 
    //do your stuff with the url image retrieved 
    end; 
end; 

Answer 2

Vous pouvez utiliser les OnDocumentComplete ou OnNavigateComplete2 événements (voir l'aide SHDocVw) ou attendre la WebBrowser d'être dans un ReadyState READYSTATE_COMPLETE puis lu à partir du WebBrowser.Document.

Mais vous pouvez également (plus simple IMO) utiliser un TIdHTTP.Get pour obtenir directement le flux de réponse.

Answer 3

Pour être plus évolutif avec votre application, vous pouvez directement essayer EmbeddedWB. Il enveloppe IWebBrowser2 et très pratique à utiliser. Embarcadero utilise EmbeddedWB dans leur RADStudio.