COM-Schnittstelle

Ab Version 1.7 ist der HTMLViewer in allen Versionen mit einer COM-Schnittstelle ausgestattet. Sobald Sie das Programm starten, wird die EXE-Datei automatisch als ActiveX-Server registriert (als HTMLviewer remote) und Sie können das Programm von Programmiersprachen (z.B. Visual Basic) heraus ansprechen.

Methoden

Name	Beschreibung
Show	Zeigt die Anwendung an, falls sie zuvor über Hide unsichtbar gemacht wurde.
Hide	Macht die Anwendung unischtbar.
Close	Schliesst die Anwendung. Sie sollten im Normalfall, aber einfach das verwendete COM-Objekt zurücksetzten, um die Anwendung zu schliessen.
OpenFile(Filename)	Öffnet das über Filename angegebene HTML-Dokument.
OpenFileInTarget(Filename, Target)	Öffnet das Filename angegebene HTML-Dokument und zeigt im über Target angegebenen Frame an. Falls der Framename nicht gefunden wird, wird ein neues Fenster geöffnet.
HideToolbar(Show)	Blendet die Toolbar ein oder aus (Show = 0 = aus, alles andere zeigt die Toolbar).
Clear	Schliesst das aktuelle HTML-Dokument.
ExpandHTMLFilename	Die Funktion dient zum Ermitteln des vollständigen DOS-Pades, wenn eine URL nur den Dateinamen oder eine relative Pfadangabe enthält.

Eigenschaften

Name	Beschreibung
DocumentTitle	Liefert den Titel eines Dokuments, sofern dieses über <title> angegeben wurde.
CurrentFile	Liefert den Dateinamen des zuletzt über OpenFile geladene Dokument.
Target	Liefert den Namen des zuletzt angeklickten Frames (sofern dieser auch in der Framedefinition einen Namen zugewiesen bekam).
URL	Liefert die URL des zuletzt angeklickten Hyperlinks, so wie er im HTML-Dokument angegeben war. Sie können die Funktion ExpandHTMLFilename() verwenden, um den vollständigen Dateinamen zuerhalten.
BaseTarget	Liefert das Basisverzeichnis eines Dokuments, sofern dieses über <base> angegeben wurde.

VB-Beispiel

Legen Sie zunächst ein neues Projekt an und wählen in Projekt/Verweise 'HTMLviewer remote' und aktivieren die zugehörige Checkbox.
Sobald Sie den Verweis hergestellt haben, steht Ihnen die Bibliothek HTMLViewer mit den Objekt HTMLremote zur Verfügung. Sie können sich den derzeitigen Implementierungsstand anzeigen lassen, wenn Sie F2 (Objektkatalog) drücken und bei Projekt/Bibliothek 'HTMLViewer' wählen.

Beispiel-Code:

Option Explicit

Dim html As HTMLViewer.remoteHTML

Private Sub Form_Load()
  Set html = New HTMLViewer.remoteHTML
End Sub

Private Sub Form_Unload(Cancel As Integer)
  Set html = Nothing
End Sub

Private Sub Command1_Click() ' Laden
  If Not html Is Nothing Then
    html.OpenFile "C:\Test.html"
    html.HideToolbar 0 ' Toolbar verbergen
  End If
End Sub

Private Sub Command2_Click() ' Info
  MsgBox "Base target: " & html.BaseTarget & vbCrLf & _
         "Current file: " & html.CurrentFile & vbCrLf & _
         "Document title: " & html.DocumentTitle & vbCrLf & _
         "Target: " & html.Target & vbCrLf & _
         "URL: " & html.URL
End Sub