begin process at 2008 08 29 20:06:14
1 233 870 membres
392 nouveaux aujourd'hui
14 294 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Comment faire tourner un Webbrowser en tâche de fonds [ Réseau & Internet / Internet ] (H60)

Comment faire tourner un Webbrowser en tâche de fonds le 08/09/2007 19:39:56

H60
Bonjour à tous
Je réalise une appli qui doit se connecter régulièrement sur un site intrenet pour charger des pages HTML et y récupérer des données afin d'alimenter ma base.
Cette appli doit tourner en tâche de fonds
Actuellement j'utilise un WebBrowser afin de récupérer le code HTML pour extraire mes informations. Mon problème est le suivant.
Tout va bien tant que mon appli est visible mais quand je la rend invisible les pages ne se chargent plus.
Comment faire pour remedier  à ça?
Merci pour vos réponses

Re : Comment faire tourner un Webbrowser en tâche de fonds le 11/09/2007 13:07:09

ahmed12
Réponse acceptée !

fait jouter un coup d'oeil sur idhttp de indy est trés utile pour ça.


Re : Comment faire tourner un Webbrowser en tâche de fonds le 11/09/2007 13:52:50

H60
Merci
J'ai effectivement résolu mon probléme par Indy. mais j'auria sbien aimé savoir, pour le fin, si était possible. 

Re : Comment faire tourner un Webbrowser en tâche de fonds le 11/09/2007 16:13:01

Francky23012301
Membre Club
Salut,

En faisant quelques recherches, on peut obtenir ceci :

Un TWebBrowser, un mémo et 2 boutons :

procedure TForm1.Button1Click(Sender: TObject);
begin
WebBrowser1.navigate('www.google.fr');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
memo1.Text:=WebBrowser1.OleObject.Document.Body.InnerHTML;
memo1.Lines.SaveToFile('C:\MyFile.HTML');
end;

A toi de retranscrire ceci en créant le memo et le webbrowser de façon dynamique.

Ps : C'est une méthode simple mais crade. Pourquoi ? Car le webbrowser utilise tout simplement IE donc à proscrire. Une méthode plus difficile en terme de code (mais pas plus long) est d'utiliser le composant IdHTTP comme on te l'a dit.

@+

Re : Comment faire tourner un Webbrowser en tâche de fonds le 11/09/2007 17:38:27

H60
Merci Francky

J'avais fait le même code. Mais il ne marche que si l'appli et active et modale. J'ai donc utilisé un IndyHTTP

with TIdHTTP.Create(nil) do
  try
    Memo1.Text := Get('Google.fr');
  finally
    Free;
  end;

C'est très rapide et c'est exactement ce que je voulais.

Merci à tous pour votre participation


Classé sous : appli, tâche, webbrowser, fonds, tourner

Participer à cet échange

Pub



Appels d'offres

Recherche developpeur ...
Budget : 700€
SITE MARCHAND LOCATION...
Budget : 3 000€
SITE MARCHAND POUR HOTEL
Budget : 4 000€

CalendriCode

Août 2008
LMMJVSD
    123
45678910
11121314151617
18192021222324
25262728293031

VS Express FR Gratuit !

VS Express en français et 100% gratuit !

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS