delphi控制EXCEL，哪里出错？该怎么解决

delphi控制EXCEL，哪里出错？
以下是代码，请帮看下哪里出错？
procedure TForm1.FormCreate(Sender: TObject);
var
excelapp:variant;
m:integer;
begin
excelapp:=createoleobject('excel.application');
  excelapp.visible:=false;
  excelapp.DisplayAlerts:=False;
excelapp.workbooks.open('e:\11.xls');
m:=excelapp.sheet[1].usedrange.rows.count;
showmessage(inttostr(m));

end;
报错“无效的类别字符串”，应该如何解决？

[解决办法]

Delphi(Pascal) code

ExcelApp.Workbooks.Open('e:\11.xls', EmptyParam, ReadOnly, EmptyParam, EmptyParam,  EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, False);
[解决办法]
VBA里有ReadOnly，Delphi就找出对应的数字就可以了