Einzelnen Beitrag anzeigen

MHaitz

Registriert seit: 11. Mär 2013
9 Beiträge
 
#1

Prüfen, ob Excel installiert ist

  Alt 22. Aug 2018, 16:04
Hallo allerseits,
ich greife von einem Delphi-Programm auf Excel zu. Um zu prüfen, ob Excel überhaupt installiert ist, verwende ich in einer try except Klausel CreateOleObject('Excel.Application'). Wenn Excel nicht installiert ist, wird ein Fehler ausgelöst und die Excel Funktionen des Programms gesperrt.

etwa folgendermassen:
FExcelIsInstalled := True;
try
try
tApp := CreateOleObject('Excel.Application');
if not VarIsNull(tApp) then begin
tApp.Visible := False;
tApp.Quit;
end else
FExcelIsInstalled := False;
except
FExcelIsInstalled := False;
end;
finally
tApp := UnAssigned;
end;

Leider scheint bereits der Aufruf CreateOleObject('Excel.Application') manchmal eine Access violation zu verursachen, wenn Excel nicht installiert ist.
Kennt jemand eine elegantere Methode, um die Installation von Excel abzufragen?
  Mit Zitat antworten Zitat