数据库读取字段问题，认为自己是大牛的请进，在线等……

各位大虾：我想将ADOQUERY 查询的记录的某一字段读取出来，发现以下问题。
我demo中通过DEMO1.LINES.ADD可以将所有记录的某一字段全部取出来，而通过s:=s+adoquery1.fileds[i].asstring 取出来就不对了（其中s为字符串，i为变量），详细代码如下：
请指导：
 Memo2.Clear;
 adoq_01.SQL.Clear;
 adoq_01.SQL.Add('select * from icmp');
 //ShowMessage(adoq_01.SQL.Text);
 adoq_01.open;
 with adoq_01 do
 begin
   First;
   while not Eof do
   begin
     Memo2.Lines.Add(adoq_01.Fields[1].AsString);
     smsemail:=smsemail+adoq_01.Fields[6].AsString+';';
     Edit7.Text:=adoq_01.Fields[6].AsString;
     smsit:=smsit + adoq_01.Fields[5].AsString;
     ShowMessage(smsit);
     //ShowMessage(smsemail);
     Next;
   end;
 end;