如何新建一个ECCEL文件？

Question

如何新建一个ECCEL文件？

Answer 1

uses OleServer, Excel2000
  try
    ExcelApp := CreateOleobject('Excel.Application');
    WorkBook := CreateOleObject('Excel.Sheet');
    ExcelApp.Caption := '';
  except
  end;

Answer 2

var
  ExcelApplication1: TExcelApplication;
  ExcelWorksheet1: TExcelWorksheet;
  ExcelWorkbook1: TExcelWorkbook;
begin
  try
    ExcelApplication1 := TExcelApplication.Create(Application);
    ExcelWorksheet1 := TExcelWorksheet.Create(Application);
    ExcelWorkbook1 := TExcelWorkbook.Create(Application);
    ExcelApplication1.Connect;
  except
    Application.Messagebox('Excel 没有安装!', 'Hello', MB_ICONERROR + mb_Ok);
    Abort;
  end;

Answer 3

var
  ExcelApp, WorkBook: Variant;