Bien qu'invisible dans les suggestions de Delphi, la fonction OleObject de l'automation OLE permet d'accéder à des informations très très intéressantes que seules les interfaces peuvent nous fournir.
Voici un code source complet qui vous permettra (à partir d'une page ouverte dans un TWebBrowser) de récupérer dans Delphi les 46 informations suivantes :
Titre de la page
Langue
Index de source
Record Number
Lang
offset gauche
offset supérieur
offset de largeur
offset de hauteur
offset parent
inner HTML
inner TEXT
outer HTML
outer TEXT
Liens de la page
Référent HTML
Page actuelle
Nombre d'images dans la page
ID
Nombre de scripts
Type de la sélection
Nombre de plugins
alinkColor
bgColor
fgColor
linkColor
vlinkColor
Date de dernière modification
Domaine
Cookie
expando
Charset
Charset par défaut
Type de MIME
Taille du fichier
Date de création
Date de modification
Date de mise à jour
Sécurité
Protocole
Propriétaire
Images
Nombre d'applets
Applets
Nombre de frames
Frames