Entwickler-Ecke :: Thema anzeigen - Testen, ob MS Word installiert ist

dirkil2 - Di 17.05.05 17:52
Titel: Testen, ob MS Word installiert ist

In meiner Applikation nutze ich die Serienbrieffunktion von Microsoft Word. In meiner App möchte ich gerne testen, ob MS Word überhaupt installiert ist.

Bislang ist mir nichts besseres eingefallen, als zu versuchen, ein Connect auf einem TWordApplication Objekt durchzuführen (siehe Code). Leider dauert das einen Moment. Wer hat eine bessere Idee?

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

function IsMSWordInstalled : Boolean;
var
  wordApp: TWordApplication;
begin
  try
    try
      wordApp := TWordApplication.Create(nil);
      wordApp.Connect;
      Result := True;
    except
      Result := False;
    end;
  finally
    wordApp.Free;
  end;
end;

Moderiert von raziel: Code- durch Delphi-Tags ersetzt.
Moderiert von Christian S.: Topic aus VCL (Visual Component Library) verschoben am Di 17.05.2005 um 22:30

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!