为什么我CreateOleObject('Excel.Application')总报错!!!(50分)

  • 主题发起人 主题发起人 NoRose
  • 开始时间 开始时间
N

NoRose

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TFormsls3.FlatButton1Click(Sender: TObject);
var ExcelApp,MyWorkBook: OLEVariant;
begin
try
ExcelApp:=CreateOleObject('Excel.Application');这句错。
ExcelApp.Visible := True;
MyWorkBook:=CreateOleobject('Excel.Sheet');
except
application.Messagebox('无法打开Xls文件,请确认已 经安装EXCEL.','', mb_OK+mb_IconStop);
Exit;
end;
if OpenDialog1.Execute then

//excelApp.Visible := true;
MyworkBook:= ExcelApp.workBooks.Open(opendialog1.FileName);
报UNDECLARED IDENTIFIER ‘CREATEOLEOBJECT’
帮帮我吧,试了一下午了,用DELPHI自带的OLE源码也是有错。
 
在uses离加ComObj试一下。
 
谢谢TDS_LXM,你的方法可以。能告我为什么吗!!!
我是新手,才学。
 
哦!忘了说了,已经放分了
 
后退
顶部