Discussion :

[chm0105]

salut,

J'utilise le composnant WebBrowser de Borland 6. J'aimerais créer "une fonction" (je ne sais pas si c'est une fonction dans mon cas) utilisant cet objet.

Par exemple, la fonction googe qui m'affiche la page google dans mon composant: google() -> et la page s'affiche.

Cependant, je ne peut pas utiliser l'objet WebBrowser dans ma "fonction". Avez ous une solution? Comment faut-il s'y prendre? Moi jâppel ma fonction google() simplement comme ceci

[ero-sennin]

Salut,

Pour rajouter une méthode google à l'objet en question, il faut que tu recrées un composant héritant du WebBrowser. Ainsi, tu pourras faire ceci :

Code :

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

MonWebBrowser->Google();

Sinon, tu peux tout simplement coder un procédure qui va modifier l'URL du WebBrowser, ce qui donne :


Dans le .h :

Code :

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

void __fastcall google();

Dans le .cpp :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
//Implémentation
void __fastcall TForm1::google()
{
  MonWebBrowser->Navigate("www.google.fr");
}
 
 
//Exemple d'utilisation
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  google();
}

Voilà, pour la partie programmation de la première solution, il faut que j'ai un peu plus de temps...

[Crayon]

Cependant, je ne peut pas utiliser l'objet WebBrowser dans ma "fonction".

Pourquoi?

[chm0105]

j'ai donc créé ma fonction dans un fichier annexe, en .h. Lorsque je compile, le symbole WebBrowser n'est pas accessible.

Merci ero-sennin. Je pense que je vais plutot utiliser la 2ème solution. Je veux inclure mes fonctions, ou plutot procédures dans un autre fichier, je peux le faire?

[Crayon]

j'ai donc créé ma fonction dans un fichier annexe, en .h. Lorsque je compile, le symbole WebBrowser n'est pas accessible.

Tu n'as qu'à faire un include de ta fiche principale dans ton fichier d'entête en annexe et il sera accessible.

[chm0105]

fichier d'entête, c'est le .h? Peux-tu être un peu plus clair. Je dois inclure quel fichier dans quel fichier?

[Crayon]

Oui, le h c'est pour header qui signifie en-tête.

[chm0105]

je dois donc inclure le Unit1.h dans fonctions.h en annexe?

[Crayon]

fichier d'entête, c'est le .h? Peux-tu être un peu plus clair. Je dois inclure quel fichier dans quel fichier?

Si tu me donnes le nom de tes fichiers sa va aller mieux

Ton application utilise X.h et ta fonction est déclarée dans Y.h
Dans ce cas, tu met dans Y.h (en haut)

Code :

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

#include "X.h"

[Crayon]

je dois donc inclure le Unit1.h dans fonctions.h en annexe?

Oui c'est ça. On parle avec un décalage d'un post, ne fais pas attention à ma réponse précédente.

[chm0105]

très bien. Le programme compile. Mais je ne peux pas accéder à ma fonction si je n'inclut pas fonction.h dans Unit.h (ce que je n'ai pas encor fait).

Si je le fais, j'ai la même erreur: WebBrowser.. non définit...

Je suis un peu perdu avec ses fichiers... Merci de ton aide!

[Crayon]

Juste pour être certain, est-ce que tu peux mettre ici le code de ton fichier fonction.cpp et celui de fonction.h svp (du moins la partie intéressante)

[ero-sennin]

Salut,

Si tu utilise la procédure de façon externe à la fiche, il faut rajouter en paramètre le WebBrowser et donc faire ceci :

Dans le .h

Code :

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

void __fastcall google(TCppWebBrowser MonWebBrowser);

Dans le cpp:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
//Implémentation
void __fastcall TForm1::google(TCppWebBrowser MonWebBrowser)
{
  MonWebBrowser->Navigate("www.google.fr");
}
 
 
//Exemple d'utilisation
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  google(MonWebBrowser);
}

En espérant ne pas me tromper ... vu l'heure, je ne suis plus plus très en état

[chm0105]

voila donc une partie de mes fichiers:

1) fonctions.h

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
17
18
19
20
 
...
#include "Unit1.h"
...
int users(void)
{
  // Navigue vers la page du script + paramètre users
  WideString url = urlwebadmin + urlpage + "?WebProg=users";
  Browser->Navigate(url);
  Browser->Refresh();
 
  // Récupère le Body de la page
  Variant vDocument = Browser->ControlInterface->Document;
  if(((IDispatch *)vDocument) != NULL)
  {
   Variant vBody = vDocument.OlePropertyGet("Body");
   Variant vContenuHTML = vBody.OlePropertyGet("InnerHTML");
   return vContenuHTML;
  }
}

2) Unit1.cpp

Code :

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

1
2
3
4
5
6
7
8
9
10
 
...
  #include "Unit1.h"
  #include "fonctions.h"
...
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
  lbl1->Caption = users();
}
//------------------------------------------------------------------------------

[chm0105]

merci ero-sennin, mais je pense qu'il doit y avoir une erreur ou un oubli avec un include...

[Crayon]

chm0105 dans un fichier .h on ne met pas de code, on met seulement les déclarations de fonction que l'on veux accéder à l'extérieur.

Donc dans fonction.h:

Code :

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

int users(void);

Dans fonction.cpp:

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
17
18
19
#include "fonction.h"
#include "Unit1.h"
 
int users(void)
{
  // Navigue vers la page du script + paramètre users
  WideString url = urlwebadmin + urlpage + "?WebProg=users";
  Browser->Navigate(url);
  Browser->Refresh();
 
  // Récupère le Body de la page
  Variant vDocument = Browser->ControlInterface->Document;
  if(((IDispatch *)vDocument) != NULL)
  {
   Variant vBody = vDocument.OlePropertyGet("Body");
   Variant vContenuHTML = vBody.OlePropertyGet("InnerHTML");
   return = vContenuHTML;
  }
}

[chm0105]

un grand MERCI! Je n'est malheuresement pas le temps de tester ceci ce soir, mais ça m'a beaucoup aidé !

[chm0105]

Un dernier problème:

Code :

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

[Lieur Erreur] Unresolved external 'users()' referenced from D:\UNIT1.OBJ

J'ai donc inclut les fichiers comme indiqué ci-dessus ainsi que fonction.h dans Unit1.cpp.

[ero-sennin]

Salut,

Essaie de supprimer les fichiers créés de façon temporaire et recompile le tout pour voir.

[chm0105]

non j'ai toujours la même erreur...