Discussion :

[Ptite Développeuse]

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 :

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

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

[bandit boy]

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 :

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

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.

[Gilles Louïse]

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

[Ptite Développeuse]

Effectivement ça me donne l'erreur là !

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

[CGi]

Code :

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

1
2
3
4
 
   TCppWebBrowser *CppWebBrowser1;
   CppWebBrowser1 = new TCppWebBrowser(Form1);
   CppWebBrowser1->ParentWindow = Handle;

[Ptite Développeuse]

Merci beaucoup ! Ca marche nickel !

Bonne journée à vous tous

[Gilles Louïse]

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 :

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

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

[Enano1985]

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 :

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

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?

[bobtheque]

Tu peux essayer le code suivant :

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

[bobtheque]

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

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

[engrobel]

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 :

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

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");
}

[blondelle]

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

[micflor]

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