报project are raised exception class Eoleerror with message...错是为什么？

Question

报project are raised exception class Eoleerror with message variant doesn't reference an automation object错是为什么？
程序代码如下：
procedure TForm1.TreeView1Click(Sender: TObject);
begin
 Edit1.Text:=treeview1.Selected.Text;
  StatusBar1.Panels[1].Text:=Edit1.Text;
    ADOQuery1.Close;
    ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add('select lev from unit where name like''' +treeview1.Selected.Text+'''');
   ADOQuery1.Open;
      ADOQuery1.First;
       Edit2.Text:=ADOQuery1.FieldValues['lev'].AsString;    ADOQuery2.Close;
    ADOQuery2.SQL.Clear;
  ADOQuery2.SQL.Add('select 姓名 from ry where lev =''' +ADOQuery1.FieldValues['lev'].AsString+'''');
   ADOQuery2.Open;
    end;
end.

Answer 1

ADOQuery1.FieldValues['lev'].AsString;
后面那个asstring不需要吧~~~
那个错误信息不懂