excel - Delphi XE3 Excel 不能像 Delphi XE 那样工作

Question

我刚刚安装了 Delphi XE3。以前的版本是 XE。
我的程序生成 Excel 文件(我使用的是 Office 2013)。
我导入了 Excel 类型库。
当我使用 Delphi XE 时，此代码正在运行。
当我使用 Delphi XE3 时，我收到一条错误消息，如下所示:
'Horizo​​ntalAlignment 属性无法设置'
XE3有什么变化？

这是代码:

  VAR Myworkbook, range, excelapp : olevariant;
  Begin
   ExcelApp:=CreateOleObject('Excel.Application');
   ExcelApp.Visible:=true;
   MyWorkbook:=ExcelApp.Workbooks.Add;
   MyWorkbook.Activate;
   MyWorkbook.Activesheet.PageSetup.Orientation := xlPortrait;
   MyWorkbook.Activesheet.PageSetup.PaperSize := xlPaperA4;
   MyWorkbook.Activesheet.PageSetup.LeftMargin := CMtoPT(1);
   MyWorkbook.Activesheet.PageSetup.RightMargin := CMtoPT(1);
   MyWorkbook.Activesheet.PageSetup.TopMargin := cmtopt(1.5);
   MyWorkbook.Activesheet.PageSetup.BottomMargin := cmtopt(1.5);


  Range:=ExcelApp.Range['A1','A1'];

   Range.HorizontalAlignment := xlLeft;
   Range.VerticalAlignment := xlCenter;
 END

Answer 1

我有解决方案:

Range.VerticalAlignment := xlCenter 

应该:

Range.VerticalAlignment := integer(xlCenter)

我必须将常量显式转换为整数。这是我找到它的地方:http://forums.embarcadero.com/thread.jspa?threadID=106493