Limiter la navigation avec Twebbrowser

D'abord bonjour à tous .

J'ai intégré un navigateur dans mon application . Je voudrais savoir si il est possible de limiter la navigation à une adresse donnée ( rester sur un www.quelquechose.com en sorte )

Ou alors , est-il possible de 'monitorer' le click sur les liens dans la pages ( pour pouvoir les stopper ) ??

merci d'avance.

Code:

---

1 2 3 4 5 6 7 8 9

procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject; const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData, Headers: OleVariant; var Cancel: WordBool); begin if url<>urlpermise then begin webbrowser1.stop; webbrowser1.navigate(urlpermise) end; end

---

Ça n'empêche pas le navigateur de se brancher sur le serveur de l'url, mais permet de remettre rapidement le navigateur dans le droit chemin ;-)

A+

Désolé pour cette réponse tardive ,

Déja merci pour le bout de code , j'ai pu cerné un peu plus le cadre de ma navigation ( même si beforenavigate pop fréquement , merci les Webtracker et autre outils statistiques).

Mais ca amène une autre question : mon TwebBrower me renvois des erreurs de scriptes sur le site Web que je ne retrouve pas sur Iexplorer , n'est ce pas sensé être le même moteur d'affichage des pages ??

Citation:

---

Envoyé par haricot42

Déja merci pour le bout de code , j'ai pu cerné un peu plus le cadre de ma navigation ( même si beforenavigate pop fréquement , merci les Webtracker et autre outils statistiques).

---

Quand tu as les infos que tu veux, tu peux relancer une nouvelle navigation, pas besoin d'attendre la fin du chargement et de l'exécution flash ou des annonces java.

Citation:

---

Mais ca amène une autre question : mon TwebBrower me renvois des erreurs de scriptes sur le site Web que je ne retrouve pas sur Iexplorer , n'est ce pas sensé être le même moteur d'affichage des pages ??

---

webbrowser1.silent:=true