在BCB中到底如何调用Excel97文件?
Hank 2000-06-20 03:18:00 以下代码在DELPHI中执行没有问题,然而转换到BCB中不可执行!
procedure TForm1.Button1Click(Sender: TObject);
var MSExcel:Variant;
begin
MSExcel:=CreateOLEObject('Excel.Application');
MSExcel.WorkBooks.Add;
MSExcel.Visible:=False;
MSExcel.Cells[i,1].Value:=Edit1.Text;
MSExcel.ActiveWorkBook.SaveAs('Book.xls');
MSExcel.ActiveWorkBook.Saved:=True;
MSExcel.Quit;
end;
转换到BCB中如下:
Variant MSExcel=CreateOleObject("Excel.Application");
//MSExcel.WorkBooks.Add;
MSExcel.OlePropertySet("Visible",False);
//MSExcel.Cells[1,1].Value:=Edit1.Text;
//MSExcel.ActiveWorkBook.SaveAs("Book.xls");
//MSExcel.OlePropertySet("ActiveWorkBook.Saved",True);
MSExcel.OleFunction("Quit");
但是只有未加注释的三行可以执行!
请问在BCB中到底用那些函数调用Excel97的文件?
注意:一定要用CreateOleObject(),我可不想用5.0中的那些现成的控件--太乱了!