Access Violation TXLSMMURebuildVector.WriteVector 64Bits

[etwoss]

Hi

We get Access Violation compiling 64 bits in TXLSMMURebuildVector.WriteVector
No problem in 32 bits

Code: Select all

      if n > 0 then begin
        pVect^ := XVECT_EQCOUNT_EMPTY or n;
        Inc(pVect)
      end;

Any idea what going On?

I had it on:

Code: Select all

  FSheet.AsString[FFirstColumn + 1, FCurrentRow] := ASettingValueA;

as well as on

Code: Select all

  ExcelObject.CmdFormat.BeginEdit(ExcelObject[LSheetIndex]);
  ExcelObject.CmdFormat.Font.Style :=  [];
  ExcelObject.CmdFormat.Font.Underline := xulSingle;
  ExcelObject.CmdFormat.Font.Color.RGB := RGB($FF, $00, 00);
  ExcelObject.CmdFormat.Apply(FFirstColumn + 1, FCurrentRow, FFirstColumn + 1, FCurrentRow);

On the Apply method

Eric