delphi控制EXCEL，哪里出错？

Question

以下是代码，请帮看下哪里出错？
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;
报错“无效的类别字符串”，应该如何解决？

Answer 1

ExcelApp.Workbooks.Open('e:\11.xls', EmptyParam, ReadOnly, EmptyParam, EmptyParam,  EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, False);

Answer 2

还少什么东东吗？
[Error] Unit1.pas(43): Undeclared identifier: 'ReadOnly'

Answer 3

VBA里有ReadOnly，Delphi就找出对应的数字就可以了