Use ComObj;
procedure TForm2.Button1Click(Sender: TObject);
var
ExcelApp: Variant;
begin
ExcelApp :=CreateOleObject( 'Excel.Application' );
ExcelApp.Caption:='综合统计报表';
ExcelApp.Visible:=True;end;
不知道还缺啥
procedure TForm2.Button1Click(Sender: TObject);
var
ExcelApp: Variant;
begin
ExcelApp :=CreateOleObject( 'Excel.Application' );
ExcelApp.Caption:='综合统计报表';
ExcelApp.Visible:=True;end;
不知道还缺啥
ExcelApp.Workbooks.Add(EmptyParam,0);
需要有工作薄啊