TWebbrowser, aperçu de la source différente du fichier html !

Version imprimable

Bonjour à toutes et à tous,

Y a t'il un utilisateur qui a constaté qu'avec l'utilisation du composant TWebBrowser, l'aperçut de la source est différent du contenu du fichier html.

Que se soit avec le Tmemo ou le TRichedit.

Exemple :

Code:

1
2
3
4
5
6
 
FSource.show;
  try
    FSource.memo1.Text := WebBrowser1.OleObject.Document.body.innerHTML;
  except end;
end;

Aperçu obtenu :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
<FORM name="Caméra arrière">
 
<SCRIPT language=JavaScript> 
 
//1920 x 1080 ou 1535 x 740
 
  document.writeln('<OBJECT CLASSID="clsid:02BF25D5-8C17-4B23-BC80-D3488ABDDC6B" width=' + 1535 + 
 
      ' height=' + 740 + ' CODEBASE="http://www.apple.com/qtactivex/qtplugin.cab">'); 
 
  document.writeln('<param name="autoplay" value="true">'); 
 
 
  document.writeln('<param name="controller" value="true">'); 
 
 //H.264 over RTSP over 554 port  
 
     document.writeln('<param name="qtsrc" value="' + 'rtsp://192.168.1.12:554/user=admin&password=&channel=1&stream=0.sdp?real_stream' + '">'); 
 
  </SCRIPT>
 
<OBJECT codeBase="http://www.apple.com/qtactivex/qtplugin.cab" classid=clsid:02BF25D5-8C17-4B23-BC80-D3488ABDDC6B width=1535 height=740>
  </body></html></OBJECT></FORM>

Contenu du fichier html :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
<html>
<head> 
<title>Viewer H264</title> 
</head>
<body> 
 <form name = "Caméra arrière">
 <script language="JavaScript"> 
 
//1920 x 1080 ou 1535 x 740
 
  document.writeln('<OBJECT CLASSID="clsid:02BF25D5-8C17-4B23-BC80-D3488ABDDC6B" width=' + 1535 + 
 
      ' height=' + 740 + ' CODEBASE="http://www.apple.com/qtactivex/qtplugin.cab">'); 
 
  document.writeln('<param name="autoplay" value="true">'); 
 
 
  document.writeln('<param name="controller" value="true">'); 
 
 //H.264 over RTSP over 554 port  
 
     document.writeln('<param name="qtsrc" value="' + 'rtsp://192.168.1.12:554/user=admin&password=&channel=1&stream=0.sdp?real_stream' + '">'); 
 
  </script>  
 
</body>
</html>

Merci d'avance.

@+,

cincap

15/05/2015, 09h49
cincap
Dans mes tests, j'ai changé la méthode, comme je charge le fichier dans un TComboBox pour le visualiser, je l'utilise pour le charger dans un Tmemo ou TRichEdit.
Code:

1 2 3 4 5 6 7 8 9 10 procedure TFViewerH264.BsourceClick(Sender: TObject); begin FSource.show; try FSource.Redit.Lines.LoadFromFile(ComboBoxURL.text); except end; end;
@+,

cincap
16/05/2015, 06h19
sgmsg

La source HTML change selon Firefox ou IE.

La source obtenu avec WebBrowser1.OleObject.Document.body.innerHTML est aussi différentes de ce que donne IE. Des Majuscules, des guillemets, etc.

De mémoire le code renvoyé par innerhtml (avant l'exécution de script dans le html) est différent de outerhtml (après l'exécution de script)...

...

Il faut donc toujours considérer la source donnée par le programme Delphi plutôt que par IE.

On peux quand même extraire les données pertinentes quelques soit la source, mais les routines d'extractions sont plus délicates à mettre en œuvre. Et bien sût plus difficile à maintenir lorsqu'il y a des modifications du côté du fournisseur de données.

Je me contente donc d'afficher uniquement le code HTML envoyer par Delphi et je le travaille jusqu'à l'extraction des données pertinentes. Les autres sources (IE et Firefox sont sommes tout inutiles et complique le programme inutilement)
16/05/2015, 10h29
cincap
Bonjour à toutes et à tous,

@ sgmsg, merci pour ton info.

Le fait de charger le fichier html directement dans IE 10, le visu de la source est complète.

Le fait de charger le fichier html qui se trouve dans le même dossier que l'application directement par un TOpenDialog et afficher son Filename dans un TcomboBox, le visu de la source est complète.
Code:

1 2 FSource.Redit.Lines.LoadFromFile(ComboBoxURL.text);
A la place de ceci :
Code:

1 2 FSource.memo1.Text := WebBrowser1.OleObject.Document.body.innerHTML;
Donc pas de code inutile et simplification de l'affichage.

@+,

cincap