Discussion :

[Ice-tea]

Bonjour a tous,
Est il possible d'afficher une popup dans le TWebbrowser, je m'explique : quand je click sur un lien qui pointe sur du javascript (ex href="javascript:popup('url' param) le Twebbrowser m'ouvre une page Internet Explorer, hors j'aimerais rester dans la fenetre principal.

J'ai essayer de passer l'url du popup dans le .navigate du Tweb, ca marche bien mais la page affiiché n'est pas exactement la meme que celle du popup.

Y'a t'il un moyen d'open un popup dans le TWebbrowser ??

c'est peut etre pas trés claire mais si quelqu'un pense pouvoir m'help j'réexpliquerais plus en detail

bonne prog a tous

[ShaiLeTroll]

tu peux dans onDocumentComplete, fait une modification du OleObject.Body.InnerText, avec un StringReplace tu change les lien type popup et lien simple ...

[Ice-tea]

est ce que ca reviendrais a faire un .navigate(url_popup) ?

[ShaiLeTroll]

En Gros ...

tient j'ai un truc pourri de ce genre

Code :

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

1
2
3
4
5
6
7
8
9
10
11
            HTMLStr := TWebBrowser(Sender).OleObject.Document.Body.InnerHTML;
            HTMLStr := StringReplace(HTMLStr, '<SCRIPT langage="Javascript">', '', [rfReplaceAll, rfIgnoreCase]);
            if CkbSupprimeEncombrantToutesImages.Checked then begin
               HTMLStr := StringReplace(HTMLStr, 'IMG', 'A', [rfReplaceAll, rfIgnoreCase]);
               HTMLStr := StringReplace(HTMLStr, 'src', 'href', [rfReplaceAll, rfIgnoreCase]);
            end;            
            try
               TWebBrowser(Sender).OleObject.Document.Body.InnerHTML := HTMLStr;
            except
               FichierLog('Except', 'CleanUp Doc', Exception(ExceptObject()).Message);
            end;

[Ice-tea]

jvais tester ta soluce se soir en rentran chez moi, mais jsuis pas sur quelle solutionne mon problème, le pb exactemnt n'est peut etre pas trés claire.

J'ai une url qui est afficher dans un popup qui me donne un certain resultat, d'un autre coté je navigue sur cette meme url avec le .navigate et la j'ai un autre résultat (simillaire sauf qu'il manque des infos qui sans elle, lors de la validation du formulaire, une erreur javascript et généré). En gros pour le moment si je click pas sur le lien j'ai pas la bonne page ...

J'avais lu ta premiére réponse mais pas percutter certaines choses, jpeux modifier le innerHTML comme ca ? déplacer, effacer des parties de code et le réafficher ? (pas de delphi au taff donc pas moyen de tester avt ce soir ... )

Bonne prog

[Ice-tea]

(jai poster mon avant dernier post avant d'avoir vu ta réponse)

[Ice-tea]

okayy jvoit le truc pour le replace dans le innerHTML jvasi tester ca ce soir, jsavais pas/ j'avais pas penser, qu'on pouvais modifier le innerHTML comme ca, ca m'aide enormément.

Merci good prog