Da hat doch wirklich der richtige geantwortet. Prima und danke!
Habe es jetzt erstmal nur zum Testen so gelöst, falls noch jemand an einer Lösung interessiert ist:
Delphi-Quellcode:
if not(xmlhelp.IsMSXML6Installed)
then
MessageDlg('
Auf Ihrem System ist leider kein MSXML 6 installiert.',mtError,[mbOK],0)
else
MessageDlg('
Auf Ihrem System ist MSXML 6 installiert.',mtInformation,[mbOK],0);
Und in den Uses XMLHelp nicht vergessen.
Schlecht wäre aber eine Funktion mit Rückgabe der Version nicht...