delphi 7 +excel 问题求助(20分)

procedure TForm1.Button1Click(Sender: TObject);
var
eclapp:variant;
xlsFileName:string;
begin
xlsFileName:='c:/ex.xls';

eclApp:=CreateOleObject('Excel.Application');
eclApp.WorkBooks.Open(xlsfilename );
eclApp.WorkSheets[1].Activate;
edit1.text:=eclapp.cells(3,1).value;
//edit1.text:=eclapp.cells(3,1);
eclApp.WorkBooks.Close;
eclApp.Quit;
end;
错误提示：找不到成员

edit1.text:=eclapp.cells[3,1];

关于excel大富翁有很多相关资料，你可以学习一下

edit1.text:=eclapp.cells.item[3,1];
我也在写这个东西，和你的差不错，我的没有问题，运行良好；你把上面这句改下看，行不行。

多人接受答案了。