Excel OLE, Version 2007 erkennen

[hoika]

Hallo,

ich Dussel.
Die ganze Zeit fummel ich mit Punkt und Komma rum.

Lösung

Delphi-Quellcode:

sVersion2: String

try
        sVersion:= XLApp.Version;
        sVersion2:= sVersion;

        sVersion2:= StringReplace(sVersion2, '.', ',',
          [rfReplaceAll]);
        if TryStrToFloat(sVersion2, dVersion) then
        begin
          if dVersion>=12 then
          begin
            iMaxCols:= AGrid.ColCount;
          end;
        end;
      except
      end;

Heiko