Ganz offensichtlich sind in der
DLL eine oder mehrere CoKlassen enthalten,
die nicht auf jedem Rechner installiert sind.
Mit folgender Funktion kann man prüfen, ob so eine CoClass vorhanden ist:
Delphi-Quellcode:
function ProgIDExists(const ProgID:WideString):Boolean;
var
tmp : TGUID;
begin
Result := Succeeded(CLSIDFromProgID(PWideChar(ProgID), tmp));
end;
Anwendungsbeispiel:
Delphi-Quellcode:
if ProgIDExists('Word.Application') then
ShowMessage('WinWord ist installiert');
// die ProgID, die hier folgt habe ich erfunden
// du musst die richtige ProgID einsetzen
if not ProgIDExists('Mediaplayer.Application') then
begin
ShowMessage('Mediaplayer 10 ist NICHT installiert');
application.terminate;
Exit;
end;
[edit=SirThornberry]Delphitags korrigiert - Mfg, SirThornberry[/edit]