Excel OLE, Version 2007 erkennen

[deadcantdance]

Probier mal

Delphi-Quellcode:

function GetVersion : integer;
var
  Version : string;
  MSExcel : Variant;
begin
  MSExcel := CreateOleObject('Excel.application');
  Version := MSExcel.Version;
  SetLength(Version, 2);
  result := StrToInt(trimchar(Version,'.'));
end;

So klappts bei mir. Liefert nur die Hauptversionsnummer, aber das reicht doch für die Versionsfeststellung.