Cherche à ajouter un TCppWebBrowser pendant l'execution d'un programme

Bonjour à tous,

Je voudrais ajouter sur ma fiche des composants TCppWebBrowser au fur et à mesure de l'exécution de mon programme, mais je n'ai pas trouvé la bonne syntaxe.
J'ai essayé avec des lignes comme :

Code:

---

1 2 3

TCppWebBrowser *CppWebBrowser1; CppWebBrowser1 = new TCppWebBrowser(Form1); CppWebBrowser1->Show();

---

Mais ça ne m'affiche rien du tout.

Est-ce que quelqu'un aurait une idée ?

Merci d'avance

Salut,
Le truc important dans la création de composant c'est la désignation du parent. Si ton composant n'en a pas, il ne s'affichera pas.

Code:

---

1 2 3 4

TCppWebBrowser *CppWebBrowser1; CppWebBrowser1 = new TCppWebBrowser(Form1); CppWebBrowser1->Parent = this;

---

Comme ca, tu lies ton composant à ton application.
Avec ça, ça devrait marcher je pense.

C'est un composant très particulier, cette syntaxe ne marche pas, on a l'erreur suivante :

[C++ Erreur] Unit1.cpp(28): E2034 Impossible de convertir 'TForm1 * const' en '_di_IDispatch'

Ça marche très bien en déposant le composant sur la forme mais je ne sais pas ce qu'il faut faire pour que ça marche en création dynamique.

À bientôt
Gilles

Effectivement ça me donne l'erreur là ! :cry:

Bon ça marche avec un TEdit mais pas avec un TCppWebBrowser, est-ce que quelqu'un saurait pourquoi ?

Code:

---

1 2 3 4

TCppWebBrowser *CppWebBrowser1; CppWebBrowser1 = new TCppWebBrowser(Form1); CppWebBrowser1->ParentWindow = Handle;

---

:lahola:

Merci beaucoup ! Ca marche nickel !

Bonne journée à vous tous

Bravo CGi, ce serait peut-être à rajouter dans la FAQ (si ce n'est déjà fait), ça me paraît être une information précieuse.

Pour ceux qui veulent savoir l'heure, mettez un bouton sur la forme et sur son événement OnClick, écrivez ceci :

Code:

---

1 2 3 4 5 6 7

TCppWebBrowser* CppWB; WideString WEB="http://www.horlogeparlante.com/"; CppWB = new TCppWebBrowser(Form1); CppWB->ParentWindow = Handle; CppWB->Navigate(WEB);

---

À bientôt
Gilles

Salut à tous!
la technique du Handle marche nickel si on met le TCppWebBrowser sur un TForm mais si on le met comment on le met sur un TPanel???

Par exemple,
dans mon code, je supprime et recrée plusieurs composents pour vider la mémoire vive qu'ils occupent (je connais pas d'autre technique...):

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

//Delete WebBrowser delete WebBrowser; WebBrowser = new TCppWebBrowser(this); WebBrowser->ParentWindow = WebBrowserPanel; //ne fonctionne pas   //Delete Memos delete PreFilterMemo; PreFilterMemo = new TMemo(this); PreFilterMemo->Parent = FilterForm;   delete PostFilterMemo; PostFilterMemo = new TMemo(this); PostFilterMemo->Parent = FilterForm;   ...

---

Une idée?

Tu peux essayer le code suivant :

//Delete WebBrowser
delete WebBrowser;
WebBrowser = new TCppWebBrowser(this);
WebBrowser->ParentWindow = WebBrowserPanel->Handle;

Après qq tests et pour que ça marche mieux il faut faire :

WebBrowser = new TCppWebBrowser( MyPanel ) ;
WebBrowser->TOleControl :: Parent = MyPanel ;
WebBrowser->Align = alClient ;

Salut bobtheque,

Puisque tu as l'air à fond dans le composant TCppWebBrowser, connais-tu une méthode pour supprimer les barres de défilement du document?
J'ai essayé le code suivant dans les FAQ, qui ne marche pas :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Variant vDocument = Browser->ControlInterface->Document; if (((IDispatch *)vDocument) != NULL) { Variant vBody = vDocument.OlePropertyGet("Body"); Variant vStyle = vBody.OlePropertyGet("Style");   // Pour cacher les barres de défilement vStyle.OlePropertySet("OverflowX","hidden"); vStyle.OlePropertySet("OverflowY","hidden"); }

---

Salut engrobel
Le code de la FAQ fonctionne parfaitement chez moi sur le composant WebBrowser pose directement sur la Form, dans ton cas ton composant est, si j'ai bien compris sur un TPanel et cree dynamiquement, je pense que tu a un probleme de Handle

bonjour, j'utilise le code donné sur le forum pour cacher les barres de défilement sur mon webbroser.
sur certaines pages, elles s'effacent (je traite le le message WebBrowser1DocumentComplete ) sur d'autres non .
quelqu'un sait-il pourquoi et connait-il une solution?
merci